Pentagram: Difference between revisions

Content added Content deleted

Inline

@@ Line 218: / Line 218: @@
 GRAPHICS HIRES 4
 SET PALETTE BLUE,CYAN,YELLOW,BLACK
-SET INK 1
+PLOT 640,700,ANGLE 288;
-PLOT 640,700,ANGLE 288;
+FOR I=1 TO 5
+PLOT FORWARD 700,RIGHT 144;
-FOR I=1 TO 5
+NEXT
-PLOT FORWARD 700,RIGHT 144;
-NEXT
+SET INK 3
-SET INK 3
+SET BEAM OFF:PLOT 0,0,PAINT</lang>
-SET BEAM OFF:PLOT 0,0,PAINT</lang>
 =={{header|J}}==