home *** CD-ROM | disk | FTP | other *** search
/ 64'er / 64ER_CD.iso / 89xx / 8909a.d64 / wizball-cheat (.txt) < prev    next >
Commodore BASIC  |  1995-03-30  |  320b  |  15 lines
  1. 10 DIMA(30):PRINT"[147]WIZBALL-CHEAT"
  2. 11 PRINT"BY M.FICHTNER"
  3. 12 FORT=1TO5:PRINT"LEVEL";T;"= ";
  4. 13 POKE19,64:INPUTA(T):POKE19,0
  5. 14 PRINT:NEXT:PRINT"CODE: ";
  6. 15 A$="RAIWVBHDWKJZEZWIOFMLCOSQNTYJGU"
  7. 16 T=A(2)-A(5)+A(3):C=A(3)-2*T
  8. 17 IFT<1ORT>30THEN23
  9. 18 P=A(T)+A(T-1)-3*C
  10. 19 IFP<1ORP>30THEN23
  11. 20 PRINTMID$(A$,P,1);
  12. 21 T=T+1:IFT>=A(4)THENT=C:C=C+1
  13. 22 IFC<A(3)THEN17
  14. 23 PRINT
  15.