home *** CD-ROM | disk | FTP | other *** search
/ Mail Madness! 31 / Mail_Madness_31_2001_-_Side_A.d64 / listenersteller (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  553b  |  25 lines
  1. 10 poke53280,.:poke53281,.:print"[147][155]"
  2. 20 print"bitte geben sie einen namen eines spie-"
  3. 30 print"lers ein !"
  4. 40 input"name ";na$
  5. 50 print"[150]warnung : alle bisherigen spielerdaten"
  6. 60 print"werden geloescht !!!"
  7. 70 print"weitermachen ??  ( j [150]/ n [150])"
  8. 80 geta$:ifa$=""then80
  9. 90 ifa$="j"then35100
  10. 100 ifa$="n"thenend
  11. 110 goto80
  12. 35100 open2,8,2,"@:[194]  blue angel  [194],s,w"
  13. 35110 print#2,na$:print#2,0:print#2,0:print#2,0
  14. 35115 print#2,0:print#2,0:print#2,"spieler":print#2,0
  15. 35120 print#2,0:print#2,"spieler"
  16. 35130 print#2,0:print#2,0:print#2,0:print#2,0
  17. 35135 print#2,0:print#2,0:print#2,0
  18. 35150 close2
  19. 35155 open2,8,2,"@:[173][195][195][195][195][195][195][195][195][195][195][195][195][195][195][189],s,w"
  20. 35170 print#2,0
  21. 35175 print#2,0
  22. 35180 print#2,na$
  23. 35190 close2
  24. 35200 print"[153]fertig !!![155]":new
  25.