|
@@ -2662,9 +2662,9 @@ const CrtAddress: word = 0;
|
|
|
|
|
|
|
|
|
|
|
|
|
{$undef asmgraph}
|
|
{$undef asmgraph}
|
|
|
|
|
+{$ifndef asmgraph}
|
|
|
Procedure DirectPutPixelX(X,Y: smallint);
|
|
Procedure DirectPutPixelX(X,Y: smallint);
|
|
|
{ x,y -> must be in global coordinates. No clipping. }
|
|
{ x,y -> must be in global coordinates. No clipping. }
|
|
|
-{$ifndef asmgraph}
|
|
|
|
|
Var offset: Word;
|
|
Var offset: Word;
|
|
|
dummy: Byte;
|
|
dummy: Byte;
|
|
|
begin
|
|
begin
|
|
@@ -2692,8 +2692,8 @@ const CrtAddress: word = 0;
|
|
|
Mem[Sega000: offset] := Dummy;
|
|
Mem[Sega000: offset] := Dummy;
|
|
|
end;
|
|
end;
|
|
|
{$else asmgraph}
|
|
{$else asmgraph}
|
|
|
-{ note: still needs or/and/notput support !!!!! (JM) }
|
|
|
|
|
- Assembler;
|
|
|
|
|
|
|
+ Procedure DirectPutPixelX(X,Y: smallint); assembler;
|
|
|
|
|
+ { note: still needs or/and/notput support !!!!! (JM) }
|
|
|
asm
|
|
asm
|
|
|
push ax
|
|
push ax
|
|
|
push bx
|
|
push bx
|
nickysn