Anonymous user
Colour bars/Display: Difference between revisions
→{{header|BASIC}}: add AmigaBASIC version
(Changed way to call "setSource".) |
(→{{header|BASIC}}: add AmigaBASIC version) |
||
Line 216:
=={{header|BASIC}}==
==={{header|AmigaBASIC}}===
<lang amigabasic>SCREEN 1,320,200,5,1
WINDOW 2,"Color bars",(0,10)-(297,186),15,1
FOR a=0 TO 300
LINE (a,0)-(a,186),(a+10)/10
NEXT
loop: GOTO loop</lang>
==={{header|Applesoft BASIC}}===
| |||