home *** CD-ROM | disk | FTP | other *** search
/ 64'er Special 30 / 64er_Magazin_Sonderheft_30_19xx_Markt__Technik_de_Side_A.d64 / diskmaker (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  446b  |  15 lines
  1. 100 print"[147]";:poke53280,0:poke53281,6
  2. 105 print"diskmaker fuer  die murmeln des dr.creep[146]"
  3. 110 print" bitte legen  sie eine disk nur mit dem"
  4. 115 print" hauptprogramm ein."
  5. 120 print" taste[146] druecken..."
  6. 125 poke198,0:wait198,255
  7. 130 print" schreibe ...":n=1
  8. 200 open1,8,2,"  hi,s,w":print#1,"50":print#1,"anonym":close1
  9. 205 print"[145]  level";n
  10. 210 open1,8,2," level"+str$(n)+",s,w"
  11. 215 forx=1to21:print#1,"[221]bitte druecken sie den joystick runter[221]":nextx
  12. 220 forx=1to6:print#1,"1":nextx
  13. 225 close1:n=n+1:ifn=101thenend
  14. 230 goto205
  15.