TP7 проблема компиляции Опции

[St@senk@]

Здравствуйте, не подскажите ли Вы, как скомпилировать

procedure putpixel2 (x,y:word;col:byte);assembler;
asm
pusha
mov ax,0A000h
mov es,ax
mov ax,[y] 
mul 320
mov di,ax 
add di,[x]
mov al,[col]
cld
stosb
popa
end;

а то у меня по каким-то причинам Turbo Pascal 7, пишет ошибку в строке mul 320
Заранее благодарен