Appears on
Assembled by Tim Ward from many sources. Contains programs 10211 – 10251.
Source Code
5 REM "SWARM" 10 LET A=10 20 LET B=15 30 LET C=20 40 PRINT AT C,RND*30;"*" 50 PRINT AT A,B;" " 60 SCROLL 70 IF INKEY$="Z" THEN LET B=B-1 80 IF INKEY$="M" THEN LET B=B+1 90 PRINT AT A,B;"\:.\.:" 100 GOTO 40 105 SAVE "1022%2" 110 RUN