Content added Content deleted
|
|
| Line 316: |
Line 316: |
|
20 FOR x=0 TO 15 |
|
20 FOR x=0 TO 15 |
|
30 ORIGIN x*40,0 |
|
30 ORIGIN x*40,0 |
|
⚫ |
40 FOR z=0 TO 39 STEP 4:MOVE z,0 ,x:DRAW z,400:NEXT z |
|
40 GRAPHICS PEN x |
|
|
⚫ |
|
| ⚫ |
50 FOR z=0 TO 39 STEP 4:MOVE z,0:DRAW z,400:NEXT |
|
|
⚫ |
60 CALL &bb06 ' wait for key press</lang> |
| ⚫ |
|
|
| ⚫ |
70 CALL &bb06 ' wait for key press</lang> |
|
|
|
|
|
|
==={{header|PureBasic}}=== |
|
==={{header|PureBasic}}=== |
