נושא: לא עובד באסמבלר

נשלח בתאריך: 03 November 2006 בשעה 10:04 | IP רשוּם

{ִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִ ִִִִִִִִִִִִִִִ}
Procedure Hline (x1,x2,y:word;col:byte;where:word); assembler;
  { This draws a horizontal line from x1 to x2 on line y in color col }
asm
  mov   ax,where
  mov   es,ax
  mov   ax,y
  mov   di,ax
  shl   ax,8
  shl   di,6
  add   di,ax
  add   di,x1

  mov   al,col
  mov   ah,al
  mov   cx,x2
  sub   cx,x1
  shr   cx,1
  jnc   @start
  stosb
@Start :
  rep   stosw
end;

{ִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִִ ִִִִִִִִִִִִִִִ}

הורדתי את הקוד הנ"ל והא נותן לי שגיאה למה??? הוא מצביע לי על shl   ax,8

יש לצין שזה חלק מקוד