home *** CD-ROM | disk | FTP | other *** search
/ Commodore Disc 47 / Commodore_Disc_47_19xx_-_de.d64 / b.schreckenstein (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  34KB  |  819 lines
  1. 0 print chr$(147)
  2. 1 print"****************************************";
  3. 2 print"*    [209][209]   burg schreckenstein          *";
  4. 3 print"*   [209]  [209]    programmiert von           *";
  5. 4 print"*  [209] [215][215] [209]       jan otto               *";
  6. 5 print"* [209]  [170]   [209]        [166]  [166]        [166]  [166]     *";
  7. 6 print"* [209]  [202][201]  [209]        [166][166][166][166]        [166][166][166][166]     *";
  8. 7 print"*  [209]      [209]       [166][166][166][166]        [166][166][166][166]     *";
  9. 8 print"*   [209]      [209]      [166][166][166][166]        [166][166][166][166]     *";
  10. 9 print"*    [209]      [209]     [166][166][166][166]        [166][166][166][166]     *";
  11. 10 print"*     [209]      [209]    [166][166][166][166]        [166][166][166][166]     *";
  12. 11 print"*      [209]      [209]   [166][166][166][166]        [166][166][166][166]     *";
  13. 12 print"*     [209]      [209]    [166][166][166][166] [166] [166] [166] [166][166][166][166][166]     *";
  14. 13 print"*    [209]      [209]     [166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166]     *";
  15. 14 print"*   [209]      [209]      [166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166]     *";
  16. 15 print"*    [209]    [209]       [166][166][166][166][166][166][213][195][201][166][166][166][166][166][166][166]     *";
  17. 16 print"*     [209]  [209]        [166][166][166][166][166][166][194] [194][166][166][166][166][166][166][166]     *";
  18. 17 print"*      [209][209]         [166][166][166][166][166][166][194] [194][166][166][166][166][166][166][166]     *";
  19. 18 print"*       [209][209]                             *";
  20. 19 print"*        [209][209]                            *";
  21. 20 print"*         [209][209]                           *";
  22. 21 print"****************************************";
  23. 22 print"s fuer start":input a$
  24. 23 if a$="s"then25
  25. 24 print"nicht moeglich":goto22
  26. 25 printchr$(147)
  27. 26 print"[144][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  28. 27 print"[144][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  29. 28 print"[144][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  30. 29 print"[191][191][191][191][191][191][219][219][219][219][219][144][191][191][191][191][191][219][219][219][219][219][144][191][191][191][191][191][219][219][219][219][219][144][191][191][191][191][191][191][191][191][191]";
  31. 30 print"[191][191][191][191][191][191][219][219][219][219][219][144][191][191][191][191][191][219][219][219][219][219][144][191][191][191][191][191][219][219][219][219][219][144][191][191][191][191][191][191][191][191][191]";
  32. 31 print"[191][191][191][191][191][191][219][219][219][219][219][144][191][191][191][191][191][219][219][219][219][219][144][191][191][191][191][191][219][219][219][219][219][144][191][191][191][191][191][191][191][191][191]";
  33. 32 print"[191][191][191][191][191][191][219][219][219][219][219][144][191][191][191][191][191][219][219][219][219][219][144][191][191][191][191][191][219][219][219][219][219][144][191][191][191][191][191][191][191][191][191]";
  34. 33 print"[191][191][191][191][191][191][219][219][219][219][219][144][191][191][191][191][191][219][219][219][219][219][144][191][191][191][191][191][219][219][219][219][219][144][191][191][191][191][191][191][191][191][191]";
  35. 34 print"[191][191][191][191][191][191][219][219][219][219][219][144][191][191][191][191][191][219][219][219][219][219][144][191][191][191][191][191][219][219][219][219][219][144][191][191][191][191][191][191][191][191][191]";
  36. 35 print"[191][191][191][191][191][191][219][219][219][219][219][144][191][191][191][191][191][219][219][219][219][219][144][191][191][191][191][191][219][219][219][219][219][144][191][191][191][191][191][191][191][191][191]";
  37. 36 print"[191][191][191][191][191][191][219][219][219][219][219][144][191][191][191][191][191][219][219][219][219][219][144][191][191][191][191][191][219][219][219][219][219][144][191][191][191][191][191][191][191][191][191]";
  38. 37 print"[191][191][191][191][191][191][219][219][219][219][219][144][191][191][191][191][191][219][219][219][219][219][144][191][191][191][191][191][219][219][219][219][219][144][191][191][191][191][191][191][191][191][191]";
  39. 38 print"[191][191][191][191][191][191][219][219][219][219][219][144][191][191][191][191][191][219][219][219][219][219][144][191][191][191][191][191][219][219][219][219][219][144][191][191][191][191][191][191][191][191][191]";
  40. 39 print"[191][191][191][191][191][191][219][219][219][219][219][144][191][191][191][191][191][219][219][219][219][219][144][191][191][191][191][191][219][219][219][219][219][144][191][191][191][191][191][191][191][191][191]";
  41. 40 print"[191][191][191][191][191][191][219][219][219][219][219][144][191][191][191][191][191][219][219][219][219][219][144][191][191][191][191][191][219][219][219][219][219][144][191][191][191][191][191][191][191][191][191]";
  42. 45 print"sie sind vor einigen zellen.vor dem ausgang steht ein soldat.vor ";
  43. 46 print"ihnen auf dem boden liegt ein schwert.sie haben die moeglichkeiten"
  44. 47 print"nimm schwert und erschlage soldat"
  45. 48 print"verhandle mit soldat"
  46. 49 print"renne an soldat vorbei"
  47. 50 print"was nun":inputa$
  48. 51 if a$="nimm schwert und erschlage soldat"then5000
  49. 52 if a$="renne an soldat vorbei"then5100
  50. 53 if a$="verhandle mit soldat"then55
  51. 54 print"nicht moeglich":goto47
  52. 55 print"der soldat sagt:wollen sie vorbei"
  53. 56 print"ja       "
  54. 57 print"nein"
  55. 58 print"antwort:":input a$
  56. 59 if a$="ja"then62
  57. 60 if a$="nein"thenprint"dann geh in deine zelle zurueck":goto5200
  58. 61 print"nicht moeglich":goto56
  59. 62 print"nur wenn sie versprechen mich nachher hier heraus zu holen"
  60. 63 print"ja"
  61. 64 print"nein"
  62. 65 print"antwort":inputa$
  63. 66 if a$="ja"then69
  64. 67 if a$="nein"thenprint"geh in deine zelle zurueck":goto5200
  65. 68 print"nicht moeglich":goto63
  66. 69 printchr$(147)
  67. 70 print"[144]                                        ";
  68. 71 print"[144]                                        ";
  69. 72 print"[144]                                        ";
  70. 73 print"[144]                                        ";
  71. 74 print"[144]                                        ";
  72. 75 print"[144]                                        ";
  73. 76 print"[144]         [215]        [219][219][219][219][219][219][219][219]              ";
  74. 77 print"[144]        [206] [205]       [219][219][219][219][219][219][219][219]              ";
  75. 78 print"[144]       [206]   [205]      [219][219][219][219][219][219][219][219]              ";
  76. 79 print"[144]      [206]     [205]     [219][219][219][219][219][219][219][219]              ";
  77. 80 print"[144]     [213][201]     [213][201]    [219][219][219][219][219][219][219][219]              ";
  78. 81 print"[144]     [202][203]     [202][203]    [219][219][219][219][219][219][219][219]              ";
  79. 82 print"[144]     [255]            [219][219][219][219][219][219][219][219]              ";
  80. 83 print"[144]                                        ";
  81. 84 print"[144]                                        ";
  82. 85 print"[144]                                        ";
  83. 86 print"[144]                                        ";
  84. 87 print"[144]               [215][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][215]      ";
  85. 88 print"[144]                [161]                [161][205]     ";
  86. 89 print"[144]                [161]                [161] [209][195][195]  ";
  87. 90 print"[144]                [161]                [161] [214]    ";
  88. 91 print"sie sind in einer folterkammer.sie haben die moeglichkeit"
  89. 92 print"norden"
  90. 93 print"sueden":input a$
  91. 94 if a$="norden"then 97
  92. 95 if a$="sueden"then 127
  93. 96 print"nicht moeglich":goto92
  94. 97 print chr$(147)
  95. 98 print"                                      [207][183]";
  96. 99 print"                                    [207][183]  ";
  97. 100 print"                                  [207][183]    ";
  98. 101 print"                                [207][183]      ";
  99. 102 print"                              [207][183]        ";
  100. 103 print"    [219][219][219][219][219][219][219]                 [207][183]          ";
  101. 104 print"    [219][219][219][219][219][219][219]               [207][183]            ";
  102. 105 print"    [219][219][219][219][219][219][219]             [207][183]              ";
  103. 106 print"    [219][219][219][219][219][219][219]           [207][183]                ";
  104. 107 print"    [219][219][219][219][219][219][219]         [207][183]                  ";
  105. 108 print"    [219][219][219][219][219][219][219]       [207][183]                    ";
  106. 109 print"    [219][219][219][219][219][219][219]     [207][183]                      ";
  107. 110 print"              [207][183]                        ";
  108. 111 print"            [207][183]                          ";
  109. 112 print"          [207][183]                            ";
  110. 113 print"        [207][183]                              ";
  111. 114 print"      [207][183]                                ";
  112. 115 print"    [207][183]                                  ";
  113. 116 print"  [207][183]                                    ";
  114. 117 print"[207][183]                                      ";
  115. 118 print"sie sind bei einer treppe.moegliche richtungen"
  116. 119 print"sueden"
  117. 120 print"hoch"
  118. 121 inputa$
  119. 122 if a$="sueden"then69
  120. 123 if a$="hoch"then157
  121. 124 print"nicht moeglich":goto119
  122. 127 printchr$(147)
  123. 128 print"[144]                                        ";
  124. 129 print"[144]                             [219][219][219][219][219][219][219][219]   ";
  125. 130 print"[144]                             [219][219][219][219][219][219][219][219]   ";
  126. 131 print"[144]                             [219][219][219][219][219][219][219][219]   ";
  127. 132 print"[144]                             [219][219][219][219][219][219][219][219]   ";
  128. 133 print"[144]                             [219][219][219][219][219][219][219][219]   ";
  129. 134 print"[144]                             [219][219][219][219][219][219][219][219]   ";
  130. 135 print"[144]                             [219][219][219][219][219][219][219][219]   ";
  131. 136 print"[144]                             [219][219][219][219][219][219][219][219]   ";
  132. 137 print"[144]        [215]   [215]                           ";
  133. 138 print"[144]        [221]   [221]                           ";
  134. 139 print"[144]        [221]   [221]                           ";
  135. 140 print"[144]        [213][201] [213][201]      [161]                    ";
  136. 141 print"[144]        [202][203] [202][203]      [161]  [206]                 ";
  137. 142 print"[144]                   [161] [206]                  ";
  138. 143 print"[144]      [175][175][175][175]     ^^^^[161][206]                   ";
  139. 144 print"[144]   [202][195][195][195][203]       [166][166][166][166][215]                    ";
  140. 145 print"[144]    [206][221][205]        [181]   [181]                    ";
  141. 146 print"[144]   [206] [221] [205]       [181]   [181]                    ";
  142. 147 print"[144]  [206]  [221]  [205]      [181]   [181]                    ";
  143. 148 print"sie sind in einer zweiten folterkammer.moegliche richtungen"
  144. 149 print"norden":inputa$
  145. 150 if a$="norden"then69
  146. 151 print"nicht moeglich":goto149
  147. 157 printchr$(147)
  148. 158 print"[191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  149. 159 print"[191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  150. 160 print"[191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  151. 161 print"[191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  152. 162 print"[191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  153. 163 print"[191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  154. 164 print"[191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  155. 165 print"[191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  156. 166 print"[191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  157. 167 print"[191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  158. 168 print"[191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  159. 169 print"[191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  160. 170 print"[191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  161. 171 print"[191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  162. 172 print"[191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  163. 173 print"[191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  164. 174 print"[191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  165. 175 print"[191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  166. 176 print"[191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  167. 177 print"sie sind auf dem gefaengnishof.der henker spricht sie an";
  168. 178 print":ah es gibt arbeit fuer mich.sie muessen schnell handeln.vor ihnen ";
  169. 180 print"liegt eine armbrust.ihre moeglichkeiten"
  170. 181 print"erschiesse henker mit armbrust":input a$
  171. 182 if a$="erschiesse henker mit armbrust"then184
  172. 183 print"nicht moeglich":goto181
  173. 184 print"der henker ist tot.moegliche richtungen"
  174. 185 print"runter"
  175. 186 print"norden"
  176. 187 print"sueden"
  177. 188 inputa$
  178. 189 if a$="runter"then97
  179. 190 if a$="norden"then193
  180. 191 if a$="sueden"then223
  181. 192 print"nicht moeglich":goto185
  182. 193 printchr$(147)
  183. 194 print"[144][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165]";
  184. 195 print"[144][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165]";
  185. 196 print"[144][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165]";
  186. 197 print"[144][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165]";
  187. 198 print"[144][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165]";
  188. 199 print"[144][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165]";
  189. 200 print"[144][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165]";
  190. 201 print"[144][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165]";
  191. 202 print"[144][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165]";
  192. 203 print"[144][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165]";
  193. 204 print"[144][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165]";
  194. 205 print"[144][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165]";
  195. 206 print"[144][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165]";
  196. 207 print"[144][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165]";
  197. 208 print"[144][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165]";
  198. 209 print"[144][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165]";
  199. 210 print"[144][165][165][165][165][165][165][205]   [206][165][165][165][165][165][165][205]   [206][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165]";
  200. 212 print"[144][165][165][165][165][165][165][165][205] [206][165][165][165][165][165][165][165][165][205] [206][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165]";
  201. 213 print"[144][165][165][165][165][165][165][165][165][214][165][165][165][165][165][165][165][165][165][165][214][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165]";
  202. 214 print"[144][165][165][165][165][165][165][165][206] [205][165][165][165][165][165][165][165][165][206] [205][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165][165]";
  203. 215 print"sie sind im stall.moegliche richtungen"
  204. 216 print"norden"
  205. 217 print"sueden"
  206. 218 input a$
  207. 219 if a$="sueden"then157
  208. 220 if a$="norden"then5300
  209. 221 print"nicht moeglich":goto216
  210. 223 printchr$(147)
  211. 224 print"[153][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166]";
  212. 225 print"[153][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166]";
  213. 226 print"[153][166][166][166][166][166][166][166][166][166][166][205][166][166][166][166][166][166][166][166][166][206][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166]";
  214. 227 print"[153][166][166][166][166][166][166][166][166][166][166][166][205][166][206][166][166][166][205][166][206][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166]";
  215. 228 print"[153][166][166][166][166][166][166][166][166][166][166][166][166][214][166][166][166][166][166][214][166][166][166][166][166][207][183][183][208][166][166][166][166][166][166][166][166][166][166][166][166]";
  216. 229 print"[153][166][166][166][166][166][166][166][166][166][166][166][206][166][205][166][166][166][206][166][205][166][166][166][166][180][193][193][170][166][166][166][166][166][166][166][166][166][166][166][166]";
  217. 230 print"[153][166][166][166][166][166][166][166][166][166][166][166][166][166][166][205][166][206][166][166][166][166][166][166][166][165][218][218][170][166][166][166][166][166][166][166][166][166][166][166][166]";
  218. 231 print"[153][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][214][166][166][166][166][166][166][166][166][165][211][211][170][166][166][166][166][166][166][166][166][166][166][166][166]";
  219. 232 print"[153][166][166][166][166][166][166][166][166][166][166][166][166][166][166][206][166][205][166][166][166][166][166][166][166][205]  [206][166][166][166][166][166][166][166][166][166][166][166][166]";
  220. 233 print"[153][166][166][166][166][166][166][166][166][166][166][166][166][166][206][166][166][166][205][166][166][166][166][166][166][166][205][206][166][166][166][166][166][166][166][166][166][166][166][166][166]";
  221. 234 print"[153][166][166][166][166][166][166][166][166][166][166][166][166][206][166][166][166][166][166][205][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166]";
  222. 235 print"[153][166][166][166][166][166][166][166][166][166][166][166][206][166][166][166][166][166][166][166][205][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166]";
  223. 236 print"[153][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166]";
  224. 237 print"[153][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166]";
  225. 238 print"[153][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166]";
  226. 239 print"[153][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166]";
  227. 240 print"[153][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166]";
  228. 241 print"[153][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166]";
  229. 242 print"[153][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166]";
  230. 243 print"[153][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166]";
  231. 244 print"sie sind in der ruestkammer.moegliche richtungen"
  232. 245 print"norden"
  233. 246 print"sueden"
  234. 247 inputa$
  235. 248 if a$="norden"then157
  236. 249 if a$="sueden"then251
  237. 250 print"nicht moeglich":goto245
  238. 251 printchr$(147)
  239. 252 print"[215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215]";
  240. 253 print"[215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215]";
  241. 254 print"[215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215]";
  242. 255 print"[215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215]";
  243. 256 print"[215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215]";
  244. 257 print"[215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215]";
  245. 258 print"[215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215]";
  246. 259 print"[215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215]";
  247. 260 print"[215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215]";
  248. 261 print"[215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215]";
  249. 262 print"[215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215]";
  250. 263 print"[215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215]";
  251. 264 print"[215][215][215][215][215][215][165][167][215][215][215][165][167][215][215][215][165][167][215][215][215][165][167][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215]";
  252. 265 print"[215][215][215][215][215][215][204][186][215][215][215][204][186][215][215][215][204][186][215][215][215][204][186][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215]";
  253. 266 print"[215][215][215][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215]";
  254. 267 print"[215][215][215][161][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215][161][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215]";
  255. 268 print"[215][215][215][161][215][215][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][215][215][161][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215]";
  256. 269 print"[215][215][215][161][215][215][181][215][215][215][215][215][215][215][215][215][215][215][215][215][215][182][215][215][161][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215]";
  257. 270 print"[215][215][215][161][215][215][181][215][215][215][215][215][215][215][215][215][215][215][215][215][215][182][215][215][161][215][215][215][215][215][215][215][215][215][215][215][215][215][215][215]";
  258. 271 print"sie sind im speisesaal der soldaten.ihre moeglichkeiten"
  259. 272 print"osten"
  260. 273 print"westen"
  261. 274 print"norden"
  262. 275 input a$
  263. 276 if a$="norden"then223
  264. 277 if a$="osten"then280
  265. 278 if a$="westen"then310
  266. 279 print"nicht moeglich":goto276
  267. 280 printchr$(147)
  268. 281 print"[152][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223]";
  269. 282 print"[152][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223]";
  270. 283 print"[152][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223]";
  271. 284 print"[152][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223]";
  272. 285 print"[152][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223]";
  273. 286 print"[152][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223]";
  274. 287 print"[152][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223]";
  275. 288 print"[152][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223]";
  276. 289 print"[152][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223]";
  277. 290 print"[152][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223]";
  278. 291 print"[152][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223]";
  279. 292 print"[152][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223]";
  280. 293 print"[152][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223]";
  281. 294 print"[152][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223]";
  282. 295 print"[152][169][223][169][223][166][166][166][166][166][166][166][166][166][166][166][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223][169][223]";
  283. 296 print"[152][169][223][169][223][166][166][166][166][166][166][166][166][166][166][166][223][169][223][169][223][169][223][204][175][175][186][169][223][169][202][203][223][169][202][203][223][169][223][169][223]";
  284. 297 print"[152][169][223][169][223][166][166][166][144]     [152][166][166][166][223][169][223][169][223][169][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][223][169][223]";
  285. 298 print"[152][169][223][169][223][166][166][166][144]     [152][166][166][166][223][169][223][169][223][169][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][223][169][223]";
  286. 299 print"[152][169][223][169][223][166][166][166][209][209][209][209][209][166][166][166][223][169][223][169][223][169][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][223][169][223]";
  287. 300 print"[152][169][223][169][223][166][166][166][166][166][166][166][166][166][166][166][223][169][223][169][223][169][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][223][169][223]";
  288. 301 print"sie sind in der kueche.moegliche richtungen"
  289. 302 print"westen"
  290. 303 print"osten"
  291. 304 input a$
  292. 305 if a$="osten"then340
  293. 306 if a$="westen"then251
  294. 307 print"nicht moeglich":goto302
  295. 310 printchr$(147)
  296. 311 print"[209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215]";
  297. 312 print"[209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215]";
  298. 313 print"[209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215]";
  299. 314 print"[209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215]";
  300. 315 print"[209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215]";
  301. 316 print"[209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215]";
  302. 317 print"[209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215]";
  303. 318 print"[209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215]";
  304. 319 print"[209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215]";
  305. 320 print"[209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215]";
  306. 321 print"[209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215]";
  307. 322 print"[209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215]";
  308. 323 print"[209][215][209][215][161][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][161][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215]";
  309. 324 print"[209][215][209][215][161][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][161][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215]";
  310. 325 print"[209][215][209][215][161][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][161][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215]";
  311. 326 print"[209][215][209][215][161][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][161][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215]";
  312. 327 print"[209][215][209][215][161][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][161][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215]";
  313. 328 print"[209][215][209][215][161][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][161][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215]";
  314. 329 print"[209][215][209][215][161][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][161][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215]";
  315. 330 print"[209][215][209][215][161][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][161][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215][209][215]";
  316. 331 print"sie sind im schlafsaal der soldaten.moegliche richtungen"
  317. 332 print"osten"
  318. 333 print"sueden"
  319. 334 input a$
  320. 335 if a$="osten"then252
  321. 336 if a$="sueden"then5400
  322. 337 print"nicht moeglich":goto332
  323. 340 print chr$(147)
  324. 341 print"[158][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216]";
  325. 342 print"[158][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216]";
  326. 343 print"[158][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216]";
  327. 344 print"[158][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216]";
  328. 345 print"[158][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216]";
  329. 346 print"[158][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216]";
  330. 347 print"[158][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216]";
  331. 348 print"[158][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216]";
  332. 349 print"[158][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][255][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][255][216]";
  333. 350 print"[158][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216]";
  334. 351 print"[158][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216]";
  335. 352 print"[158][218][216][218][216][218][209][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][209][218][216][218][216]";
  336. 353 print"[158][218][216][218][216][218][161][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][161][218][216][218][216]";
  337. 354 print"[158][218][216][218][216][218][161][218][216][218][216][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][218][216][218][216][218][161][218][216][218][216]";
  338. 355 print"[158][218][216][218][216][218][161][218][216][218][216][218][182][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][181][216][218][216][218][216][218][161][218][216][218][216]";
  339. 356 print"[158][218][216][218][216][218][161][218][216][218][216][218][182][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][181][216][218][216][218][216][218][161][218][216][218][216]";
  340. 357 print"[158][218][216][218][216][218][161][162][162][162][162][218][182][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][181][216][218][162][162][162][162][161][218][216][218][216]";
  341. 358 print"[158][218][216][218][216][218][161][218][216][218][161][218][182][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][181][216][218][161][218][216][218][161][218][216][218][216]";
  342. 359 print"[158][218][216][218][216][218][161][218][216][218][161][218][182][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][181][216][218][161][218][216][218][161][218][216][218][216]";
  343. 360 print"[158][218][216][218][216][218][161][218][216][218][161][218][182][218][216][218][216][218][216][218][216][218][216][218][216][218][216][218][216][181][216][218][161][218][216][218][161][218][216][218][216]";
  344. 361 print"sie sind im speiseraum des lords.moegliche richtungen"
  345. 362 print"westen"
  346. 363 print"norden"
  347. 364 print"osten"
  348. 365 input a$
  349. 366 if a$="westen"then280
  350. 367 if a$="norden"then370
  351. 368 if a$="osten"then400
  352. 369 print"nicht moeglich":goto362
  353. 370 printchr$(147)
  354. 371 print"[156][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211]";
  355. 372 print"[156][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211]";
  356. 373 print"[156][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211]";
  357. 374 print"[156][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211]";
  358. 375 print"[156][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211]";
  359. 376 print"[156][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211]";
  360. 377 print"[156][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211]";
  361. 378 print"[156][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211]";
  362. 379 print"[156][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211]";
  363. 380 print"[156][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211]";
  364. 381 print"[156][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211]";
  365. 382 print"[156][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211]";
  366. 383 print"[156][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211]";
  367. 384 print"[156][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211]";
  368. 385 print"[156][211][211][211][211][211][211][209][211][211][211][211][211][211][211][211][211][211][211][211][211][209][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211]";
  369. 386 print"[156][211][211][211][211][211][211][182][211][211][211][211][211][211][211][211][211][211][211][211][211][181][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211]";
  370. 387 print"[156][211][211][211][211][211][211][182][162][162][162][162][162][162][162][162][162][162][162][162][162][181][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211][211]";
  371. 388 print"[156][211][211][211][211][211][211][182][184][184][184][184][184][184][184][184][184][184][184][184][184][181][211][211][211][207][183][183][183][183][208][211][211][211][211][211][211][211][211][211][211]";
  372. 389 print"[156][211][211][211][211][211][211][182][211][211][211][211][211][211][211][211][211][211][211][211][211][181][211][211][211][165][209][215][215][209][167][211][211][211][211][211][211][211][211][211][211]";
  373. 390 print"[156][211][211][211][211][211][211][182][211][211][211][211][211][211][211][211][211][211][211][211][211][181][211][211][211][165]    [167][211][211][211][211][211][211][211][211][211][211]";
  374. 391 print"sie sind im schlafzimmer des lords.moegliche richtungen"
  375. 392 print"sueden"
  376. 393 print"norden"
  377. 394 input a$
  378. 395 if a$="sueden"then340
  379. 396 if a$="norden"then430
  380. 397 print"nicht moeglich":goto292
  381. 400 printchr$(147)
  382. 401 print"[214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214]";
  383. 402 print"[214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214]";
  384. 403 print"[214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214]";
  385. 404 print"[214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214]";
  386. 405 print"[214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214]";
  387. 406 print"[214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214]";
  388. 407 print"[214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214]";
  389. 408 print"[214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][207][183][183][208][214][214][214][214][214][214][214][214][214][214][214][214][214][214]";
  390. 409 print"[214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][165][213][201][167][214][214][214][214][214][214][214][214][214][214][214][214][214][214]";
  391. 410 print"[214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][165][202][203][167][214][214][214][214][214][214][214][214][214][214][214][214][214][214]";
  392. 411 print"[214][214][214][214][214][214][214][214][214][214][214][209][214][214][214][209][214][214][214][214][214][214][165][218][218][167][214][214][214][214][214][214][214][214][214][214][214][214][214][214]";
  393. 412 print"[214][214][214][214][214][214][214][214][214][214][214][207][183][183][183][208][214][214][214][214][214][214][165][215][215][167][214][214][214][214][214][214][214][214][214][214][214][214][214][214]";
  394. 413 print"[214][214][214][214][214][214][214][214][214][214][214][165] [211] [167][214][214][214][214][214][214][205][206][205][206][214][214][214][214][214][214][214][214][214][214][214][214][214][214]";
  395. 414 print"[214][214][214][214][214][214][214][214][214][214][214][165] [211] [167][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214]";
  396. 415 print"[214][214][214][214][214][214][214][214][214][214][215]     [215][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214]";
  397. 416 print"[214][214][214][214][214][214][214][214][214][214][182][162][162][162][162][162][181][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214]";
  398. 417 print"[214][214][214][214][214][214][214][214][214][214][182]     [181][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214]";
  399. 418 print"[214][214][214][214][214][214][214][214][214][214][182]     [181][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214]";
  400. 419 print"[214][214][214][214][214][214][214][214][214][214][164][164][164][164][164][164][164][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214]";
  401. 420 print"[214][214][214][214][214][214][214][214][214][214]       [214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214][214]";
  402. 421 print"sie sind im audienzsaal.moegliche richtungen"
  403. 422 print"westen"
  404. 423 print"norden"
  405. 424 inputa$
  406. 425 if a$="norden"then460
  407. 426 if a$="westen"then341
  408. 427 print"nicht moeglich":goto422
  409. 430 printchr$(147)
  410. 431 print"[144]* * * * * * * * * * * * * * * * * * * * ";
  411. 432 print"[144] * * * * * * * * * * * * * * * * * * * *";
  412. 433 print"[144]* * * * * * * * * * * * * * * * * * * * ";
  413. 434 print"[144] * * * * * * * * * * * * * * * * * * * *";
  414. 435 print"[144]* * * * * * * * * * * * * * * * * * * * ";
  415. 436 print"[144] * * * * * * * * * * * * * * * * * * * *";
  416. 437 print"[144]* * * * * * * * * * * * * * * * * * * * ";
  417. 438 print"[144] * * * * * * * * * * * * * * * * * * * *";
  418. 439 print"[144]* * * * * * * * * * * * * * * * * * * * ";
  419. 440 print"[144] * * * * * * * * * * * * * * * * * * * *";
  420. 441 print"[144]* * * * * * * * * * * * * * * * * * * * ";
  421. 442 print"[144] * * * * * * * * * * * * * * * * * * * *";
  422. 443 print"[144]* * * * * * * * * * * * * * * * * * * * ";
  423. 444 print"[144] * * * * * * * * * * * * * * * * * * * *";
  424. 445 print"[144]* * * * *[215]* * * * * * * [215] * * * * * * * ";
  425. 446 print"[144] * * * * [182] * * * * * * *[181]* * * * * * * *";
  426. 447 print"[144]* * * * *[182][162][162][162][162][162][162][162][162][162][162][162][162][162][162][181] * * * * * * * ";
  427. 448 print"[144] * * * * [182][184][184][184][184][184][184][184][184][184][184][184][184][184][184][181]* * * * * * * *";
  428. 449 print"[144]* * * * *[182]* * * * * * * [181] * * * * * * * ";
  429. 450 print"[144] * * * * [182] * * * * * * *[181]* * * * * * * *";
  430. 451 print"sie sind im gaestezimmer.ihre moeglichkeiten"
  431. 452 print"norden"
  432. 453 input a$
  433. 454 if a$="norden"then370
  434. 455 print"nicht moeglich":goto452
  435. 460 printchr$(147)
  436. 461 print"[158][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216]";
  437. 462 print"[158][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216]";
  438. 463 print"[158][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216]";
  439. 464 print"[158][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216]";
  440. 465 print"[158][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216]";
  441. 466 print"[158][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216]";
  442. 467 print"[158][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216]";
  443. 468 print"[158][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216]";
  444. 469 print"[158][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216]";
  445. 470 print"[158][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216]";
  446. 471 print"[158][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216]";
  447. 472 print"[158][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216]";
  448. 473 print"[158][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216]";
  449. 474 print"[158][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216]";
  450. 475 print"[158][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216]";
  451. 476 print"[158][193][211][218][216][193][211][218][216][193][220][218][215][193][211][218][209][193][211][218][220][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216]";
  452. 477 print"[158][193][211][218][216][193][211][218][216][193][166][166][166][166][166][166][166][166][166][166][166][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216]";
  453. 478 print"[158][193][211][218][216][193][211][218][216][193][220][218][216][193][211][218][216][193][211][218][220][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216]";
  454. 479 print"[158][193][211][218][216][193][211][218][216][193][220][218][216][193][211][218][216][193][211][218][220][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216]";
  455. 480 print"[158][193][211][218][216][193][211][218][216][193][220][218][216][193][211][218][216][193][211][218][220][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216][193][211][218][216]";
  456. 481 print"sie sind im spielzimmer.moegliche richtungen"
  457. 482 print"sueden"
  458. 483 print"osten"
  459. 484 inputa$
  460. 485 if a$="sueden"then400
  461. 486 if a$="osten"then5500
  462. 487 if a$="westen"then490
  463. 488 print"nicht moeglich":goto482
  464. 490 printchr$(147)
  465. 491 print"[156][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201]";
  466. 492 print"[156][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203]";
  467. 493 print"[156][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201]";
  468. 494 print"[156][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203]";
  469. 495 print"[156][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201]";
  470. 496 print"[156][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203]";
  471. 497 print"[156][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201]";
  472. 498 print"[156][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203]";
  473. 499 print"[156][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201]";
  474. 500 print"[156][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203]";
  475. 501 print"[156][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201]";
  476. 502 print"[156][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203]";
  477. 503 print"[156][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201]";
  478. 504 print"[156][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203]";
  479. 505 print"[156][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201]";
  480. 506 print"[156][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203]";
  481. 507 print"[156][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201]";
  482. 508 print"[156][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203]";
  483. 509 print"[156][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201][213][201]";
  484. 510 print"[156][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203][202][203]";
  485. 511 print"sie sind in der empfangshalle. moegliche richtungen"
  486. 512 print"osten"
  487. 513 print"westen"
  488. 514 print"norden"
  489. 515 print"sueden"
  490. 516 input a$
  491. 517 if a$="osten"then460
  492. 518 if a$="westen"then5600
  493. 519 if a$="norden"then522
  494. 520 if a$="sueden"then552
  495. 521 print"nicht moeglich":goto512
  496. 522 printchr$(147)
  497. 523 print"[152][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  498. 524 print"[152][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  499. 525 print"[152][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  500. 526 print"[152][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  501. 527 print"[152][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  502. 528 print"[152][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  503. 529 print"[152][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  504. 530 print"[152][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  505. 531 print"[152][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  506. 532 print"[152][191][191][191][191][191][191][191][206][163][163][163][205][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  507. 533 print"[152][191][191][191][191][191][191][206]     [205][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  508. 534 print"[152][191][191][191][191][191][206]       [205][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  509. 535 print"[152][191][191][191][191][191][163][163][163][163][163][163][163][163][163][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  510. 536 print"[152][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  511. 537 print"[152][191][191][191][191][191][144][191][191][191][191][191][191][191][191][152][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  512. 538 print"[152][191][191][191][191][191][144][191][191][191][191][191][191][191][191][152][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  513. 539 print"[152][191][191][191][191][191][144][191][191][191][191][191][191][191][191][152][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  514. 540 print"[152][191][191][191][191][191][144][191][191][191][191][191][191][191][191][152][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  515. 541 print"[152][191][191][191][191][191][144][191][191][191][191][191][191][191][191][152][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  516. 542 print"[152][191][191][191][191][191][144][191][191][191][191][191][191][191][191][152][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  517. 543 print"sie sind in der schmiede.von jetzt an koennen sie nicht mehr zurueck"
  518. 544 print"osten"
  519. 545 print"westen"
  520. 546 input a$
  521. 547 if a$="osten"then582
  522. 548 if a$="westen"then6000
  523. 549 print"nicht moeglich":goto544
  524. 552 printchr$(147)
  525. 553 print"[202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201]";
  526. 554 print"[202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201]";
  527. 555 print"[202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201]";
  528. 556 print"[202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201]";
  529. 557 print"[202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201]";
  530. 558 print"[202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201]";
  531. 559 print"[202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201]";
  532. 560 print"[202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201]";
  533. 561 print"[202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201]";
  534. 562 print"[202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201]";
  535. 563 print"[202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201]";
  536. 564 print"[202][201][202][201][202][201][202][201][202][201][202][194][202][201][202][194][202][201][202][194][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201]";
  537. 565 print"[202][201][202][201][202][201][202][201][202][201][202][219][202][201][202][219][202][201][202][219][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201]";
  538. 566 print"[202][201][202][201][202][201][202][201][202][201][202][200][202][201][202][194][202][201][202][194][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201]";
  539. 567 print"[202][201][202][201][202][201][202][201][202][201][202][194][202][201][202][194][202][201][202][194][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201]";
  540. 568 print"[202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][194][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201]";
  541. 569 print"[202][201][202][201][202][201][202][201][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201]";
  542. 570 print"[202][201][202][201][202][201][202][201][202][201][161][201][202][201][202][201][202][201][202][201][202][201][202][161][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201]";
  543. 571 print"[202][201][202][201][202][201][202][201][202][201][161][201][202][201][202][201][202][201][202][201][202][201][202][161][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201]";
  544. 572 print"[202][201][202][201][202][201][202][201][202][201][161][201][202][201][202][201][202][201][202][201][202][201][202][161][202][201][202][201][202][201][202][201][202][201][202][201][202][201][202][201]";
  545. 573 print"sie sind im raum des arztes von der burg schreckenstein."
  546. 574 print"hoch"
  547. 575 print"westen"
  548. 576 input a$
  549. 578 if a$="hoch"then6100
  550. 579 if a$="westen"then7000
  551. 580 print"nicht moeglich":goto574
  552. 582 printchr$(147)
  553. 583 print"                                        ";
  554. 584 print"                                        ";
  555. 585 print"                                        ";
  556. 586 print"                                        ";
  557. 587 print"                                        ";
  558. 588 print"                                        ";
  559. 589 print"                                        ";
  560. 590 print"                                        ";
  561. 591 print"                                        ";
  562. 592 print"                                        ";
  563. 593 print"                                        ";
  564. 594 print"                                        ";
  565. 595 print"                                        ";
  566. 596 print"                                        ";
  567. 597 print"[144]                                        ";
  568. 598 print"[144]                                        ";
  569. 599 print"[144]                                        ";
  570. 600 print"[144]                                        ";
  571. 601 print"[144]                                        ";
  572. 602 print"[144]                                        ";
  573. 603 print"[146]sie sind auf einem turnierplatz."
  574. 604 print"norden"
  575. 605 print"runter"
  576. 606 input a$
  577. 607 if a$="norden"then610
  578. 608 if a$="runter"then6200
  579. 609 print"nicht moeglich":goto604
  580. 610 printchr$(147)
  581. 611 print"[152][191][191][191][191]    [191][191][191][191]    [191][191][191][191]    [191][191][191][191]    [191][191][191][191]    ";
  582. 612 print"[152][191][191][191][191]    [191][191][191][191]    [191][191][191][191]    [191][191][191][191]    [191][191][191][191]    ";
  583. 613 print"[152][191][191][191][191]    [191][191][191][191]    [191][191][191][191]    [191][191][191][191]    [191][191][191][191]    ";
  584. 614 print"[152][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  585. 615 print"[152][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  586. 616 print"[191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][219][219][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  587. 617 print"[191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][219][219][219][219][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  588. 618 print"[191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][219][219][219][219][219][219][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  589. 619 print"[191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][219][219][219][219][219][219][219][219][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  590. 620 print"[191][191][191][191][191][191][191][191][191][191][191][191][191][191][219][219][219][219][219][219][219][219][219][219][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  591. 621 print"[191][191][191][191][191][191][191][191][191][191][191][191][191]            [191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  592. 622 print"[191][191][191][191][191][191][191][191][191][191][191][191]              [191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  593. 623 print"[191][191][191][191][191][191][191][191][191][191][191]                [191][191][191][191][191][191][191][191][191][191][191][191][191]";
  594. 624 print"[191][191][191][191][191][191][191][191][191][191][191]                [191][191][191][191][191][191][191][191][191][191][191][191][191]";
  595. 625 print"[191][191][191][191][191][191][191][191][191][191][191]                [191][191][191][191][191][191][191][191][191][191][191][191][191]";
  596. 626 print"[191][191][191][191][191][191][191][191][191][191][191]                [191][191][191][191][191][191][191][191][191][191][191][191][191]";
  597. 627 print"[191][191][191][191][191][191][191][191][191][191][191]                [191][191][191][191][191][191][191][191][191][191][191][191][191]";
  598. 628 print"[191][191][191][191][191][191][191][191][191][191][191]                [191][191][191][191][191][191][191][191][191][191][191][191][191]";
  599. 629 print"[191][191][191][191][191][191][191][191][191][191][191]                [191][191][191][191][191][191][191][191][191][191][191][191][191]";
  600. 630 print"[191][191][191][191][191][191][191][191][191][191][191]                [191][191][191][191][191][191][191][191][191][191][191][191][191]";
  601. 631 print"[191][191][191][191][191][191][191][191][191][191][191]                [191][191][191][191][191][191][191][191][191][191][191][191][191]";
  602. 632 print"[191][191][191][191][191][191][191][191][191][191][191]                [191][191][191][191][191][191][191][191][191][191][191][191][191]";
  603. 633 print"w fuer weiter"
  604. 634 input a$
  605. 635 if a$="w"then700
  606. 636 print"nicht moeglich":goto634
  607. 700 printchr$(147)
  608. 701 print"hinter welcher zahl ist lord dragen 1-100 sie haben einen versuch"
  609. 702 nm=int(100*rnd(1))+1
  610. 703 cn=0
  611. 704 input"welche zahl";gu
  612. 705 cn=cn+1
  613. 706 if gu>nmthen800
  614. 707 if gu=nmthen10000
  615. 800 printchr$(147)
  616. 801 print"[144]sie haetten es fast geschaft.lord dragen hat sie mit seinem";
  617. 802 print"schwert erschlagen"
  618. 803 print"b fuer neubeginn"
  619. 804 input a$
  620. 805 if a$="b"then0
  621. 806 print"nicht moeglich":goto5621
  622. 5000 si=54272:fl=si:fh=si+1:tl=si+2:th=si+3:w=si+4:a=si+5:h=si+6:l=si+24
  623. 5001 pokel,15:poketh,15:poketl,15:pokea,0*16+0:pokeh,15*16
  624. 5002 pokew,65
  625. 5003 forx=250to0step-2:pokefh,40:pokefl,x:next
  626. 5004 forx=150to0step-4:pokefh,40:pokefl,x:next
  627. 5005 pokew,0
  628. 5006 printchr$(147)
  629. 5007 print"              [209][209]                        ";
  630. 5008 print"              [209][209]                        ";
  631. 5009 print"              [209][209]                        ";
  632. 5010 print"       [209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209]                 ";
  633. 5011 print"       [209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209]                 ";
  634. 5012 print"              [209][209]                        ";
  635. 5013 print"              [209][209]                        ";
  636. 5014 print"              [209][209]                        ";
  637. 5015 print"              [209][209]                        ";
  638. 5016 print"              [209][209]                        ";
  639. 5017 print"              [209][209]                        ";
  640. 5018 print"              [209][209]                        ";
  641. 5019 print"              [209][209]                        ";
  642. 5020 print"              [209][209]                        ";
  643. 5021 print"              [209][209]                        ";
  644. 5022 print"              [209][209]                        ";
  645. 5023 print"              [209][209]                        ";
  646. 5024 print"              [209][209]                        ";
  647. 5025 print"              [209][209]                        ";
  648. 5026 print"b fuer neubeginn":inputa$
  649. 5027 if a$="b"then0
  650. 5028 print"nicht moeglich":goto5026
  651. 5100 printchr$(147)
  652. 5101 print"****************************************";
  653. 5102 print"*          [209][209]        der soldat        *";
  654. 5103 print"*         [209]  [209]       hat sie zu        *";
  655. 5104 print"*        [209] [215][215] [209]      dem henker        *";
  656. 5105 print"*       [209]  [182]   [209]     gebracht          *";
  657. 5106 print"*       [209]  [202][203]  [209]     der sie           *";
  658. 5107 print"*        [209]      [209]    sofort            *";
  659. 5108 print"*         [209]      [209]   exikutiert        *";
  660. 5109 print"*          [209]      [209]  hat               *";
  661. 5110 print"*           [209]      [209] aber              *";
  662. 5111 print"*          [209]      [209]  troesten          *";
  663. 5112 print"*         [209]      [209]   sie sich          *";
  664. 5113 print"*        [209]      [209]    jetzt             *";
  665. 5114 print"*       [209]      [209]     koennen           *";
  666. 5115 print"*        [209]    [209]      sie hugo          *";
  667. 5116 print"*         [209]  [209]       dem schlos        *";
  668. 5117 print"*          [209][209]        gespenst          *";
  669. 5118 print"*           [209][209]       gesell-           *";
  670. 5119 print"*            [209][209]      schaft            *";
  671. 5120 print"*             [209][209]     leisten           *";
  672. 5121 print"****************************************";
  673. 5122 print"b fuer neubeginn":input a$
  674. 5123 if a$="b"then0
  675. 5124 print"nicht moeglich":goto5122
  676. 5200 printchr$(147)
  677. 5201 print"[191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  678. 5202 print"[191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  679. 5203 print"[191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  680. 5204 print"[191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  681. 5205 print"[191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  682. 5206 print"[191][191][191][191][191][191][191][191][191][191][191][191][219][219][219][219][219][219][219][219][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  683. 5207 print"[191][191][191][191][191][191][191][191][191][191][191][191][219][219][219][219][219][219][219][219][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  684. 5208 print"[191][191][191][191][191][191][191][191][191][191][191][191][219][219][219][219][219][219][219][219][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  685. 5209 print"[191][191][191][191][191][191][191][191][191][191][191][191][219]sie[219][219][219][219][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  686. 5210 print"[191][191][191][191][191][191][191][191][191][191][191][191][219]sind[219][219][219][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  687. 5211 print"[191][191][191][191][191][191][191][191][191][191][191][191][219]wieder[219][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  688. 5212 print"[191][191][191][191][191][191][191][191][191][191][191][191][219]in[219][219][219][219][219][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  689. 5213 print"[191][191][191][191][191][191][191][191][191][191][191][191][219]ihrer[219][219][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  690. 5214 print"[191][191][191][191][191][191][191][191][191][191][191][191][219]zelle[219][219][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  691. 5215 print"[191][191][191][191][191][191][191][191][191][191][191][191][219][219][219][219][219][219][219][219][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  692. 5216 print"[191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  693. 5217 print"[191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  694. 5218 print"[191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  695. 5219 print"[191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  696. 5220 print"[191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  697. 5221 print"b fuer neubeginn":input a$
  698. 5222 if a$="b"then0
  699. 5223 print"nicht moeglich":goto5122
  700. 5300 printchr$(147)
  701. 5301 print"[144]                [209][209][144]                      ";
  702. 5302 print"[144]                [209][209][144]                      ";
  703. 5303 print"[144]                [209][209][144]                      ";
  704. 5304 print"[144]          [209]zertrampelt[209]von[144]              ";
  705. 5305 print"[144]          [209]einem[209]pferd[209][209][209][209][144]              ";
  706. 5306 print"[144]                [209][209][144]                      ";
  707. 5307 print"[144]                [209][209][144]                      ";
  708. 5308 print"[144]                [209][209][144]                      ";
  709. 5309 print"[144]                [209][209][144]                      ";
  710. 5310 print"[144]                [209][209][144]                      ";
  711. 5311 print"[144]                [209][209][144]                      ";
  712. 5312 print"[144]                [209][209][144]                      ";
  713. 5313 print"[144]                [209][209][144]                      ";
  714. 5314 print"[144]                [209][209][144]                      ";
  715. 5315 print"[144]                [209][209][144]                      ";
  716. 5316 print"[144]                [209][209][144]                      ";
  717. 5317 print"[144]                [209][209][144]                      ";
  718. 5318 print"[144]                [209][209][144]                      ";
  719. 5319 print"[144]                [209][209][144]                      ";
  720. 5320 print"[144]                [209][209][144]                      ";
  721. 5321 print"b fuer neubeginn":input a$
  722. 5322 if a$="b"then0
  723. 5323 print"nicht moeglich":goto5321
  724. 5400 printchr$(147)
  725. 5401 print"[191][191][191][191][191][191][191][165]                    [167][191][191][191][191][191][191][191][191][191][191][191]";
  726. 5402 print"[191][191][191][191][191][191][191][165] sie fielen in eine [167][191][191][191][191][191][191][191][191][191][191][191]";
  727. 5403 print"[191][191][191][191][191][191][191][165] fallgrube und      [167][191][191][191][191][191][191][191][191][191][191][191]";
  728. 5404 print"[191][191][191][191][191][191][191][165] wurden von den     [167][191][191][191][191][191][191][191][191][191][191][191]";
  729. 5405 print"[191][191][191][191][191][191][191][165] in den boden       [167][191][191][191][191][191][191][191][191][191][191][191]";
  730. 5406 print"[191][191][191][191][191][191][191][165] gesteckten         [167][191][191][191][191][191][191][191][191][191][191][191]";
  731. 5407 print"[191][191][191][191][191][191][191][165] spiessen erstochen [167][191][191][191][191][191][191][191][191][191][191][191]";
  732. 5408 print"[191][191][191][191][191][191][191][165]^^^^^^^^^^^^^^^^^^^^[167][191][191][191][191][191][191][191][191][191][191][191]";
  733. 5409 print"[191][191][191][191][191][191][191][165][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][167][191][191][191][191][191][191][191][191][191][191][191]";
  734. 5410 print"[191][191][191][191][191][191][191][165][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][167][191][191][191][191][191][191][191][191][191][191][191]";
  735. 5411 print"[191][191][191][191][191][191][191][165][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][167][191][191][191][191][191][191][191][191][191][191][191]";
  736. 5412 print"[191][191][191][191][191][191][191][165][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][167][191][191][191][191][191][191][191][191][191][191][191]";
  737. 5413 print"[191][191][191][191][191][191][191][165][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][167][191][191][191][191][191][191][191][191][191][191][191]";
  738. 5414 print"[191][191][191][191][191][191][191][165][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][167][191][191][191][191][191][191][191][191][191][191][191]";
  739. 5415 print"[191][191][191][191][191][191][191][165][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][167][191][191][191][191][191][191][191][191][191][191][191]";
  740. 5416 print"[191][191][191][191][191][191][191][165][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][167][191][191][191][191][191][191][191][191][191][191][191]";
  741. 5417 print"[191][191][191][191][191][191][191][165][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][167][191][191][191][191][191][191][191][191][191][191][191]";
  742. 5418 print"[191][191][191][191][191][191][191][165][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][167][191][191][191][191][191][191][191][191][191][191][191]";
  743. 5419 print"[191][191][191][191][191][191][191][165][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][194][167][191][191][191][191][191][191][191][191][191][191][191]";
  744. 5420 print"[191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  745. 5421 print"[191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191][191]";
  746. 5422 print"b fuer neubeginn"
  747. 5423 input a$
  748. 5424 if a$="b"then0
  749. 5425 print"nicht moeglich":goto5422
  750. 5500 print chr$(147)
  751. 5501 print"die decke stuerzte ein und sie wurden lebendig begraben"
  752. 5507 print"              [209][209]                        ";
  753. 5508 print"              [209][209]                        ";
  754. 5509 print"              [209][209]                        ";
  755. 5510 print"       [209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209]                 ";
  756. 5511 print"       [209][209][209][209][209][209][209][209][209][209][209][209][209][209][209][209]                 ";
  757. 5512 print"              [209][209]                        ";
  758. 5513 print"              [209][209]                        ";
  759. 5514 print"              [209][209]                        ";
  760. 5515 print"              [209][209]                        ";
  761. 5516 print"              [209][209]                        ";
  762. 5517 print"              [209][209]                        ";
  763. 5518 print"              [209][209]                        ";
  764. 5519 print"              [209][209]                        ";
  765. 5520 print"              [209][209]                        ";
  766. 5526 print"b fuer neubeginn":inputa$
  767. 5527 if a$="b"then0
  768. 5528 print"nicht moeglich":goto5026
  769. 5600 printchr$(147)
  770. 5601 print"                       _[192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192]";
  771. 5602 print"                       _[192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192]";
  772. 5603 print"                       _[192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192]";
  773. 5604 print"                       _[192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192]";
  774. 5605 print"                       _[192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192]";
  775. 5606 print"                       _[192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192]";
  776. 5607 print"                       _[192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192]";
  777. 5608 print"                       _[192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192]";
  778. 5609 print"                       _[192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192]";
  779. 5610 print"    sie wurden         _[192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192]";
  780. 5611 print"    von                _[192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192]";
  781. 5612 print"    wachen             _[192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192]";
  782. 5613 print"    aufgespiesst       _[192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192]";
  783. 5614 print"                       _[192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192]";
  784. 5615 print"                       _[192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192]";
  785. 5616 print"                       _[192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192]";
  786. 5617 print"                       _[192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192]";
  787. 5618 print"                       _[192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192]";
  788. 5619 print"                       _[192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192]";
  789. 5620 print"                       _[192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192]";
  790. 5621 print"b fuer neubeginn"
  791. 5622 input a$
  792. 5623 if a$="b"then0
  793. 5624 print"nicht moeglich":goto5621
  794. 6000 print"sie sind in einen ofen gelaufen und verbrannt"
  795. 6001 print"b fuer neubeginn"
  796. 6002 input a$
  797. 6003 if a$="b"then0
  798. 6004 print"nicht moeglich":goto5621
  799. 7000 print"dachten sie sich. das war der falsche weg"
  800. 7001 print"b fuer neubeginn"
  801. 7002 input a$
  802. 7003 if a$="b"then0
  803. 7004 print"nicht moeglich":goto5621
  804. 10000 poke54295,4:poke53265,11
  805. 10001 fori=54272to54295:pokei,0:next
  806. 10002 poke54296,15:poke54287,25:poke5428,255:poke54276,23
  807. 10003 fori=1to3
  808. 10004 fora=0to255step+1
  809. 10005 poke54273,a
  810. 10006 nexta
  811. 10007 nexti
  812. 10008 poke54278,15:poke53265,27
  813. 10009 printchr$(147)
  814. 10010 print"sie haben es geschafft lord dragen ist tot und burg schreckenstein";
  815. 10011 print" gehoert jetzt ihnen"
  816. 10012 print"auf wiedersehen!                        ";
  817. 10013 print"jan                                     ";
  818. 10014 print"   otto                                 ";
  819.