home *** CD-ROM | disk | FTP | other *** search
/ Digital Talk 71 / Digital_Talk_71_2005-03-11_Digital_Talk_de_Side_B.d64 / bob3 / bob3.a7ae (.txt)
Encoding:
Commodore BASIC  |  2005-01-01  |  25.5 KB  |  541 lines
  1. 9 poke53280,0:poke53281,6:poke53272,21:poke657,128
  2. 10 print"        {CBM-O}{CBM-O}{CBM-I}{CBM-I}{CBM-I}{CBM-O}{CBM-O}      operation"
  3. 11 print"      {CBM-Y}         {CBM-Y}"
  4. 12 print"    {CBM-D}             {CBM-F}      'market garden'";
  5. 13 print"                   "
  6. 14 print"   {CBM-K}               {CBM-K}"
  7. 15 print"                    "
  8. 16 print"                    "
  9. 17 print"   M M   M B N   N N"
  10. 18 print"    M M   MBN   N N"
  11. 19 print"     M M   B   N N      {CBM-D}  {CBM-F}"
  12. 20 print"      M M  B  N N      {CBM-K}    {CBM-K}"
  13. 21 print"       M M B N N             "
  14. 22 print"        M MBN N        MM  NN"
  15. 23 print"         M{CBM-D} {CBM-F}N          MMNN"
  16. 24 print"          {CBM-P}{CBM-P}{CBM-P}             N"
  17. 25 print"                          "
  18. 26 print"                          G"
  19. 27 print"         {CBM-M}   {CBM-G}          {CBM-M} "
  20. 28 print"  {CBM-V}{CBM-D}{CBM-B}                   {CBM-M}{CBM-M}"
  21. 29 print"                                       "
  22. 30 print"         {CBM-M}   {CBM-G}                          ";
  23. 31 print"      {CBM-F}                        {CBM-D}        ";
  24. 32 print"       {CBM-F}                      {CBM-D}         ";:fori=1to4000:nexti
  25. 34 poke53280,0:poke53281,0
  26. 35 print"  {CBM-V} {CBM-C} "
  27. 36 print" {CBM-K}   {CBM-K}{CBM-K} we got caught in the fire of a"
  28. 37 print"      {CBM-K}  german tiger tank.."
  29. 38 print"                                  "
  30. 39 print"                                     "
  31. 40 print"       {CBM-K}                            "
  32. 41 print"  {CBM-V} {CBM-C}  {CBM-K}                            "
  33. 42 print" {CBM-K}   {CBM-K} {CBM-K}                             "
  34. 43 print"                                    "
  35. 44 print"                                   {CBM-V}"
  36. 45 print"        {CBM-K}                         "
  37. 46 print"        {CBM-K}                         "
  38. 47 print"        {CBM-K} {CBM-V}........{CBM-O}{CBM-O}{CBM-O}{CBM-O}...        "
  39. 48 print"        {CBM-K}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}   {CBM-M}...        "
  40. 49 print"        {CBM-K}   {CBM-*}......{CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}...      {CBM-@} {CBM-@}{CBM-P}{CBM-P}{CBM-P}{CBM-O}{CBM-O}";
  41. 50 print"        {CBM-K}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}{CBM-T}NW{CBM-D}                      ";
  42. 51 print"        {CBM-M}{CBM-P}{CBM-P}{CBM-P}{CBM-P}{CBM-P}NW{CBM-D}                       ";
  43. 52 print"        {CBM-M}W W W {CBM-D}DDFFFFDDDFF{CBM-P}{CBM-P}{CBM-P}          ";
  44. 53 print"                                        ";
  45. 54 print"                                        ";
  46. 55 print"{CBM-U}{CBM-U}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-T}{CBM-T}{CBM-T}                        {CBM-T}{CBM-T}{CBM-T}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-U}{CBM-U}";
  47. 56 print"   {CBM-P}{CBM-P}{CBM-P}FFFFDDD              DDDDDDFFFF{CBM-P}{CBM-P}{CBM-P}";
  48. 57 print"{CBM-Y}{CBM-Y}{CBM-Y}";:fori=1to4000:nexti
  49. 60 print"                                      "
  50. 61 print"                                      "
  51. 62 print"                                   {CBM-C} {CBM-V}"
  52. 63 print"                                     "
  53. 64 print"  {CBM-V}{CBM-C}            .................    "
  54. 65 print"                .................    "
  55. 66 print"                .................    "
  56. 67 print"                .................    "
  57. 68 print"                .................    "
  58. 69 print"  {CBM-V}{CBM-C}            .................    "
  59. 70 print"                .................    "
  60. 71 print"                .................    "
  61. 72 print"  {CBM-P}{CBM-P}{CBM-P}  {CBM-F}        .................    "
  62. 73 print" {CBM-M}{CBM-V} {CBM-C} {CBM-P}{CBM-P}{CBM-P}                  CC{CBM-R}C    {CBM-M} {CBM-G}  ";
  63. 74 print" {CBM-M}    {CBM-V} {CBM-C} E  C{CBM-R}CC{CBM-R}CCCCCC{CBM-R}C  C{CBM-E}CC{CBM-R}C {CBM-M} {CBM-G}  ";
  64. 75 print" {CBM-M}        {CBM-M}  C{CBM-E}CC{CBM-E}C    C{CBM-E}CC    C{CBM-E}CC{CBM-N} {CBM-G}  ";
  65. 76 print"    {CBM-M}{CBM-M}   P{CBM-M}                        {CBM-M} {CBM-G}  ";
  66. 77 print" {CBM-M}  {CBM-M}{CBM-M}   O {CBM-C}                         "
  67. 78 print"                       {CBM-@}{CBM-@} {CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-@} {CBM-@} {CBM-M} {CBM-G}{CBM-@}"
  68. 79 print"        {CBM-D}  {CBM-G}{CBM-@}{CBM-@}{CBM-@}{CBM-@} {CBM-@}{CBM-@}{CBM-@} {CBM-@} {CBM-@}{CBM-@}    {CBM-@}{CBM-@}{CBM-@} {CBM-@} {CBM-V} {CBM-C} {CBM-@}";
  69. 80 print"  while we looked for cover.. the tank"
  70. 81 print" approached us and didn't left us alone";:fori=1to4000:nexti
  71. 83 print"  {CBM-V}{CBM-C}            .................    "
  72. 84 print"                .................    "
  73. 85 print"                .................    "
  74. 86 print"                .......{CBM-P}{CBM-P}{CBM-P}.......    "
  75. 87 print"                .....{CBM-I}     {CBM-I}.....    "
  76. 88 print"  {CBM-V}{CBM-C}            ...{CBM-D}         {CBM-F}...    "
  77. 89 print"                ..{CBM-D}           {CBM-F}..    "
  78. 90 print"                ..             ..    "
  79. 91 print"  {CBM-P}{CBM-P}{CBM-P}  {CBM-F}        .{CBM-K}             {CBM-K}.    "
  80. 92 print" {CBM-M}{CBM-V} {CBM-C} {CBM-P}{CBM-P}{CBM-P}                  CC{CBM-R}C    {CBM-M} {CBM-G}  ";
  81. 93 print" {CBM-M}    {CBM-V} {CBM-C} E  C{CBM-R}CC{CBM-R}CCCCCC{CBM-R}C  C{CBM-E}CC{CBM-R}C {CBM-M} {CBM-G}  ";
  82. 94 print" {CBM-M}        {CBM-M}  C{CBM-E}CC{CBM-E}C    C{CBM-E}CC    C{CBM-E}CC{CBM-N} {CBM-G}  ";
  83. 95 print"    {CBM-M}{CBM-M}   P{CBM-M}                        {CBM-M} {CBM-G}  ";
  84. 97 print"  {CBM-V}{CBM-C}            ........B........    "
  85. 98 print"                ... {CBM-O}... ...{CBM-O} ...    "
  86. 99 print"                ...{CBM-C}  {CBM-O}{CBM-K} {CBM-K}{CBM-O}  {CBM-V}...    "
  87. 100 print"                 {CBM-O}..{CBM-C}       {CBM-V}..{CBM-O}     "
  88. 101 print"                {CBM-C}  {CBM-O}.{CBM-V}     {CBM-C}.{CBM-O}  {CBM-V}    "
  89. 102 print"  {CBM-V}{CBM-C}            .{CBM-C}             {CBM-V}.    "
  90. 103 print"                ..{CBM-V}           {CBM-F}..    "
  91. 104 print"                ..             ..    "
  92. 105 print"  {CBM-P}{CBM-P}{CBM-P}  {CBM-F}        .{CBM-K}             {CBM-K}.    "
  93. 106 print" {CBM-M}{CBM-V} {CBM-C} {CBM-P}{CBM-P}{CBM-P}                  CC{CBM-R}C    {CBM-M} {CBM-G}  ";
  94. 107 print" {CBM-M}    {CBM-V} {CBM-C} E  C{CBM-R}CC{CBM-R}CCCCCC{CBM-R}C  C{CBM-E}CC{CBM-R}C {CBM-M} {CBM-G}  ";
  95. 108 print" {CBM-M}        {CBM-M}  C{CBM-E}CC{CBM-E}C    C{CBM-E}CC    C{CBM-E}CC{CBM-N} {CBM-G}  ";
  96. 109 print"    {CBM-M}{CBM-M}   P{CBM-M}                        {CBM-M} {CBM-G}  ";
  97. 110 poke53281,11:fori=1to40:nexti
  98. 111 poke53281,12:fori=1to40:nexti
  99. 112 poke53281,15:fori=1to40:nexti
  100. 113 poke53281,1:fori=1to40:nexti
  101. 114 poke53281,15:fori=1to40:nexti
  102. 115 poke53281,12:fori=1to40:nexti
  103. 116 poke53281,11:fori=1to40:nexti
  104. 117 poke53281,0:fori=1to40:nexti
  105. 120 forppp=1to12
  106. 125 print"  {CBM-V}{CBM-C}            .................    "
  107. 126 print"                .................    "
  108. 127 print"                .................    "
  109. 128 print"                .................    "
  110. 129 print"                ............{CBM-B}{CBM-B}...    "
  111. 130 print"  {CBM-V}{CBM-C}            ...........{CBM-B}  {CBM-G}..    "
  112. 131 print"                ..........{CBM-B}    ..    "
  113. 132 print"                .........   {CBM-B}{CBM-U}...    "
  114. 133 print"  {CBM-P}{CBM-P}{CBM-P}  {CBM-F}        .......... {CBM-B}.....    "
  115. 134 print" {CBM-M}{CBM-V} {CBM-C} {CBM-P}{CBM-P}{CBM-P}       ....... .  .....   {CBM-M} {CBM-G}  ";
  116. 135 print" {CBM-M}    {CBM-V} {CBM-C} E  C{CBM-R}CC{CBM-R}......    ..CC{CBM-R}C {CBM-M} {CBM-G}  ";
  117. 136 print" {CBM-M}        {CBM-M}  C{CBM-E}CC{CBM-E}C ..... {CBM-B}... C{CBM-E}CC{CBM-N} {CBM-G}  ";
  118. 137 print"    {CBM-M}{CBM-M}   P{CBM-M}          ..{CBM-V}   {CBM-C}...    {CBM-M} {CBM-G}  ";
  119. 140 print"  {CBM-V}{CBM-C}            .................    "
  120. 141 print"                .................    "
  121. 142 print"                .................    "
  122. 143 print"                .................    "
  123. 144 print"                ...............{CBM-B}{CBM-C}    "
  124. 145 print"  {CBM-V}{CBM-C}            .............{CBM-D}  {CBM-B}    "
  125. 146 print"                ..............{CBM-V}{CBM-B}.    "
  126. 147 print"                ..........{CBM-D}. {CBM-B}...    "
  127. 148 print"  {CBM-P}{CBM-P}{CBM-P}  {CBM-F}        ...........{CBM-B} {CBM-D}...    "
  128. 149 print" {CBM-M}{CBM-V} {CBM-C} {CBM-P}{CBM-P}{CBM-P}       .........{CBM-V} .{CBM-F}...   {CBM-M} {CBM-G}  ";
  129. 150 print" {CBM-M}    {CBM-V} {CBM-C} E  C{CBM-R}CC{CBM-R}.......{CBM-B}  ..CC{CBM-R}C {CBM-M} {CBM-G}  ";
  130. 151 print" {CBM-M}        {CBM-M}  C{CBM-E}CC{CBM-E}C ....{CBM-V}  {CBM-V}.. C{CBM-E}CC{CBM-N} {CBM-G}  ";
  131. 152 print"    {CBM-M}{CBM-M}   P{CBM-M}          ..{CBM-V}   {CBM-C}...    {CBM-M} {CBM-G}  ";
  132. 155 print"  {CBM-V}{CBM-C}            .................    "
  133. 156 print"                .................    "
  134. 157 print"                .................    "
  135. 158 print"                ..........{CBM-K}......    "
  136. 159 print"                .........{CBM-B} .{CBM-V}....    "
  137. 160 print"  {CBM-V}{CBM-C}            ........... .....    "
  138. 161 print"                ........{CBM-D}. {CBM-F}.....    "
  139. 162 print"                .........   .....    "
  140. 163 print"  {CBM-P}{CBM-P}{CBM-P}  {CBM-F}        ........ . {CBM-B}.....    "
  141. 164 print" {CBM-M}{CBM-V} {CBM-C} {CBM-P}{CBM-P}{CBM-P}       ......{CBM-D}.  {CBM-B}.....   {CBM-M} {CBM-G}  ";
  142. 165 print" {CBM-M}    {CBM-V} {CBM-C} E  C{CBM-R}CC{CBM-R}.....  {CBM-V}{CBM-F}...CC{CBM-R}C {CBM-M} {CBM-G}  ";
  143. 166 print" {CBM-M}        {CBM-M}  C{CBM-E}CC{CBM-E}C ...{CBM-F}  .... C{CBM-E}CC{CBM-N} {CBM-G}  ";
  144. 167 print"    {CBM-M}{CBM-M}   P{CBM-M}          .{CBM-V}    {CBM-C}...    {CBM-M} {CBM-G}  ";:next ppp
  145. 172 print"                                    {CBM-M}   ";
  146. 173 print"                                    {CBM-M}   ";
  147. 174 print"                                       {CBM-V}";
  148. 175 print"                                       "
  149. 176 print"                                       "
  150. 177 print"                                     {CBM-G} "
  151. 178 print"                                     {CBM-G}  ";
  152. 179 print"                                     {CBM-G}  ";
  153. 180 print"   {CBM-V}                                 {CBM-G} {CBM-V}";
  154. 181 print"                                     {CBM-G} "
  155. 182 print"                                     {CBM-K} "
  156. 183 print"                                     {CBM-K} "
  157. 184 print"                                     {CBM-K}  ";
  158. 185 print"                       ...............  ";
  159. 186 print"                       ............... {CBM-V}";
  160. 187 print"                       ........{CBM-O}{CBM-O}{CBM-O}.... "
  161. 188 print"                       ........{CBM-G}     {CBM-M} "
  162. 189 print"                       ........{CBM-U}{CBM-U}{CBM-U}.... "
  163. 190 print" {CBM-@}                     ...............  ";
  164. 191 print"        {CBM-G}              ...............  ";
  165. 192 print"CCC{CBM-R}C   {CBM-G}              ...............  ";
  166. 193 print" CC{CBM-E}CCC       DDDDDDDDFFFFFF{CBM-P}{CBM-P}{CBM-P}{CBM-P}FFDDFF  ";
  167. 194 print"                                        ";
  168. 195 print"CCCDDD  DDEEE               FFFDDDDEDDDF";
  169. 200 print"                       ...............  ";
  170. 201 print"                  .................... {CBM-V}";
  171. 202 print"                  ........{CBM-O}{CBM-O}{CBM-O}......... "
  172. 203 print"                  ........{CBM-G}          {CBM-M} "
  173. 204 print"                  ........{CBM-U}{CBM-U}{CBM-U}......... "
  174. 205 print" {CBM-@}                ....................  ";
  175. 206 print"        {CBM-G}              ...............  ";
  176. 207 print"CCC{CBM-R}C   {CBM-G}              ...............  ";
  177. 210 print"                       ...............  ";
  178. 211 print"                  .................... {CBM-V}";
  179. 212 print"             ........{CBM-O}{CBM-O}{CBM-O}.............. "
  180. 213 print"             ........{CBM-G}                 "
  181. 214 print"             ........{CBM-U}{CBM-U}{CBM-U}.............. "
  182. 215 print" {CBM-@}                .................{CBM-F}W   ";
  183. 216 print"        {CBM-G}              .............{CBM-F}W  ";
  184. 217 print"CCC{CBM-R}C   {CBM-G}              ..............{CBM-F}  ";
  185. 220 print"                       ...............  ";
  186. 221 print"                  ...................{CBM-V} {CBM-V}";
  187. 222 print"        ........{CBM-O}{CBM-O}{CBM-O}.................{CBM-P}  "
  188. 223 print"        ........{CBM-G}                      "
  189. 224 print"        ........{CBM-U}{CBM-U}{CBM-U}................{CBM-Y}{CBM-Y}{CBM-Y} "
  190. 225 print" {CBM-@}           .................{CBM-F}W M M M  ";
  191. 226 print"        {CBM-G}         .............{CBM-F}W M{CBM-P}{CBM-P}{CBM-P}  ";
  192. 227 print"CCC{CBM-R}C   {CBM-G}         ..............{CBM-F}W W W  ";:fori=1to3000:nexti
  193. 231 poke53281,6
  194. 232 print" as suddenly we also got pinned down by"
  195. 233 print" some machine gun at a tower.."
  196. 234 print" so we had to retreat the village.."
  197. 235 print"                                       .";
  198. 236 print"                   .          .      ."
  199. 237 print"  ."
  200. 238 print"              .          ."
  201. 239 print"        .                             ."
  202. 240 print"                 .........    {CBM-V} {CBM-C}"
  203. 241 print"                 ..N.M....{CBM-V} {CBM-C}    "
  204. 242 print"                 .....NB  {CBM-P}   {CBM-K} {CBM-K}"
  205. 243 print"             .   ..... .   {CBM-G}     "
  206. 244 print"                 .....{CBM-O}    {CBM-F}  {CBM-K}  "
  207. 245 print"               .....{CBM-O}  {CBM-U}   L{CBM-P}{SHIFT-@}L{CBM-P}{SHIFT-@}   "
  208. 246 print"               ....  {CBM-U}              "
  209. 247 print"               ....{CBM-U}                "
  210. 248 print"               .....                "
  211. 249 print"               .....                "
  212. 250 print"                      {CBM-V}                 ";
  213. 251 print"                     {CBM-V}                  ";:for pin=1to32
  214. 255 print"                 .........    {CBM-V} {CBM-C}"
  215. 256 print"                 .B.B.N...{CBM-V} {CBM-C}    "
  216. 257 print"                 M.....N  {CBM-P}   {CBM-K} {CBM-K}"
  217. 258 print"             .   .......   {CBM-G}     "
  218. 259 print"                 .....{CBM-O}    {CBM-F}  {CBM-K}  "
  219. 260 print"               .....{CBM-O}  {CBM-U}   L{CBM-P}{SHIFT-@}L{CBM-P}{SHIFT-@}   "
  220. 261 print"               ...{CBM-D}  {CBM-U}              "
  221. 262 print"               ..{CBM-D} {CBM-U}                "
  222. 263 print"               .{CBM-D} {CBM-V}.                "
  223. 264 print"               . {CBM-V}..                ";
  224. 266 print"                 .........    {CBM-V} {CBM-C}"
  225. 267 print"                 .MB.N.C..{CBM-V} {CBM-C}    "
  226. 268 print"                 .......  {CBM-P}   {CBM-K} {CBM-K}"
  227. 269 print"             .   C......   {CBM-G}     "
  228. 270 print"                 .....{CBM-O}    {CBM-F}  {CBM-K}  "
  229. 271 print"               .....{CBM-O}  {CBM-U}   L{CBM-P}{SHIFT-@}L{CBM-P}{SHIFT-@}   "
  230. 272 print"               ....  {CBM-U}              "
  231. 273 print"               ....{CBM-U}                "
  232. 274 print"               .....                "
  233. 275 print"               .....                ";:next pin
  234. 280 print"":poke53281,0:poke53280,0:poke53272,22
  235. 281 print"When we passed a grazing we stumbled
  236.  
  237. 282 print"upon a german Company, it was more or
  238.  
  239. 283 print"less price-shooting, as they hadn't any
  240.  
  241. 284 print"cover...":fori=1to6000:nexti
  242. 299 poke53272,21
  243. 300 print"             .............."
  244. 301 print"             .............."
  245. 302 print"             .......{CBM-V} {CBM-C}...."
  246. 303 print"             ......{CBM-K}   {CBM-K}..."
  247. 304 print"             ......... ...."
  248. 305 print"             .......{CBM-F}K{CBM-D}...."
  249. 306 print"             .......   ...."
  250. 307 print"             .......   {CBM-K}..."
  251. 308 print"             ......     ..."
  252. 309 print"             .....{CBM-K}     ..."
  253. 310 print"             .....     {CBM-K}..."
  254. 311 print"             ..... .   ...."
  255. 312 print"             ..... {CBM-K}   {CBM-K}..."
  256. 313 print"             ......  {CBM-K}  ..."
  257. 314 print"             .....{CBM-K}  .  ..."
  258. 315 print"             .....  {CBM-K}.  ..."
  259. 316 print"             ....{CBM-K}  ..  ..."
  260. 317 print"     {CBM-B}       ....  {CBM-K}.{CBM-B}  ...    {CBM-B}    {CBM-B}"
  261. 318 print"{CBM-B} {CBM-B} {CBM-B}   {CBM-B} {CBM-B}  .{CBM-B}.{CBM-B}  .{CBM-B}   ..{CBM-B}  {CBM-B}{CBM-B}    {CBM-B} ";
  262. 319 print"  {CBM-B}";
  263. 320 print"                                        ";
  264. 321 fori=1to3000:nexti
  265. 324 print"             ..........argh"
  266. 325 print"             ....{CBM-V}...{CBM-D}....."
  267. 326 print"             ...  {CBM-F}.{CBM-V}{CBM-K}..{CBM-V}  "
  268. 327 print"             ..{CBM-C}.. . ..{CBM-K}   "
  269. 328 print"             ....    {CBM-K}.{CBM-K}W  "
  270. 329 print"             .{CBM-D}.  {CBM-K}{CBM-D}  .{CBM-Y}  {CBM-D}"
  271. 330 print"             ..  .{CBM-K}.. {CBM-V}   ."
  272. 331 print"             ...{CBM-V}.{CBM-G}.{CBM-C}   H {CBM-K}"
  273. 332 print"             ........   B  "
  274. 333 print"             .......{CBM-K}   G  "
  275. 334 print"             .......    {CBM-G} {CBM-K}"
  276. 335 print"             .......    . ."
  277. 336 print"             ......{CBM-K}   {CBM-K}..."
  278. 337 print"             ......  {CBM-K}  ..."
  279. 338 print"             .....{CBM-K}  .  ..."
  280. 339 print"             .....  {CBM-K}.  ..."
  281. 340 print"             ....{CBM-K}  ..  ..."
  282. 341 print"     {CBM-B}       ....  {CBM-K}.{CBM-B}  ...    {CBM-B}    {CBM-B}"
  283. 342 print"{CBM-B} {CBM-B} {CBM-B}   {CBM-B} {CBM-B}  .{CBM-B}.{CBM-B}  .{CBM-B}   ..{CBM-B}  {CBM-B}{CBM-B}    {CBM-B} ";
  284. 343 print"  {CBM-B}";
  285. 344 print"                                        ";
  286. 345 fori=1to3000:nexti
  287. 350 print"........................................";
  288. 351 print"........................................";
  289. 352 print"........{CBM-V} {CBM-C}.........{CBM-V} {CBM-C}.................";
  290. 353 print".......     .......     ........{CBM-+}{CBM-+}{CBM-+}.....";
  291. 354 print"........ ,,........... ........... .....";
  292. 355 print"........ D ......... K .........W  .....";
  293. 356 print"......{CBM-D}    {CBM-F}......{CBM-V}    {CBM-F}.......{CBM-D}    {CBM-F}...";
  294. 357 print".....{CBM-D}      ......      {CBM-K}.....{CBM-D}      {CBM-K}..";
  295. 358 print"....{CBM-D}       {CBM-K}..... H   {CBM-K} .....        ..";
  296. 359 print"...{CBM-D}  {CBM-V}      ..... {CBM-G}   . {CBM-K}...{CBM-K} .    . {CBM-K}";
  297. 360 print".";
  298. 361 print"...  {CBM-V}.      ..... {CBM-H}   .  ...  .    .{CBM-K} ";
  299. 362 print".";
  300. 363 print"...{CBM-V}{CBM-F}..CCCC. ..... CCCC.  ...  .CCCC";
  301. 364 print".  .";
  302. 365 print"......{CBM-V}    . ......    .  .L{CBM-Y}{CBM-Y} {SHIFT-@}    ....";
  303. 366 print".....{CBM-K}     . .....{CBM-K}    {CBM-K}....{CBM-F} {CBM-D}.     ...";
  304. 367 print".....   .  {CBM-K}......{CBM-K}  .  {CBM-K}......{CBM-K}  {CBM-K}  {CBM-K}..";
  305. 368 print"....{CBM-K}  {CBM-K}.  {CBM-K}......  {CBM-K}.{CBM-K}  ......   .{CBM-K}  {CBM-F}.";
  306. 369 print"....{CBM-K}  ..{CBM-K}  ......  {CBM-K}..  {CBM-K}.....  {CBM-K}..{CBM-K}  {CBM-F}";
  307. 370 print"....  {CBM-K}...  ......  ...{CBM-K}  .....  ...{CBM-B}{CBM-K}  ";
  308. 371 print"{CBM-B}.{CBM-B}.  ..{CBM-B}    .{CBM-B}.{CBM-B}.  ....  {CBM-B}..{CBM-B}{CBM-B} ";
  309. 372 print" ..{CBM-B} .  ";
  310. 373 print"                                        ";
  311. 374 fori=1to3000:nexti
  312. 380 print"...................................argh.";
  313. 381 print".........................{CBM-V} {CBM-C}............";
  314. 382 print"....{CBM-V} {CBM-C}....{CBM-V}.{CBM-F}..........     ..{CBM-V}{CBM-F}...{CBM-V}...";
  315. 383 print"...     ..{CBM-D}  {CBM-U}{CBM-C}...argh........{CBM-U} {CBM-B}.{CBM-F}.{CBM-K}...";
  316. 384 print"....{CBM-V}{CBM-V} .{CBM-D}{CBM-D} {CBM-U}.........F..{CBM-V}{CBM-V} .....  {CBM-F}. ...";
  317. 385 print"....W  ..    {CBM-F}........{CBM-O}{CBM-C}Q  ....{CBM-D} {CBM-V} . {CBM-K}..";
  318. 386 print"argh{CBM-V}     {CBM-U}.{CBM-D} ...          {CBM-C}... {CBM-V}.{CBM-B}  {CBM-B}..";
  319. 387 print"...{CBM-K}     {CBM-F}...{CBM-K}. ....FF{CBM-Y}{CBM-Y}    {CBM-K}.{CBM-V}...{CBM-D}   .{CBM-V}";
  320. 388 print"...  N    ...{CBM-F}.{CBM-F} {CBM-F}        {CBM-V} {CBM-K}...{CBM-D}{CBM-D}      ";
  321. 389 print"..{CBM-K} {CBM-V}     {CBM-K}......  .{CBM-V}    {CBM-V}{CBM-D} ....{CBM-B}     ";
  322. 390 print"  ";
  323. 391 print".. {CBM-K}..     ....{CBM-F}{CBM-D} .{CBM-V}    {CBM-V}{CBM-D} {CBM-K}...{CBM-B}{CBM-V}       ";
  324. 392 print".. ....CCCC..... {CBM-B}.CCCC.. {CBM-D}....{CBM-F}CCCC..";
  325. 393 print"{CBM-F} ";
  326. 394 print".. ...{CBM-V}    ....{CBM-B}...    .. ......    ...";
  327. 395 print" ";
  328. 396 print".....{CBM-K}     ...{CBM-F}.{CBM-K}.{CBM-K}    {CBM-K}........     .. ";
  329. 397 print".....   .  {CBM-K}......{CBM-K}  .  {CBM-K}......{CBM-K}  {CBM-K}  {CBM-K}. ";
  330. 398 print"....{CBM-K}  {CBM-K}.  {CBM-K}......  {CBM-K}.{CBM-K}  .... .   .{CBM-K} ";
  331. 399 print" {CBM-F}.";
  332. 400 print"....{CBM-K}  ..{CBM-K}  ......  {CBM-K}..  {CBM-K}..{CBM-V} .  {CBM-K}..{CBM-K}  ";
  333. 401 print"{CBM-F}";
  334. 402 print"....  {CBM-K}...  ......  ...{CBM-K}  ..  .  ...{CBM-B}{CBM-K}";
  335. 403 print"  ";
  336. 404 print"{CBM-B}.{CBM-B}.  ..{CBM-B}    .{CBM-B}.{CBM-B}.  ....  {CBM-B}.{CBM-F} {CBM-B} ";
  337. 405 print" ..{CBM-B} .  ";
  338. 406 print"                                        ";
  339. 407 fori=1to3000:nexti
  340. 420 print"":poke53272,22
  341. 421 print"We ended the show because of too heavy
  342.  
  343. 422 print"resistance with a blast of artillery..
  344.  
  345. 423 print"Our next mission was to take prisoners
  346.  
  347. 424 print"at a building across the river..":fori=1to6000:nexti
  348. 425 poke53272,21
  349. 329 poke53281,6
  350. 429 poke53281,6:print"":for ee=1to15
  351. 430 print"                                    ."
  352. 431 print"    Q     ."
  353. 432 print" .             .      .       ."
  354. 433 print"     .                 .     ."
  355. 434 print"                                     ."
  356. 435 print"          {CBM-V}  {CBM-C} {CBM-V}  {CBM-C}    {CBM-V}  {CBM-C}"
  357. 436 print"                           "
  358. 437 print"             {CBM-F} {CBM-D}  {CBM-F}    {CBM-D}  {CBM-F}"
  359. 438 print"          {CBM-D}                "
  360. 439 print"         {CBM-V}                     {CBM-C}"
  361. 440 print"                                "
  362. 441 print"CCFCCDCCD                       CCDCDCDD";
  363. 442 print"        .{CBM-C}                     {CBM-V}."
  364. 443 print"        .CF{CBM-U}{CBM-U}      {CBM-U}.{CBM-U}      {CBM-U}{CBM-U}FF."
  365. 444 print"        ...DFF...FFDDFF..DDDEE..."
  366. 445 print"        .........................";
  367. 448 print"        .{CBM-C}                     {CBM-V}."
  368. 449 print"        ...{CBM-U}{CBM-U}      {CBM-U}.{CBM-U}      {CBM-U}{CBM-U}..."
  369. 450 print"        ......................FD."
  370. 451 print"        ...DDFFFFDFDDF...DDEEE...";:next ee
  371. 460 poke53272,22:poke53281,0
  372. 462 print"In all silence our men approached the
  373.  
  374. 463 print"main building...":fori=1to3000:nexti
  375. 464 poke53272,21
  376. 465 print"   we threw a flash-grenade inside.."
  377. 466 print"  {CBM-G}"
  378. 467 print"  {CBM-G}                   N{CBM-Y}{CBM-Y}M"
  379. 468 print"  {CBM-G}                  N    M"
  380. 469 print"  {CBM-G}                  {CBM-G}    {CBM-M}"
  381. 470 print"  {CBM-G}                  {CBM-G}    {CBM-M}     {CBM-*}{SHIFT-POUND}"
  382. 471 print"  {CBM-G}                  {CBM-G}    {CBM-M}    {CBM-K}..{CBM-K}{CBM-O}"
  383. 472 print"  {CBM-G}                  {CBM-G}    P     {CBM-C}{CBM-V}  {CBM-C}"
  384. 473 print"  {CBM-G}                  {CBM-G}    {CBM-M} {CBM-M}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-D} {CBM-Y}{CBM-Y}{CBM-Y}";
  385. 474 print"  {CBM-G}  {CBM-P}{CBM-P}{CBM-P}{CBM-P}{CBM-P}{CBM-P}{CBM-P}{CBM-P}        {CBM-G}    {CBM-M} {CBM-M}     {CBM-I}{CBM-O}{CBM-M}"
  386. 475 print"  {CBM-G} {CBM-M}........{CBM-G}       {CBM-G}    {CBM-M} {CBM-M}       {CBM-M}"
  387. 476 print"  {CBM-G} {CBM-M}........{CBM-G}       {CBM-G}    {CBM-M} {CBM-M}       {CBM-M}"
  388. 477 print"  {CBM-G} {CBM-M}........{CBM-G}     EEEEEEEEEE       {CBM-M}"
  389. 478 print"  {CBM-G} {CBM-M}........{CBM-G}    EEEEEEEEEE        {CBM-M}"
  390. 479 print"  {CBM-G} {CBM-M}........{CBM-G}   EEEEEEEEEE         {CBM-M}"
  391. 480 print"  {CBM-G}  {CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}{CBM-Y}   EEEEEEEEEE          {CBM-M}"
  392. 481 print"  {CBM-G}            EEEEEEEEEE           {CBM-M}"
  393. 482 print"  {CBM-G}           EEEEEEEEEE            {CBM-M}"
  394. 483 print"  {CBM-G}          EEEEEEEEEE             {CBM-M}"
  395. 484 print"  {CBM-G}         EEEEEEEEEE              {CBM-M}"
  396. 485 print"  {CBM-G}        EEEEEEEEEE               {CBM-M}"
  397. 486 print"  L{CBM-P}{CBM-P}{CBM-P}{CBM-P}{CBM-P}{CBM-P}{CBM-P}EEEEEEEEEE                {CBM-M}";:fori=1to3000:nexti
  398. 490 for fl=1to10
  399. 491 print"  {CBM-G} {CBM-M}........{CBM-G}       {CBM-G}    {CBM-M} {CBM-M}       {CBM-M}"
  400. 492 print"  {CBM-G} {CBM-M}........{CBM-G}       {CBM-G}    {CBM-M} {CBM-M}       {CBM-M}"
  401. 493 print"  {CBM-G} {CBM-M}........{CBM-G}     EEEEEEEEEE       {CBM-M}"
  402. 494 print"  {CBM-G} {CBM-M}........{CBM-G}    EEEEEEEEEE        {CBM-M}"
  403. 495 print"  {CBM-G} {CBM-M}........{CBM-G}   EEEEEEEEEE         {CBM-M}";
  404. 497 print"  {CBM-G} {CBM-M}        {CBM-G}       {CBM-G}    {CBM-M} {CBM-M}       {CBM-M}"
  405. 498 print"  {CBM-G} {CBM-M}        {CBM-G}       {CBM-G}    {CBM-M} {CBM-M}       {CBM-M}"
  406. 499 print"  {CBM-G} {CBM-M}        {CBM-G}     EEEEEEEEEE       {CBM-M}"
  407. 500 print"  {CBM-G} {CBM-M}        {CBM-G}    EEEEEEEEEE        {CBM-M}"
  408. 501 print"  {CBM-G} {CBM-M}        {CBM-G}   EEEEEEEEEE         {CBM-M}";:next fl
  409. 504 poke53281,6
  410. 505 print"getting the nazi's out wasn't a problem,";
  411. 506 print" the surrounding germans noticed us and"
  412. 507 print"           started shooting.."
  413. 508 print"........................................";
  414. 509 print"........................................";
  415. 510 print"........................................";
  416. 511 print"     {CBM-V}  {CBM-C}        {CBM-V}   {CBM-C}       {CBM-V}  {CBM-C}"
  417. 512 print".....    ........     .......    .......";
  418. 513 print"                                {CBM-F}"
  419. 514 print"  {CBM-D}     {CBM-K}            {CBM-D}          "
  420. 515 print"   {CBM-V}{CBM-D}          {CBM-V}      {CBM-B}           "
  421. 516 print" {CBM-D}     {CBM-V}                      {CBM-F}"
  422. 517 print"  {CBM-B} {CBM-C}   {CBM-F}     {CBM-D}   {CBM-K}      {CBM-C} {CBM-V}   {CBM-F}"
  423. 518 print"     {CBM-C}       {CBM-D}  {CBM-V}            {CBM-C}  {CBM-F}"
  424. 519 print"     {CBM-D}  {CBM-V}   {CBM-D}  {CBM-V}  {CBM-K}      {CBM-Y}{CBM-Y}{CBM-Y}  {CBM-C}  "
  425. 520 print" {CBM-I}{CBM-P} {CBM-D}  {CBM-V}      {CBM-V}    {CBM-@}{CBM-@}{CBM-@}{CBM-@}{CBM-P}{CBM-P}{CBM-P}{CBM-P}{CBM-P}{CBM-@}{CBM-@}     {CBM-P}{CBM-P}{CBM-O}{CBM-O}{CBM-Y}";
  426. 521 print"                                        ";
  427. 522 print"                                        ";
  428. 523 print"                                        ";
  429. 524 print"                                        ";
  430. 525 print"                                        ";
  431. 526 print"                                        ";:fori=1to1000:nexti
  432. 527 for bul=1to20
  433. 530 print".......C................................";
  434. 531 print"..C.....................................";
  435. 532 print".....C..................................";
  436. 533 print"     {CBM-V}  {CBM-C}        {CBM-V}   {CBM-C}       {CBM-V}  {CBM-C}"
  437. 534 print"C....    ........     .......    .......";
  438. 536 print".............C..........................";
  439. 537 print".......C................................";
  440. 538 print"...........C............................";
  441. 539 print"     {CBM-V}  {CBM-C}        {CBM-V}   {CBM-C}       {CBM-V}  {CBM-C}"
  442. 540 print".....    C.......     .......    .......";
  443. 542 print"....................C...................";
  444. 543 print"..............C.........................";
  445. 544 print".................C......................";
  446. 545 print"     {CBM-V}  {CBM-C}        {CBM-V}   {CBM-C}       {CBM-V}  {CBM-C}"
  447. 546 print".....    ......C.     .......    .......";
  448. 548 print"............................C...........";
  449. 549 print"....................C...................";
  450. 550 print"......................C.................";
  451. 551 print"     {CBM-V}  {CBM-C}        {CBM-V}   {CBM-C}       {CBM-V}  {CBM-C}"
  452. 552 print".....    ........     ...C...    .......";
  453. 554 print"....................................C...";
  454. 555 print".............................C..........";
  455. 556 print"...............................C........";
  456. 557 print"     {CBM-V}  {CBM-C}        {CBM-V}   {CBM-C}       {CBM-V}  {CBM-C}"
  457. 558 print".....    ........     .......    ...C...";:next bul
  458. 564 poke53281,6:poke53272,21
  459. 565 print" the next day our men discovered in the"
  460. 566 print"          woods a prison camp.."
  461. 567 print"    .                            ."
  462. 568 print"    {SHIFT-POUND}       {CBM-*}    ."
  463. 569 print"   {SHIFT-POUND}         {CBM-*}                      .  .";
  464. 570 print"  {SHIFT-POUND}           {CBM-*}     .      .    ."
  465. 571 print" {SHIFT-POUND}             {CBM-*}"
  466. 572 print"             "
  467. 573 print" .                                    ."
  468. 574 print"                         ."
  469. 575 print"             "
  470. 576 print"   . {CBM-K}     {CBM-K}  ."
  471. 577 print"      {CBM-K}   {CBM-K} "
  472. 578 print"    {CBM-K}       {CBM-K}"
  473. 579 print"                                 "
  474. 580 print"   {CBM-K}         {CBM-K}                   "
  475. 581 print"^^^ {CBM-K}^^^^^^^{CBM-K}  ^^^^^^^^^^^^^^^^  ^^^^^^^";
  476. 582 print"{SHIFT-+}{SHIFT-+}{CBM-K} {SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+} {CBM-K}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}  {SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}";
  477. 583 print"{SHIFT-+}{SHIFT-+} {CBM-K}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{CBM-K} {SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}  {SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}";
  478. 584 print"{SHIFT-+}{CBM-K}             {CBM-K}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}  {SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}";
  479. 585 print"{SHIFT-+} {CBM-K}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{CBM-K} {SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}  {SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}";
  480. 586 print"{CBM-K} {SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+} {CBM-K}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}  {SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}";
  481. 587 print" {CBM-K}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{CBM-K} {SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}  {SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}";
  482. 588 print" {SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+} {CBM-K}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}  {SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}{SHIFT-+}";
  483. 590 poke53281,6:fori=1to1000:nexti
  484. 591 poke53281,4:fori=1to1000:nexti
  485. 592 poke53281,14:fori=1to1000:nexti
  486. 593 poke53281,3:fori=1to1000:nexti
  487. 600 print"":poke53281,0:poke53280,0:poke53272,22
  488. 601 print"The prisoners got freed and given food
  489.  
  490. 602 print"and water, in a matter of hours allover
  491.  
  492. 603 print"the country we found such like camps..
  493.  
  494. 604 print"
  495.  
  496. 605 print"Hitler committed suicide and the eagles-";
  497. 606 print"nest got overrunned with our men, the
  498.  
  499. 607 print"nazi's gave up.
  500.  
  501. 608 print"
  502.  
  503. 609 print"Our men got promoted and they all went
  504.  
  505. 610 print"their own ways.
  506.  
  507. 611 print"
  508.  
  509. 612 print"The war is over.
  510.  
  511. 613 print"Space":poke198,0:wait198,1:poke53272,21
  512. 619 poke53280,0:poke53281,14
  513. 620 print" code, gfx:"
  514. 621 print"                   {CBM-O}{CBM-U}{CBM-O}         ........"
  515. 622 print" jsl/ptv/cvt      {CBM-V}   {CBM-C}      {CBM-K}{CBM-K} {CBM-U}{CBM-P}{CBM-P}{CBM-U} {CBM-C}."
  516. 623 print"                              {CBM-K}       ."
  517. 624 print" january 2005               {CBM-K}{CBM-K}        ."
  518. 625 print"                   {CBM-V}         {CBM-K}        ."
  519. 626 print"               {CBM-G}  {CBM-V}   {CBM-K}    {CBM-K}{CBM-K}.{CBM-U}{CBM-U}{CBM-P}{CBM-P}{CBM-P}{CBM-U}{CBM-U}.."
  520. 627 print"               {CBM-G} {CBM-V}     {CBM-F}    ..........."
  521. 628 print"               {CBM-K}{CBM-K} {CBM-V}       {CBM-K}{CBM-K}"
  522. 629 print"              {CBM-K}{CBM-K} {CBM-K}    {CBM-C} {CBM-C}      t h e"
  523. 630 print"              {CBM-K}   {CBM-M}    {CBM-C}   "
  524. 631 print"                  {CBM-M}   {CBM-K} {CBM-C} {CBM-K}    e n d"
  525. 632 print"               {CBM-K}  {CBM-V}   {CBM-K}   "
  526. 633 print"              UN {CBM-V}  {CBM-V}   {CBM-K}{CBM-K}"
  527. 634 print"              JK   {CBM-V}                "
  528. 635 print"    N          {CBM-P}  {CBM-V}    {CBM-K}{CBM-K}           "
  529. 636 print"   N                 {CBM-K}  {CBM-K}           M "
  530. 637 print" N  {CBM-P} {CBM-Y}{CBM-Y}{CBM-Y}                     {CBM-Y}{CBM-Y}{CBM-Y}{CBM-U}    M"
  531. 638 print"N                                      M";
  532. 639 print"{CBM-U}                                      {CBM-U}";
  533. 640 print"                                        ";
  534. 641 print"                                        ";
  535. 642 print"                                        ";
  536. 643 print"                                        ";
  537. 650 print"                   {CBM-O}{CBM-U}{CBM-O}         ........"
  538. 651 print" jsl/ptv/cvt      {CBM-V}   {CBM-C}      {CBM-K}{CBM-K} {CBM-U}{CBM-P}{CBM-P}{CBM-U} {CBM-C}."
  539. 652 print"                              {CBM-K}       ."
  540. 653 print" january 2005               {CBM-K}{CBM-K}        ."
  541. 654 print"                   {CBM-V}         {CBM-K}        ."
  542. 655 print"               {CBM-G}  {CBM-V}   {CBM-K}    {CBM-K}{CBM-K}.{CBM-U}{CBM-U}{CBM-P}{CBM-P}{CBM-P}{CBM-U}{CBM-U}.."
  543. 656 print"               {CBM-G} {CBM-V}     {CBM-F}    ...........";
  544. 660 print"                   {CBM-O}{CBM-U}{CBM-O}         ...{CBM-U}{CBM-U}..."
  545. 661 print" jsl/ptv/cvt      {CBM-V}   {CBM-C}      {CBM-K}{CBM-K} {CBM-U}   ..."
  546. 662 print"                              {CBM-K}    {CBM-V}..."
  547. 663 print" january 2005               {CBM-K}{CBM-K}    {CBM-K}...."
  548. 664 print"                   {CBM-V}         {CBM-K}    ....."
  549. 665 print"               {CBM-G}  {CBM-V}   {CBM-K}    {CBM-K}{CBM-K}{CBM-P}   ......"
  550. 666 print"               {CBM-G} {CBM-V}     {CBM-F}    ...........";
  551. 670 print"                   {CBM-O}{CBM-U}{CBM-O}         ........"
  552. 671 print" jsl/ptv/cvt      {CBM-V}   {CBM-C}      {CBM-K}{CBM-K}{CBM-I}{CBM-Y}    {CBM-Y}."
  553. 672 print"                              {CBM-K}       ."
  554. 673 print" january 2005               {CBM-K}{CBM-K}        ."
  555. 674 print"                   {CBM-V}         {CBM-K}  {CBM-P}{CBM-I}{CBM-I}{CBM-P} {CBM-D}."
  556. 675 print"               {CBM-G}  {CBM-V}   {CBM-K}    {CBM-K}{CBM-K}{CBM-P}{CBM-U}........"
  557. 676 print"               {CBM-G} {CBM-V}     {CBM-F}    ...........";
  558. 700 goto 650
  559.