Browse code

Added corners to rectangle.

Andrew Alderwick authored on 27/03/2021 22:55:59
Showing 1 changed files
... ...
@@ -29,16 +29,18 @@
29 29
 |0200 @RESET
30 30
 	#3c =fps.current
31 31
 
32
-	#000a
32
+	#000b
33 33
 	DUP2 =lines.x1
34 34
 	DUP2 =lines.y1
35 35
 	DUP2 ~Screen.width SWP2 SUB2 =lines.x2
36 36
 	     ~Screen.height SWP2 SUB2 =lines.y2
37 37
 
38
-	~lines.x1 ~lines.x2 ~lines.y1 ,h JSR2
39
-	~lines.x1 ~lines.x2 ~lines.y2 ,h JSR2
40
-	~lines.y1 ~lines.y2 ~lines.x1 ,v JSR2
41
-	~lines.y1 ~lines.y2 ~lines.x2 ,v JSR2
38
+	~lines.x1 ~lines.x2
39
+	OVR2 OVR2 ~lines.y1 ,h JSR2
40
+	          ~lines.y2 ,h JSR2
41
+	~lines.y1 #0001 SUB2 ~lines.y2 #0001 ADD2
42
+	OVR2 OVR2 ~lines.x1 ,v JSR2
43
+	          ~lines.x2 ,v JSR2
42 44
 
43 45
 	@ERROR BRK
44 46