Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- MAIN:
- GOTO INIT
- INIT:
- CLS
- IF INKEY$ = "S" THEN STOP
- SCREEN 12
- A = TIMER
- DO
- LOOP WHILE TIMER = A + .5
- GOTO PRK
- PRK:
- DO
- CIRCLE (N, 240), 5, 4
- N = N +1: IF N = 640 THEN N = 0
- CIRCLE (N - 1, 240), 5, 0
- LOOP
Add Comment
Please, Sign In to add comment