Totally Awesome

TOTALLY AWESOME turns the name of this totally awesome magazine into the most unusual, most different, cleverest, and strangest graphic you have ever seen.

To see this awesome graphic, just enter the program using your 16K RAM pack. (The program will run in 2K but the results are better in 16K.) Type RUN and ENTER, and watch. If you see something real cool just press the P key. Then it will wait for you to press another key. If you want to stop the program, hold down the S key and press BREAK. One more thing: if you turn up the volume of your television, you will hear music. Submitted by Mark Neirick of Des Plaines, Illinois. (T/S1000,1500,ZX81 2K).

 10 REM Y2 GOSUB ?TAN
 20 SLOW
 30 POKE 16517,71
 50 PRINT AT 9,2;"...##...###.#.#...#...#..."
 60 PRINT AT 10,3;".###.#####.#.#.###.###.#."
 70 PRINT AT 11,3;".#.#...###.#.#...#..##..."
 80 PRINT AT 12,3;".#####.###.#.###.#.###.."
 90 PRINT AT 13,3;".###...###...#...#...#.#."
100 LET L=USR 16514
110 LET K=RND*29
120 IF INKEY$="P" THEN PAUSE 4E4
130 IF INKEY$="S" THEN LET K=30
140 POKE 16515,K
150 GOTO 100
Note: . = inverse space
      #= space