git-svn-id: https://spexeah.com:8443/svn/Asuro@546 6dbc8c32-bb84-406f-8558-d1cf31a0ab0c

This commit is contained in:
kieron 2018-04-26 17:09:50 +00:00
parent ebdba2102c
commit 66dcea9054
8 changed files with 2 additions and 13 deletions

BIN
Asuro.iso

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

Binary file not shown.

View File

@ -65,11 +65,6 @@ begin
if not NeedsRedraw then exit; if not NeedsRedraw then exit;
NeedsRedraw:= false; NeedsRedraw:= false;
if not FirstDraw then begin if not FirstDraw then begin
{for y:=0 to 1 do begin
for x:=0 to 1 do begin
DrawPixel(Last.x + x, Last.y + y, BackPixels[x][y]);
end;
end;}
for y:=0 to 7 do begin for y:=0 to 7 do begin
for x:=0 to 1 do begin for x:=0 to 1 do begin
drawPixel64(Last.x + (x * 4), Last.y + y, BackPixels[x][y]); drawPixel64(Last.x + (x * 4), Last.y + y, BackPixels[x][y]);
@ -78,12 +73,6 @@ begin
end; end;
Last.x:= nx; Last.x:= nx;
Last.y:= ny; Last.y:= ny;
{for y:=0 to 1 do begin
for x:=0 to 1 do begin
BackPixels[x][y]:= GetPixel(nx + x, ny + y);
DrawPixel(nx + x, ny + y, $FFFF);
end;
end;}
for y:=0 to 7 do begin for y:=0 to 7 do begin
for x:=0 to 1 do begin for x:=0 to 1 do begin
BackPixels[x][y]:= GetPixel64(nx + (x * 4), ny + y); BackPixels[x][y]:= GetPixel64(nx + (x * 4), ny + y);
@ -162,8 +151,8 @@ begin
Current.y:= Current.y - Packet.y_movement; Current.y:= Current.y - Packet.y_movement;
if Current.x < 0 then Current.x:= 0; if Current.x < 0 then Current.x:= 0;
if Current.y < 0 then Current.y:= 0; if Current.y < 0 then Current.y:= 0;
if Current.x > 1279 then Current.x:= 1279; if Current.x > 1272 then Current.x:= 1272;
if Current.y > 1023 then Current.y:= 1023; if Current.y > 1015 then Current.y:= 1015;
end; end;
Cycle:= 0; Cycle:= 0;
NeedsRedraw:= true; NeedsRedraw:= true;