Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- 10 PRINT CHR$(147): CLEARS SCREEN
- 20 X = 1: Y = 12: A$ = "SEXY!": TL = 5
- 1000 REM TEXT POSITIONING RIGHT
- 1010 IF X < 40 - TL THEN X = X + 1
- 1020 IF X = 40 - TL THEN GOTO 2000
- 1030 GOSUB 3000
- 1040 GOTO 1000
- 2000 REM TEXT POSITIONING LEFT
- 2010 IF X > 0 THEN X = X - 1
- 2020 IF X = 0 THEN GOTO 1000
- 2030 GOSUB 3000
- 2040 GOTO 2000
- 3000 REM TEXT PRINTING
- 3010 POKE 211,X: POKE 214,Y: SYS 58640: PRINT A$
- 3020 PRINT CHR$(147)
- 3030 RETURN
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement