home *** CD-ROM | disk | FTP | other *** search
/ 64'er / 64ER_CD.iso / sh3x / sh37d.d64 / roulette (.txt) < prev    next >
Commodore BASIC  |  1995-03-30  |  278b  |  7 lines
  1. 1 POKE808,225
  2. 10 IFA=0THENA=1:PRINT"[147]":POKE211,9:POKE214,12:POKE53280,1:POKE53281,1:SYS58640
  3. 20 IFA=1THENA=2:PRINTCHR$(8)CHR$(142)"ROULETTE WIRD GELADEN.":LOAD"ZS.ROU*",8,1
  4. 30 PRINT"[147]";:POKE781,200:POKE780,0:POKE91,203:POKE90,232:POKE89,219
  5. 40 POKE88,232:SYS50856:POKE53280,5:POKE53281,5:POKE56576,0:POKE53272,49
  6. 50 POKE648,204:LOAD"HP.ROULETTE",8
  7.