home *** CD-ROM | disk | FTP | other *** search
/ Compute! Gazette 1990 October / 1990-10.d64 / progpage1 (.txt) < prev    next >
Commodore BASIC  |  2022-09-20  |  212b  |  7 lines
  1. 5 print"[147][158]":forx=1to22:print" text fader - press any key for demo":next
  2. 10 poke 53280,0:poke 53281,0:poke 646,1:poke 648,240
  3. 16 get a$:ifa$=""then16
  4. 20 for a=1 to 6:read c:poke 646,c:print chr$(147):next
  5. 30 poke 648,4:poke 646,1:print chr$(147)
  6. 40 data 1,7,15,12,11,0
  7.