Timexly Tips

  50 REM "T/S 2068"-Valentine
         "invert"
  52 REM John Colonna,SINCUS
  55 REM USE "GO TO 95 to return
         to normal characters"
         USE "GO TO 70 for the
         inverted set"
  60 CLEAR 29999
  65 LET c=PEEK 23606+256*PEEK 2
3607+256
  66 FOR j=0 TO 95
  67 FOR p=0 TO 7
  68 POKE 30000+7-p+8*j,PEEK (c+
p+8*j)
  69 NEXT p: NEXT j
  70 POKE 23606,48: POKE 23607,1
16
  80 STOP
  95 REM recovery
  97 POKE 23606,0: POKE 23607,60
  99 STOP