home *** CD-ROM | disk | FTP | other *** search
/ Power Disk 64 1996 2 / Power_Disk_64_96-02_1996_Lagune_de_Side_B.d64 / crack-snack (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  1KB  |  88 lines
  1. 0 goto100
  2. 1 open1,8,2,"highscore,s,r"
  3. 2 input#1,a$
  4. 3 input#1,b$
  5. 4 input#1,c$
  6. 5 input#1,d$
  7. 6 input#1,e$
  8. 7 input#1,f$
  9. 8 input#1,g$
  10. 9 input#1,h$
  11. 10 input#1,i$
  12. 11 input#1,j$
  13. 12 input#1,k$
  14. 13 input#1,l$
  15. 14 input#1,m$
  16. 15 input#1,n$
  17. 16 input#1,o$
  18. 17 input#1,p$
  19. 18 input#1,q$
  20. 19 input#1,r$
  21. 20 input#1,s$
  22. 21 input#1,t$
  23. 30 close1
  24. 100 print"[147][200]anseat-[200]ighscore-[195]reator  ([195]rack-[211]nack)"
  25. 101 print"vom [199]randmaster [193].[202]."
  26. 102 print"1 = [200]ighscore laden"
  27. 103 print"2 = [200]ighscore aendern & speichern"
  28. 104 print"3 = [197]nde"
  29. 105 input"[201]hre [215]ahl";e
  30. 106 ife>3ore<1then100
  31. 107 ife=1then1
  32. 108 ife=2then200
  33. 109 ife=3then1000
  34. 200 print"[147][211]ie koennen jetzt die [212]op [212]en aendern.  [199]eben [211]ie dazu einen [206]amen ein,"
  35. 201 print"druecken [211]ie [210][197][212][213][210][206] und geben die [208]kt.- [218]ahl ein,dann wieder [210][197][212][213][210][206]."
  36. 202 print"[200]uh-[200]uh,[200]uh-[200]uh,[205]mh,[213]h-[200]uh !"
  37. 203 input"1.";a$
  38. 204 input"[208]kt.";b$
  39. 205 input"2.";c$
  40. 206 input"[208]kt.";d$
  41. 207 input"3.";e$
  42. 208 input"[208]kt.";f$
  43. 209 input"4.";g$
  44. 210 input"[208]kt.";h$
  45. 211 input"5.";i$
  46. 212 input"[208]kt.";j$
  47. 213 input"6.";k$
  48. 214 input"[208]kt.";l$
  49. 215 input"7.";m$
  50. 216 input"[208]kt.";n$
  51. 217 input"8.";o$
  52. 218 input"[208]kt.";p$
  53. 219 input"9.";q$
  54. 220 input"[208]kt.";r$
  55. 221 input"10.";s$
  56. 222 input"[208]kt.";t$
  57. 223 input"[196]aten richtig ([202]/[206])";v$
  58. 226 ifv$="j"then230
  59. 227 ifv$="n"then200
  60. 228 goto200
  61. 230 open1,8,2,"@:highscore,s,w"
  62. 231 print#1,a$
  63. 232 print#1,b$
  64. 233 print#1,c$
  65. 234 print#1,d$
  66. 235 print#1,e$
  67. 236 print#1,f$
  68. 237 print#1,g$
  69. 238 print#1,h$
  70. 239 print#1,i$
  71. 240 print#1,j$
  72. 241 print#1,k$
  73. 242 print#1,l$
  74. 243 print#1,m$
  75. 244 print#1,n$
  76. 245 print#1,o$
  77. 246 print#1,p$
  78. 247 print#1,q$
  79. 248 print#1,r$
  80. 249 print#1,s$
  81. 250 print#1,t$
  82. 251 close1
  83. 252 goto100
  84. 1000 print"[147]'[215]hen life is hard                       [217]ou have to change'
  85. 1001 [153]"(lenhange - peeklind (NULL)elon)"
  86. 1002 [153]"(peek(NULL)right$(NULL)str$ (NULL)val(NULL)(NULL)(NULL))"
  87. 1003 [162]
  88.