home *** CD-ROM | disk | FTP | other *** search
/ PD 64 Classic 2 / PD_64_Classic_2_2000_-_Side_A.d64 / gonzo (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  2KB  |  52 lines
  1. 1 poke53280,12:poke53281,0
  2. 2 gosub5000
  3. 5 print"[158][215]as ist [196]ein [204]ieblingsgame ?"
  4. 6 print"[159]keines"
  5. 7 print"[158][215]elche [195]omputer hast [196]u ?"
  6. 8 print"[159]5 x [208]entium 100 - 233"
  7. 9 print"[158][215]as isst [196]u gerne ?"
  8. 10 print"[159][214]iel zuviel [[193].[202].: [198]ressack ...]"
  9. 11 print"[158][215]as trinkst [196]u gerne ?"
  10. 12 print"[159][205]ischgetraenke [[193].[202].: 50% [215]odka, 50%    [215]hiskey ...]"
  11. 13 print"[158][215]elche [205]usik hoerst [196]u ?"
  12. 14 print"[159][198]ast alles, sogar [200][197][201][206][207]"
  13. 15 print"[158][215]elche [198]ilme magst [196]u ?"
  14. 16 print"[159][202]e nach [211]timmung, nur keine             franzoesischen ..."
  15. 18 gosub9998
  16. 19 gosub5000
  17. 20 print"[158][215]elche [211]erien ?"
  18. 21 print"[159]keine"
  19. 22 print"[158][215]elche beruehmten [208]ersonen begeistern   [196]ich ?"
  20. 23 print"[159][218]uviele um sie aufzuzaehlen ..."
  21. 24 print"[158][215]as sind [196]eine [200]obbys ?"
  22. 25 print"[159][205]odellbau"
  23. 26 print"[158][215]ie sieht [196]eine [212]raumfrau aus ?"
  24. 27 print"[159][218]u gut, als dass ich die je sehen       werde ..."
  25. 28 print"[158][215]enn [196]u einen [211]atz zur gesamten [205]ensch- heit sagen koenntest und jeder"
  26. 29 print"wuerde zuhoeren, wie wuerde er lauten ?"
  27. 30 print"[159][205]acht's besser ..."
  28. 31 gosub9998
  29. 32 gosub5000
  30. 40 print"[158][215]elche [198]rage wuerdest [196]u [196]ir selbst     stellen ?"
  31. 41 print"[159][215]arum tust [196]u das alles ???"
  32. 42 print"[158][215]as haeltst [196]u von:"
  33. 43 print"- [212]abletten ?[159] manchmal wichtig"
  34. 44 print"- [212]oiletten ?[159] noetig"
  35. 45 print"- [197]tiketten ?[159] auch noetig"
  36. 46 print"- [218]igaretten ?[159] nicht noetig"
  37. 47 print"- [198]ischkretten ?[159] biologisch bedingt                      wichtig"
  38. 48 gosub9998
  39. 49 goto9000
  40. 5000 print"[147][153][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][175]"
  41. 5001 print"[145][159]   [208][196]64 [195]lassic [209]uestionnaire - [199][207][206][218][207]   "
  42. 5002 print"[145][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][183][159]"
  43. 5003 return
  44. 9000 poke828,0
  45. 9001 print chr$(147) chr$(17)
  46. 9002 print "load"chr$(34);"quest*";chr$(34); ",8,1
  47. 9003 [153] [199](17) [199](17) [199](17) [199](17) "run"
  48. 9004 [151]631,13:[151]632,13:[151]198,2
  49. 9005 [153] [199](19);:[128]
  50. 9998 [161]a$:[139]a$[178]""[167]9998
  51. 9999 [142]
  52.