home *** CD-ROM | disk | FTP | other *** search
/ Power Disk 64 1996 1 / Power_Disk_64_96-01_1996_Lagune_de_Side_A.d64 / spieleteilmenu (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  11KB  |  255 lines
  1. 0 print"[153][147]":poke53280,0:poke53281,0
  2. 1 print"[175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175]"
  3. 2 print"[159]  [208][207][215][197][210] [196][201][211][203] 64 - [211]pieleteilmenu 1/96  "
  4. 3 print"[183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183]"
  5. 4 print"[159]1 = [212][207][208] [212][197][206]                  2 = [198][204][207][208] [212][197][206]"
  6. 5 print"3 = [199][210][193][198][201][203]-[212][207][208] [198][201][214][197]          4 = [211][207][213][206][196]-[212][207][208] [198][201][214][197]"
  7. 6 print"5 = [212][201][208][211] & [212][210][201][195][203][211]"
  8. 7 print"6 = [212][197][211][212][211]"
  9. 8 print"7 = [205][197][199][193] [196][210][201][214][197]"
  10. 9 print" 8 = [200][193][213][208][212][205][197][206][213]                 9 = [210][197][211][197][212]"
  11. 10 input"[215]as wollen sie sehen";a
  12. 11 if a<1 or a>9 then0
  13. 12 if a = 1 then goto100
  14. 13 if a = 2 then goto200
  15. 14 if a = 5 then goto300
  16. 15 if a = 6 then goto400
  17. 18 if a = 8 then goto500
  18. 19 if a = 9 then goto600
  19. 20 if a = 3 then goto4000
  20. 22 if a = 4 then goto4100
  21. 23 if a = 7 then goto800
  22. 25 get m$:if m$=""then25
  23. 26 goto1
  24. 100 print"[147]"
  25. 101 print"[145][212][207][208] [212][197][206][146] 19.[215]ertung"
  26. 103 print" ( 2)  1. [218]ak [205]c[203]racken              19"
  27. 104 print" ( 5)  2. [205]aniac [205]ansion             19"
  28. 105 print" ( 1)  3. [203]angarudy                   8"
  29. 106 print" ( 6)  4. [211]py vs [211]py                 12"
  30. 107 print" ( 3)  5. [211]ervate [212]erram !            4"
  31. 108 print" ( 4)  6. [200]otel                      15"
  32. 109 print" ([206][197])  7. [195]rylon                      1"
  33. 110 print" ([206][197])  8. [196]eutsches [193]frika [203]orps      1"
  34. 111 print" ( 7)  9. [194]oulder [196]ash                2"
  35. 112 print" ([206][197]) 10. [196]ragon [215]ars                 1"
  36. 113 print"[158] (10)     [198]ast [212]racks                 5"
  37. 114 print" ( 8)     [201]mpossible [205]ission [201][201]       2"
  38. 115 print"[159][212][193][211][212][197]"
  39. 116 geta$:ifa$=""then116
  40. 117 print"[147][218]eichenerklaerung:                      [206][197]=[206][197][215] [197][206][212][210][217] ([206]euzugang)"
  41. 118 print"[210][197]=[210][197] [197][206][212][210][217] ([210]ueckkehrer)               [200][212]=[200][207][212]-[212][201][208] (war in der letzten"
  42. 119 print"            [193]usgabe ein [200][207][212]-[212][201][208])        gruen=[193]ufsteiger"
  43. 120 print"gelb=gleich geblieben                   rot=[193]bsteiger"
  44. 121 print"[193]m [197]nde eines [211]pieles steht,wieoft es   schon in den [212][207][208] [212][197][206] ist."
  45. 122 print"[200][207][212]-[212][201][208][211]:                               [183][183][183][183][183][183][183][183]"
  46. 123 print"[215][215][214],[215][215][214] ([210]emix),[212]he [193]lternative [199]ame [201][201]"
  47. 124 print"[206]icht mehr in den [212][207][208] [212][197][206] sind:"
  48. 125 print"[211]tar [194]attle,[211]uper-[195]ycle"
  49. 126 print"[215]arum ist [218]achary ploetzlich wieder auf 1 ? [199]anz klar:[196]ie [208][196]64-[195]harts"
  50. 127 print"[193][204][204] [212][201][205][197] - [195]harts !!!"
  51. 130 geta$:ifa$=""then130
  52. 131 print"[147] [212][207][208] [212][197][206] [196]eutschland [146]([194]asis:[205]agic [196]isk  64 [195]lassics 11+12/95 & 1/96)"
  53. 132 print"(1)  1.[204]emmings                         (3)  2.[208]irates"
  54. 133 print"(2)  3.[212]urrican [201][201]                      (6)  4.[211]word [207]f [200]onour"
  55. 134 print"(5)  5.[218]ak [205]c[203]racken                    ([210][197]) 6.[205]aniac [205]ansion"
  56. 135 print"([206][197]) 7.[211]hopping [193][199]                      ([206][197]) 8.[194]erania"
  57. 136 print"(10) 9.[205]echanicus                       (8) 10.[210]olling [210]onny"
  58. 137 print"[196]as war die letzte [212][207][208] [212][197][206].[205][196] is nich   meh',und 64'er hat nich meh'"
  59. 148 geta$:ifa$=""then148
  60. 149 goto0
  61. 200 print"[147]"
  62. 201 print"[145][198][204][207][208] [212][197][206][146] 10.[215]ertung"
  63. 203 print" ( 2)  1. [203][193][205][201][203][193][218][197] [201][201]                 5"
  64. 204 print" ( 1)  2. [203]amikaze                    7"
  65. 205 print"[158] ( 3)  3. [193]ddicta [194]all               10"
  66. 206 print"[158] ( 4)  4. [212]anktrap                    4"
  67. 207 print"[158] ( 5)  5. [194]lobber                     5"
  68. 208 print" ([206][197])  6. [211]ettle-[194]attle               1"
  69. 209 print" ( 6)  7. [212]urrican                    7"
  70. 210 print" ([206][197])  8. [200]ighway                     1"
  71. 211 print"[158] ( 9)  9. [212]urbo [194]oat                 10"
  72. 212 print" ( 7) 10. [201]mpossible [205]ission [201][201]       6"
  73. 215 print"[159][212][193][211][212][197]"
  74. 216 geta$:ifa$ =""then216
  75. 217 print"[147][195][212]=[196]asselbe,wie [200][212],nur das [195][212] nicht [200][207][212]-   [212][201][208],sondern [195][207][204][196]-[212][201][208] bedeudet."
  76. 218 print"[195][207][204][196]-[212][201][208][211]:"
  77. 219 print"[200]oliday [199]ames,[213][198][207] [201][201]"
  78. 220 print"[206]icht mehr dabei:"
  79. 221 print"[212]etris,[211]tar [194]attle"
  80. 222 geta$:ifa$=""then222
  81. 226 goto0
  82. 300 print"[147]"
  83. 301 print"[145] [212][201][208][211] & [212][210][201][195][203][211] 1/96 [146]"
  84. 302 print"[196]emnaechst werden hier nur noch [212]ips &  [212]ricks zu aktuellen [199]ames ver-"
  85. 303 print"oeffentlicht.[205]it anderen [215]orten:[197]s wer- den nur noch [195]heats zu [204][193][199][213][206][197] und"
  86. 304 print"[208][200][210][197][206][197][212][201][195] [199]ames angezeigt.[193]llerdings    gibt es noch 2 weitere [205]oeglich-"
  87. 305 print"keiten fuer [195]heats:"
  88. 306 print"1. [201]hr schickt mir welche"
  89. 307 print"2. [201]hr habt [198]ragen zu bestimmten [199]ames"
  90. 308 print"[201]ch denke,dass vor allem die letzte     [205]oeglichkeit etwas sehr leser-"
  91. 309 print"freundliches ist,wodurch diese [210]ubrik   verbessert werden wird.[196]abei gaebe"
  92. 310 print"es fuer mich eigentlich keinen [199]rund,   meiner faulen [204]eserschaft entgegen-
  93. 311 [153]"zukommen,aber ich bin eben der chr$ross-   meister ..."
  94. 312 [161]a$:[139]a$[178]""[167]312
  95. 313 [137]0
  96. 400 [153]"load"
  97. 401 [153]" (NULL)val(NULL)(NULL)(NULL) 1/96 "
  98. 403 [153]" 1 = (NULL)review von atnxl lenool - (NULL)he atnrcade       chr$ame"
  99. 404 [153]" 2 = (NULL)review von (NULL)usic peekusiness"
  100. 409 [153]" 3 = (NULL)(NULL)str$right$val peek(NULL)(NULL) chr$(NULL)(NULL)str$right$val:(NULL)treet (NULL)ports          peekaseball"
  101. 410 [153]" 4 = right$nfo"
  102. 424 [153]" 5 = (NULL)enu"
  103. 433 [133]"(NULL)as wollen (NULL)ie sehen";a:[153]"ononon"
  104. 434 [139] a[179]1 [176] a[177]5 [167] [137]400
  105. 435 [139] a[178]1 [167] [137]1000
  106. 436 [139] a[178]2 [167] [137]1100
  107. 439 [139] a[178]3 [167] [137]1400
  108. 440 [139] a[178]4 [167] [137]2000
  109. 441 [139] a[178]5 [167] [137]0
  110. 500 [151]828,0
  111. 501 [153] [199](147) [199](17)
  112. 502 [153] "load" [199](34);"haupt*"; [199](34); ",8
  113. 503 print chr$(17) chr$(17) chr$(17) chr$(17) "run"
  114. 504 poke631,13:poke632,13:poke198,2
  115. 505 print chr$(19);:end
  116. 600 sys64738
  117. 800 print"[147][159] [205][197][199][193] [196][210][201][214][197] "
  118. 801 print"[202]aaaa !!! [197]ndlich haben wir es ! [205][201][195][210][207]  [205][193][195][200][201][206][197][211] '96 !!! [197]s ist wiedermal"
  119. 802 print"ein absoluter [203]naller geworden !!! [197]inen2.[212]est haben wir diesmal nicht."
  120. 803 print"[212]ja,was kann ich euch sonst noch be-    richten ? [197]igentlich nix mehr !"
  121. 809 print"[200]ier jedenfalls meine [212]ips fuer die     [195]harts:"
  122. 810 print"1.[205]icro [205]achines '96                    2.[215][215][198] [210]aw"
  123. 811 print"3.[212]he [211]tory [207]f [212]hor                     4.[205]ega [194]omberman"
  124. 812 print"5.[212]iny [212]oon [193]ll [211]tars"
  125. 813 geta$:ifa$=""then813
  126. 814 print"[147]             [212]ips & [212]ricks              "
  127. 815 print"                [215][215][198]  [210][193][215]                                [183][183][183][183][183][183][183][183]"
  128. 816 print"[215]enn ein [215]restler schon ausgewaehlt     wurde,dann koennt ihr ihn nochmal"
  129. 817 print"waehlen indem ihr [193]+[195]+oben gleichzeitig drueckt !"
  130. 818 print"                 [210][201][211][212][193][210]                                  [183][183][183][183][183][183]"
  131. 819 print"[200]ier noch ein nuetzliches [208]asswort:     [205][193][199][213][210][207]"
  132. 820 print"[202]etzt habt ihr neue [207]ptionen !"
  133. 821 print"               [215][193][212][197][210][215][207][210][204][196]                              [183][183][183][183][183][183][183][183][183][183]"
  134. 822 print"[208]asswoerter:"
  135. 823 print"[193][212][207][204][204]       [204][197][214][197][204][195][207][196][197]"
  136. 824 print"[211]erina      [195][216][210][203][199] [212][194][200][203][199]                 [205]erylla     [199][198][212][203][203] [212][215][212][198][199]"
  137. 825 print"[195]arona      [195][204][204][203][216] [212][210][196][196][199]                 [212]erana      [204][199][196][203][212] [212][203][205][204][199]"
  138. 826 print"[193]lina       [199][195][216][199][210] [212][194][215][200][203]"
  139. 827 print"[196]as war [212]eil 1.[212]eil 2 folgt ...[145]"
  140. 828 geta$:ifa$=""then828
  141. 829 print"[215]ie waer's,wenn da draussen mal jemand  sich ein [205][197][199][193] [196][210][201][214][197] kaufen wuerde
  142. 830 [153]"und dann (NULL)ips&(NULL)ricks zu mir schickt ?   ascuer den len64 gibt es doch eh nur"
  143. 831 [153]"noch chr$ames von (NULL)atnchr$(NULL)(NULL)val (und gelegentlich von (NULL)left$(NULL)val(NULL)val(NULL)right$len).(NULL)auft euch fuer"
  144. 832 [153]"chr$ames ein (NULL)valchr$atn str$(NULL)right$(NULL)val.(NULL)um einen gibt es  fuer ihn bessere (NULL)oftware wie fuer"
  145. 833 [153]"(NULL)lens und zum anderen ist ein (NULL)valchr$atn str$(NULL)right$(NULL)val  viel,viel benutzerfreundlicher als"
  146. 834 [153]"so'n (NULL)len.peekei den '(NULL)uermen' braucht man   doch 1001 zusaetzliches (NULL)eugs um"
  147. 835 [153]"das (NULL)iech zum (NULL)aufen zu bringen.(NULL)udem   muessen die (NULL)str$-chr$ames nicht stunden-
  148. 836 print"lang geladen,installiert,usw.,werden,be-vor man sich daran erfreuen kann !"
  149. 837 geta$:ifa$=""then837
  150. 845 print" [196]eutschland-[195]harts "
  151. 846 print"[193]ufgrund des [193]usfallens von [199][193][205][197][210][211] gibt es auf unbestimmte [218]eit keine"
  152. 847 print"[196]eutschland-[195]harts.[193]llerdings kommen in letzter [218]eit sowieso nicht soviel"
  153. 848 print"dolle [199]ames fuer das [205]ega [196]rive heraus. [205]an(n) spielt lieber mit den"
  154. 849 print"[198]aehigkeiten des [211]aturn 'rum,obwohl     dabei noch nicht allzuviel heraus-"
  155. 850 print"kam.[209]uo vadis,segae ?"
  156. 853 geta$:ifa$=""then853
  157. 854 print"[147]  [205][197][199][193] [196][210][201][214][197]-[212]est 2/95: [205]ega [194]omberman  "
  158. 855 print"[211]eit [205][201][195][210][207] [205][193][195][200][201][206][197][211] [201][201] hat sich im      [208]rinzip nicht viel geaendert.[197]inige
  159. 856 [153]"(NULL)trecken,wie z.peek. das kultige ascval(NULL)(NULL)(NULL)     ascright$atn(NULL)len(NULL),wurden mit neuen zusammenge-
  160. 857 print"tan.[206]eu ist auch das [195][207][206][211][212][210][213][195][212][201][207][206] [203][201][212].  [205]an kann (leider begrenzt) eigene"
  161. 858 print"[211]trecken herstellen.[196]iese koennen ent-  weder (begrenzte [193]nzahl) auf einer"
  162. 859 print"[194]atterie abgesaved werden oder man kann sich ein [208]asswort dafuer merken."
  163. 860 print"[218]udem sieht man jetzt auch immer die    [211]truktur der [211]trecke,was eine"
  164. 861 print"kleine [200]ilfe ist.[206]eue [199]efaehrte gibt es auch,u.a. [202]ets.[193]usserdem gibt es"
  165. 862 print"auch noch jede [205]enge [211]tatistiken."
  166. 863 print"[193]lles in allem ein kaufenswerter [206]ach-  folger,speziell wegen dem"
  167. 864 print"[195][207][206][211][212][210][213][195][212][201][207][206] [203][201][212].[197]iner der letzten [205][197][199][193] [196][210][201][214][197]-[200]its.[205]ittlerweile gibt's ja"
  168. 865 print"eigentlich nur noch [211][193][212][213][210][206]-[199]ames.[215]arum  eigentlich ? [196]er [205][197][199][193] [196][210][201][214][197] hatte"
  169. 866 geta$:ifa$=""then866
  170. 867 print"doch alles ! [196]ie [199]rafik war schon hoch- aufloesend genug !"
  171. 868 geta$:ifa$=""then868
  172. 912 print"[147][194]ewertung:[199]rafik        :  9            [183][183][183][183][183][183][183][183][183] [211]ound         :  8"
  173. 913 print"          [211]pielspass    : 10                      [211]pielidee     :  9"
  174. 914 print"          [208]reis/[204]eistung: 10                      [211]chwierigkeit : leicht"
  175. 915 print"          [199]esamteindruck: 10"
  176. 916 print"[208][207][211][201][212][201][214]:[199]elungene [210]enovierung;tolles    [183][183][183][183][183][183][183] neues [195]onstruction [203]it"
  177. 921 print"[206][197][199][193][212][201][214]:[211]chon das 3.[205]icro [205]achines-[199]ame [183][183][183][183][183][183][183] ... sonst nix"
  178. 922 print"[198][193][218][201][212]:[193]uch fuer [194]esitzer der [214]orgaenger [183][183][183][183][183] eine sinnvolle [193]nschaffung !
  179. 928 [161]a$:[139]a$[178]""[167]928
  180. 992 [153]"load (NULL)val(NULL)val(NULL)-(NULL)(NULL)(NULL) ascright$(NULL)val (3) "
  181. 993 [153]"(-) 1. (NULL)icro (NULL)achines '96               (1) 2. (NULL)orld (NULL)f right$llusion"
  182. 994 [153]"(-) 3. (NULL)tory (NULL)f (NULL)hor                    (2) 4. (NULL)onic (NULL)he left$edgehog"
  183. 995 [153]"(-) 5. (NULL)(NULL)asc (NULL)aw                          (3)    (NULL)onic (NULL)he left$edgehog right$right$"
  184. 996 [153]"left$(NULL)(NULL)-(NULL)right$(NULL)(NULL):"
  185. 997 [153]"ascright$ascatn (NULL)(NULL)lenlenval(NULL),(NULL)valchr$atn peek(NULL)(NULL)peekval(NULL)(NULL)atn(NULL)(NULL)"
  186. 999 [137]6000
  187. 1000 [151]828,0
  188. 1001 [153] [199](147) [199](17)
  189. 1002 [153] "load" [199](34);"axl *";[199](34); ",8
  190. 1003 print chr$(17) chr$(17) chr$(17) chr$(17) "run"
  191. 1004 poke631,13:poke632,13:poke198,2
  192. 1005 print chr$(19);:end
  193. 1100 poke828,0
  194. 1101 print chr$(147) chr$(17)
  195. 1102 print "load" chr$(34);"music*";chr$(34); ",8
  196. 1103 [153] [199](17) [199](17) [199](17) [199](17) "run"
  197. 1104 [151]631,13:[151]632,13:[151]198,2
  198. 1105 [153] [199](19);:[128]
  199. 1400 [151]828,0
  200. 1401 [153] [199](147) [199](17)
  201. 1402 [153] "load" [199](34);"base*";[199](34); ",8
  202. 1403 print chr$(17) chr$(17) chr$(17) chr$(17) "run"
  203. 1404 poke631,13:poke632,13:poke198,2
  204. 1405 print chr$(19);:end
  205. 2000 print"[147] [201][206][198][207] "
  206. 2001 print"[196]a es wohl nur noch [211]oftware von [204][193][199][213][206][197] und [208][200][210][197][206][197][212][201][195] gibt,schrumpft"
  207. 2002 print"diese [210]ubrik wahnsinnig.[196]ie [204][193][199][213][206][197]-[199]ameswerden eigentlich nur gepreviewed,
  208. 2003 [153]"da sie ja in voller (NULL)ersion meistens in (NULL)str$64 erscheinen (wie z.peek. der left$it"
  209. 2004 [153]"(NULL)left$val atn(NULL)(NULL)val(NULL)(NULL)atn(NULL)right$(NULL)val chr$atn(NULL)val right$right$ in dieser atnus-  gabe).str$ie wenigen chr$ames die nicht"
  210. 2005 [153]"in (NULL)str$64 rauskommen werden natuerlich    noch (NULL)right$lenleft$(NULL)right$chr$ getestet.atnnsonsten"
  211. 2006 [153]"kann man nur noch (NULL)left$(NULL)val(NULL)val(NULL)right$len-chr$ames er-   warten.atnber dieser len.asc.(NULL). von"
  212. 2007 [153]"(NULL)left$(NULL)val(NULL)val(NULL)right$len arbeitet ewig langsam ! (NULL)nd   die letzten beiden chr$ames die er"
  213. 2008 [153]"mir zeigte,die waren (NULL)cheisse.(NULL).asc.(NULL).    wurde ja noch getestet,aber das"
  214. 2009 [153]"letzte chr$ame (NULL)val(NULL)(NULL)right$val(NULL)(NULL) war schlimmer als  (NULL)atn(NULL)right$(NULL)(NULL)(NULL)(NULL)val right$right$ !!! (NULL)atuerlich kommt"
  215. 2010 [153]"mir so ein (NULL)est nicht in meine (NULL)str$64     rein."
  216. 2011 [153]"right$hr koennt uebrigens auch chr$ames         schreiben und euch dann mit mir"
  217. 2012 [161]a$:[139]a$[178]""[167]2012
  218. 2013 [153]"in (NULL)erbindung setzen zwecks (NULL)est oder   (NULL)eroeffentlichung ..."
  219. 2014 [161]a$:[139]a$[178]""[167]2014
  220. 2015 [137]0
  221. 4000 [153]"load"
  222. 4001 [153]"openloadchr$(NULL)atnascright$(NULL)-(NULL)(NULL)(NULL) ascright$(NULL)valwait 7.(NULL)ertung"
  223. 4003 [153]"sys ( 1)  1. (NULL)right$(NULL) right$(NULL)(NULL)val(NULL)right$(NULL)(NULL)                7"
  224. 4004 [153]"sys ( 2)  2. (NULL)ime (NULL)achine                7"
  225. 4005 [153]" ((NULL)val)  3. left$unter's (NULL)oon               1"
  226. 4006 [153]" ((NULL)val)  4. (NULL)ctapolis                   1"
  227. 4007 [153]" ((NULL)val)  5. (NULL)atan                       1"
  228. 4008 [153]" ((NULL)val)     valskimo chr$ames                1"
  229. 4009 [153]" ( 3)     (NULL)angarudy                   7"
  230. 4013 [153]"open(NULL)atn(NULL)(NULL)val"
  231. 4014 [161]a$:[139]a$[178]""[167]4014
  232. 4015 [153]"loadleft$(NULL)(NULL)-(NULL)right$(NULL)(NULL):"
  233. 4016 [153]"(NULL)kizze in atnnleitung von (NULL)ettle-peekattle   (NULL)icht mehr dabei:"
  234. 4017 [153]"lenlystron,right$(NULL)"
  235. 4024 [161]a$:[139]a$[178]""[167]4024
  236. 4025 [137]0
  237. 4100 [153]"load"
  238. 4101 [153]"(NULL)(NULL)(NULL)(NULL)str$-(NULL)(NULL)(NULL) ascright$(NULL)valwait 7.(NULL)ertung"
  239. 4103 [153]"sys ( 1)  1. (NULL)atn(NULL) (NULL)c(NULL)(NULL)atnlen(NULL)val(NULL)               7"
  240. 4104 [153]" ( 4)  2. (NULL)aniac (NULL)ansion              7"
  241. 4105 [153]" ( 2)  3. (NULL)angarudy                   7"
  242. 4106 [153]" ( 3)  4. (NULL)latoon                     4"
  243. 4107 [153]" ((NULL)val)  5. (NULL)pace-(NULL)unnel                1"
  244. 4113 [153]"open(NULL)atn(NULL)(NULL)val"
  245. 4114 [161]a$:[139]a$[178]""[167]4114
  246. 4115 [153]"loadleft$(NULL)(NULL)-(NULL)right$(NULL)(NULL):"
  247. 4116 [153]"(NULL)ifeforce,(NULL)atnchr$(NULL)(NULL)val-chr$ames"
  248. 4117 [153]"(NULL)icht mehr dabei:"
  249. 4118 [153]"(NULL)ut (NULL)un"
  250. 4119 [161]a$:[139]a$[178]""[167]4119
  251. 4120 [137]0
  252. 6000 [153]"(NULL)eue gibt es nur im atnusnahmefall noch   beim naechsten mal !"
  253. 6001 [161]a$:[139]a$[178]""[167]6001
  254. 6002 [137]0
  255.