[TP - Assembler] wywala bład

Witam mam problem mam takie kodzik

procedure g_rysuj piksel(x, y: word; kolor: byte);
begin
 asm

 	mov ax, x
   mov di, ax
   shl ax, 8    
   shl di, 6
   add di, ax
   mov ax, 0A00h
   mov es, ax
   mov al, kolor
   mov byte ptr es:[di], al {Zapisz pod adres es:di wartosc AL}

 end;
end;

Wywala mi bład w shl ax, 8 nie wiem dlaczego. Jestem początkujący w asm

Błąd:

instruction are not enabled

Powinno pomoc dodanie w pierwszej linii programu {$G+}

thx pomogło a mozesz wytłumaczyc do czego to jest ??

Powinno pomoc dodanie w pierwszej linii programu {$G+}

http://bdn.borland.com/article/0,1410,16215,00.html

//dopisze tylko tyle, ze drugim parametrem shl/shr dla procesorów 8086 (xt) moze byc tylko rejestr cl. [mf]