home *** CD-ROM | disk | FTP | other *** search
/ PD 64 Classic 2 / PD_64_Classic_2_2000_-_Side_A.d64 / vividos (.txt) < prev   
Commodore BASIC  |  2023-02-26  |  4KB  |  101 lines
  1. 1 poke53280,12:poke53281,0
  2. 2 gosub5000
  3. 3 print"[159]erst mal was ueber mich: [[193].[202].: [213]i !    [202]etzt geht's los ...]"
  4. 4 print"[159][205]eine [206]ame ist [205]ichael [198]ink ([206]ickname   [214]ividos) und bin 21. [205]einen [195]64"
  5. 5 print"mit [198]loppy bekam ich ... uff zu lange   her. [193]uf der [194]rotkiste hab ich mich"
  6. 6 print"mit [208]rogrammieren, [211]pielen und exzes-   sivem (aber nicht immer erfolg-"
  7. 7 print"reichen) [200]acken von [211]pielen be-         schaeftigt."
  8. 8 print"[158][215]as ist [196]ein [204]ieblingsgame ?"
  9. 9 print"[159][212]urrican 2 ([195]64), alle [204]ucas-[193]rts und   [209]uakes ([208][195])"
  10. 11 print"[158][215]as ist [196]ein [204]ieblingsmag ?"
  11. 12 print"[159]hmm ich les eigentlich nur noch e't,    frueher hab ich 64er verschlungen"
  12. 13 print"[[193].[202].: [206]a [205]ahlzeit ...]"
  13. 14 gosub9998
  14. 15 gosub5000
  15. 20 print"[158][215]elche [195]omputer hast [196]u ?"
  16. 21 print"[159][206]en [193][205][196] [203]6-2, ne aeltere [204]inux-[203]iste undnatuerlich nen [195]64"
  17. 27 print"[158][215]elche [203]onsolen hast [196]u ?"
  18. 28 print"[159]aeaeh was ist das :-)"
  19. 31 gosub9998
  20. 32 gosub5000
  21. 33 print"[158][215]as isst [196]u gerne ?"
  22. 34 print"[159][206]udeln sind immer gut, aber auch [208]izza  und so [218]eug"
  23. 37 print"[158][215]as trinkst [196]u gerne ?"
  24. 38 print"[159][195]ola oder (wenn ich net fahren muss)    [212]ouch-[196]own (!)"
  25. 39 print"[158][215]elche [205]usik hoerst [196]u ?"
  26. 40 print"[159][200]iphop, alles was so auf [202]am[198][205] kommt,   und so ein paar [193]usreisser wie"
  27. 41 print"[193]ll [211]aints und [206]o [196]oubt"
  28. 42 gosub9998
  29. 43 gosub5000
  30. 44 print"[158][215]elche [198]ilme findest [196]u gut ?"
  31. 45 print"[159][211]tar [215]ars (alle), die meisten [211]tar [212]rek und natuerlich [193]ustin [208]owers !"
  32. 46 print"[158][215]elche [211]erien ?"
  33. 47 print"[159][211]tar [212]rek (alle), [211]einfeld, [214]erlorene   [215]elt, [210]aven, [194]uffy (manchmal)"
  34. 48 print"[158][215]elche beruehmten [208]ersonen begeistern   [196]ich ?"
  35. 49 print"[159][204]inus [212]orvalds, ... sonst eigentlich    keine"
  36. 50 print"[158][215]as sind [196]eine [200]obbys ?"
  37. 51 print"[159][201]nline skaten, [208]rogrammieren, an [204]inux- [210]echnern basteln und [198]ortgehen"
  38. 52 print"[[193].[202].: [202]a, auf dass [196]u nie wiederkommen moegest !!!]"
  39. 53 gosub9998
  40. 54 gosub5000
  41. 55 print"[158][215]ie sieht [196]eine [212]raumfrau aus ?"
  42. 56 print"[159]sehr gut ;-) bleibt aber geheim [[193].[202].:  [197]r spricht ueber seine [205]om ...]"
  43. 59 print"[158][215]enn [196]u einen [211]atz sagen koenntest und  die gesamte [205]enscheit wuerde zu-"
  44. 60 print"hoeren, wie wuerde er lauten ?"
  45. 61 print"[159][201]hr habt alle gefi**kt ! *gg* [[193].[202].:    [211]elbstzensur ! [196]as [211]aupac zensiert
  46. 62 [153]"ja nix ...]"
  47. 63 [153]"sys(NULL)elche ascrage wuerdest str$u str$ir selbst     stellen ?"
  48. 64 [153]"openhmm also meistens red ich nicht mir     selber [atn.mid$.: peekei diesemclose(NULL)atzbau"
  49. 65 [153]"aber auch ...]"
  50. 66 [141]9998
  51. 67 [141]5000
  52. 68 [153]"sys(NULL)as haeltst str$u von (NULL)abletten ?"
  53. 69 [153]"opennix - nix ? - nix nix !"
  54. 72 [153]"sys- (NULL)oiletten ?"
  55. 73 [153]"openalso persoenlich finde ich sie ganz in  (NULL)rdnung ... die meisten jedenfalls"
  56. 74 [153]"sys- valtiketten ?"
  57. 75 [153]"opensinnlos bei mir"
  58. 76 [141]9998
  59. 77 [141]5000
  60. 78 [153]"sys- (NULL)igaretten ?"
  61. 79 [153]"openbaeh *hust*"
  62. 80 [153]"sys- ascischkretten ?"
  63. 81 [153]"openbitte was ? [atn.mid$.: ascischkretten ...     liess halt selbst !!!]"
  64. 82 [153]"sys(NULL)ie wichtig ist fuer str$ich atnussehen ?"
  65. 83 [153]"openwessen ? :-)"
  66. 84 [153]"also meins ist mir schon wichtig"
  67. 85 [153]"sysstr$as (NULL)ort '(NULL)amer' verbinde ich mit ..."
  68. 86 [153]"open... mir :-) ich war wohl so einer, hab  am len64 zwar rumgebastelt, -ge-"
  69. 87 [153]"spielt, -programmiert aber rausgekommen ist nie was dabei."
  70. 88 [153]"sysright$ch finde, dass (NULL)ackhuepfen ..."
  71. 89 [153]"open... eine (NULL)portart ist, der viel zuwenig atnufmerksamkeit gewidmet wird."
  72. 90 [141]9998
  73. 91 [141]5000
  74. 92 [153]"sys(NULL)enn ich an (NULL)hailand denke, dann ..."
  75. 93 [153]"open... denk ich an all die schoenen (NULL)ikro- chips, die jetzt in meinem lenomputer
  76. 94 print"hocken."
  77. 95 print"[158][205]it welcher [208]erson wuerdest [196]u [196]ich am  ehesten vergleichen ?"
  78. 96 print"a) [201]ce [212] b) [212]obi [211]chlegl c) [205]arylon     [205]anson d) [207]li [208] e) [194]oy [199]eorge"
  79. 97 print"[159]vielleicht mit [212]obi [211]chlegl: absolut    kaputt"
  80. 99 gosub9998
  81. 100 gosub5000
  82. 101 print"[158][205]it welcher [208]erson wuerdest [196]u am       liebsten auf eine [208]arty gehen ?"
  83. 102 print"a) [195]hristina [193]guilera b) [194]ritney [211]pears c) [193]nna [206]icole [211]mith d) [206]aomi"
  84. 103 print"[195]ampbell e) [211]teffi [199]raf"
  85. 104 print"[159]wenn ichs mir so recht ueberlege, mit   allen ausser [211]teffi [199]raf ;-)"
  86. 105 gosub9998
  87. 112 gosub9998
  88. 113 goto9000
  89. 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]"
  90. 5001 print"[145][159]    [208][196]64 [195]lassic [209]uestionnaire - [213][210][204]    "
  91. 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]"
  92. 5003 return
  93. 9000 poke828,0
  94. 9001 print chr$(147) chr$(17)
  95. 9002 print "load"chr$(34);"quest*";chr$(34); ",8,1
  96. 9003 [153] [199](17) [199](17) [199](17) [199](17) "run"
  97. 9004 [151]631,13:[151]632,13:[151]198,2
  98. 9005 [153] [199](19);:[128]
  99. 9998 [161]a$:[139]a$[178]""[167]9998
  100. 9999 [142]
  101.