home *** CD-ROM | disk | FTP | other *** search
/ B Soft 6 / B-Soft_6_19xx_Maik__Mike_de_Side_A.d64 / rudi.gme (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  4KB  |  66 lines
  1. 1 ifa=0thena=1:load"rudi.sng",8,1
  2. 2 z$=chr$(34):e=5000:d=2:poke53280,6:poke53281,6:print"[147][142]rudi ratzefummel":print"[163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163]":print"vorgeschichte":print"du bist ein gerissener urkundenfael-":print"scher; pseudo-identitaeten sind dein ge-";:print"schaeft. dass dir die bullen andauernd"
  3. 3 print"im nacken sitzen, brauche ich wohl nicht";:print"zu sagen...":print"du startest mit einem anfangskapital von";:print"5000 eiern und einer gammeligen holz-":print"huette mit zwei betagten druckerpressen.":print"sinn ist es, mindestens 1000 mille zu"
  4. 4 print"scheffeln - was eigentlich schon zeigt,":print"dass es in deiner branche nicht auf qua-";:print"litaet ankommt.":print"(w) 1998 by breit night and psycho sid";:gosub64:sys49152:poke53280,5:poke53281,0
  5. 5 ife>999999then57
  6. 6 ife<0then58
  7. 7 ifp>100then59
  8. 8 ifm>35then60
  9. 9 ifkk=1thene=e-500
  10. 10 m=m+1:print"[147]      rudis inventar im"m"[157]. monat:":print"      [163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163]":ifm>9thenpoke1297,99
  11. 11 print"     "e"eier":print"     "d"druckerpressen und (noch)":print"     "p"minuspunkte bei den bullen":print"      drueck' eine taste, rudi!":gosub64:u=int(100*rnd(1))+100:u=u*d:k=int(10*rnd(1))+10:n=int(5000*rnd(1))+5000:g=u*k:e=e+g:print"[147] einnahmen":print" ---------"
  12. 12 print"du warst in der lage,"u"gefaelschte":print"paesse herzustellen. bei einem aktuellen";:print"schwarzmarktwert von"k"eiern pro exem-":print"plar bringt dir das"g"eier ein.":print"der preis einer neuen druckerpresse be-":print"traegt"n"eier. wieviel willst du dir"
  13. 13 input"besorgen";s:d=d+s:e=e-(n*s):s=0:print"[147] so ein zufall!":print" --------------":ifm=4thenprint"du hattest heute nacht einen schreckli-"
  14. 14 ifm=4thenprint"chen alptraum: du sahst einen schlimmen"
  15. 15 ifm=4thenprint"finger, auf dich zeigend, und im hinter-";
  16. 16 ifm=4thenprint"grund das geraeusch: "z$"blblblblblblbl!"z$
  17. 17 ifm=4thenprint"seitdem befindest du dich in psychia-"
  18. 18 ifm=4thenprint"trischer behandlung bei dr. franz itten-";
  19. 19 ifm=4thenprint"steidel.":goto56
  20. 20 zf=int(19*rnd(1)):ifzf=0thenprint"lady marushka blaest dir einen. dein"
  21. 21 ifzf=0thenprint"blase-abo ist abgelaufen. ein neues ko-"
  22. 22 ifzf=0thenprint"stet 1000 eier. du zahlst...":e=e-1000:goto56
  23. 23 ifzf=1andkk=0thenprint"bluem setzte eine krankenkassenreform"
  24. 24 ifzf=1andkk=0thenprint"durch. du zahlst jetzt 500 eier zusaetz-";
  25. 25 ifzf=1andkk=0thenprint"lich im monat.":kk=1:goto56
  26. 26 ifzf=2thenprint"du kackst am helligen tag auf den geh-"
  27. 27 ifzf=2thenprint"steig. das macht dich unbeliebter bei"
  28. 28 ifzf=2thenprint"den bullen.":p=p+10:goto56
  29. 29 ifzf=3thenprint"psycho sid kommt gerade die treppe dei-"
  30. 30 ifzf=3thenprint"ner geheimen druckerei herunterge-"
  31. 31 ifzf=3thenprint"stuermt und hat einen auftrag fuer dich:";
  32. 32 ifzf=3thenprint"fuer seinen schieberring braucht er pa-"
  33. 33 ifzf=3thenprint"pierbaerte zum ankleben. dafuer kriegst"
  34. 34 ifzf=3thenprint"du 50 eier.":e=e+50:goto56
  35. 35 ifzf=4thenprint"du ersteigerst bei einer zwangsverstei-"
  36. 36 ifzf=4thenprint"gerung das aalkostuem von holzfaellers"
  37. 37 ifzf=4thenprint"vater fuer 20 eier. norman bates kauft"
  38. 38 ifzf=4thenprint"es dir fuer 10000 eier wieder ab.":e=e+9980:goto56
  39. 39 ifzf=5andd>1thenprint"eine deiner druckerpressen ist explo-"
  40. 40 ifzf=5andd>1thenprint"diert.":d=d-1:goto56
  41. 41 ifzf=6andp>19thenprint"moechtest du den polizisten 30000 eier"
  42. 42 ifzf=6andp>19thenprint"urlaubsgeld zukommen lassen (j/n)?":gosub62:goto5
  43. 43 ifzf=7thenprint"du wurdest von den bullen dabei er-"
  44. 44 ifzf=7thenprint"wischt, einen hydranten manipuliert,"
  45. 45 ifzf=7thenprint"sexuell missbraucht und dabei gekifft zu";
  46. 46 ifzf=7thenprint"haben. das macht dich bei ihnen voll un-";
  47. 47 ifzf=7thenprint"beliebt, ey!":p=p+30:goto56
  48. 48 ifzf=8thenprint"du wurdest dabei ertappt, "z$"polizei, lek-";
  49. 49 ifzf=8thenprint"kerei!"z$"-sticker gedruckt zu haben. da"
  50. 50 ifzf=8thenprint"ist der oberwachtmeister aber empoert!":p=p+20:goto56
  51. 51 ifzf=9andmu=0thenprint"du verkaufst eine uralte faelschmaschine";
  52. 52 ifzf=9andmu=0thenprint"an ein kriminalmuseum. das bringt dir"
  53. 53 ifzf=9andmu=0thenprint"10000 eier, jedoch schoepfen die bullen"
  54. 54 ifzf=9andmu=0thenprint"verdacht!":e=e-10000:d=d-1:p=p+30:mu=1:goto56
  55. 55 print"es passiert rein gar nichts."
  56. 56 gosub64:goto5
  57. 57 poke53280,0:print"[147]":forx=1to10:print,"   gewonnen, rudi!":next:forf1=1to25:forf2=1to16:poke53280,f2:next:next:new
  58. 58 poke53280,0:print"[147]du bloede pimmelfresse! du hast schulden";:print"gemacht, und das darf man nicht in die-":print"sem spiel. pech!":gosub64:run2
  59. 59 poke53280,0:print"[147]eines tages besuchen dich die bullen und";:print"nehmen dich mit. tja, du hast dich bei":print"ihnen zu unbeliebt gemacht, und dafuer":print"buchten sie dich jetzt ein. das ist das":print"ende fuer dich und deine karriere!":gosub64:run2
  60. 60 poke53280,0:print"[147]mensch, du hast doch geraume zeit ge-":print"habt, eine million zu verdienen! drei":print"jahre sind genug, denke ich. mittlerwei-";:print"le haelt dr. franz ittensteidel deinen":print"geisteszustand fuer bedenklich; er"
  61. 61 print"laesst dich in eine psychiatrische an-":print"stalt einliefern. game over!":gosub64:run2
  62. 62 gosub64:ifa$="j"thene=e-30000:p=p-20
  63. 63 return
  64. 64 geta$:ifa$=""then64
  65. 65 return
  66.