Added corners to rectangle.

This commit is contained in:
Andrew Alderwick 2021-03-27 22:55:59 +00:00
parent 03f3d05c82
commit 8ebf499715
1 changed files with 7 additions and 5 deletions

View File

@ -29,16 +29,18 @@
|0200 @RESET
#3c =fps.current
#000a
#000b
DUP2 =lines.x1
DUP2 =lines.y1
DUP2 ~Screen.width SWP2 SUB2 =lines.x2
~Screen.height SWP2 SUB2 =lines.y2
~lines.x1 ~lines.x2 ~lines.y1 ,h JSR2
~lines.x1 ~lines.x2 ~lines.y2 ,h JSR2
~lines.y1 ~lines.y2 ~lines.x1 ,v JSR2
~lines.y1 ~lines.y2 ~lines.x2 ,v JSR2
~lines.x1 ~lines.x2
OVR2 OVR2 ~lines.y1 ,h JSR2
~lines.y2 ,h JSR2
~lines.y1 #0001 SUB2 ~lines.y2 #0001 ADD2
OVR2 OVR2 ~lines.x1 ,v JSR2
~lines.x2 ,v JSR2
@ERROR BRK