Randomly selects a character/keyword from the Sinclair codes, picks a random line and column number, then animates “pushing” that character to its spot.
Appears on
Library tape of the Indiana Sinclair Timex User’s Group.
Source Code
10 REM *** MUFFIN 20 LET L=INT (RND*21)+1 30 LET L1=INT (RND*19)+1 40 LET J=INT (RND*223)+33 50 FOR F=0 TO L 60 PRINT AT L1,F;CHR$ J,, 70 NEXT F 80 PRINT AT L1,L;CHR$ J,, 90 FOR F=(L-1) TO 0 STEP -1 100 PRINT AT L1,F;" " 110 NEXT F 120 GO TO 20