Author Topic: My 1996 Tiny Dungeon Game  (Read 2397 times)

0 Members and 1 Guest are viewing this topic.

Offline SierraKen

  • Forum Resident
  • Posts: 1454
My 1996 Tiny Dungeon Game
« on: January 11, 2021, 06:40:02 pm »
I made this in 1996 with QBasic. It uses SCREEN 13 so the window will be very small. It starts after the music plays. It's a very short game, I might make something larger sometime. It has some graphics that I made using DATA lines. If you die, the game ends, so you just start over. :) But mostly I want to show you guys how I used to code. :) The PSET loops I got from someone else and never really "learned" them. Which is why I still don't do it this way exactly. Although I do use 2 loops.

Edit: I just removed the MATRIX unused variable.

Code: QB64: [Select]
  1. 'Dungeon Of Motion And Sound
  2. 'By SierraKen
  3. 'Written April 24, 1996
  4. SCREEN 13: 'Sprites have to be in this Screen.
  5. PLAY "abcdabcd#"
  6. PLAY "abcdabcd#"
  7. PRINT "       Dungeon Of Motion And Sound"
  8. PRINT "By SierraKen"
  9. PRINT "This is a game on how well you": PRINT "can use your resources."
  10. PRINT "To end the game at any screen": PRINT "type end or END at any curser."
  11. INPUT "Enter a chosen name: "; nm$
  12. IF nm$ = "end" OR nm$ = "END" THEN END
  13. PRINT "Hello "; nm$; ", you are on a vacation in": PRINT "the Sierra Nevada Mountains and": PRINT "you decide to take a hike. ": PRINT "Then you find a cave and": PRINT "decide to enter it.": PRINT "All of a sudden, the entrance": PRINT "to the cave disappears!"
  14. GOSUB You
  15. CIRCLE (285, 200), 75: 'To draw the cave
  16. INPUT "Press enter here"; a$
  17. IF a$ = "end" OR a$ = "END" THEN END
  18. GOSUB You: 'To Draw You
  19. 'What you need to draw the sprite (dragon) from the data at the end of this program.
  20. FOR Y2 = 0 TO 63
  21.     FOR X2 = 0 TO 63
  22.         READ DC$
  23.         PSET (X2, Y2), VAL("&H" + DC$)
  24.     NEXT X2
  25. NEXT Y2
  26. PRINT "You see a Monster, and he says..."
  27. INPUT "Press enter here"; b$
  28. IF b$ = "end" OR b$ = "END" THEN END
  29. GOSUB You
  30. PRINT "Hello, my name is Joe the"
  31. PRINT "Friendly Monster."
  32. PRINT "I guard this cave and since you have": PRINT "no way out except at the end, I will"
  33. PRINT "help you by giving you a bow and": PRINT "some arrows."
  34. PRINT "If you get rid of the bad things in this": PRINT "cave, it will be mine forever again."
  35. PRINT "Goodbye and good luck."
  36. INPUT "Press enter here"; c$
  37. IF c$ = "end" OR c$ = "END" THEN END
  38. GOSUB You
  39. CIRCLE (20, 100), 10, 1: 'To draw a canteen
  40. PRINT "You enter another room in the cave."
  41. PRINT "You find a canteen full of water!"
  42. INPUT "Press enter here"; d$
  43. IF d$ = "end" OR d$ = "END" THEN END
  44. GOSUB You
  45. PRINT "Now you are in a room with": PRINT "a waterfall coming down."
  46. FOR w = 1 TO 100 STEP 10
  47.     FOR wt = 130 TO 240 STEP 10
  48.         LINE (w, wt)-(w, wt + 3): 'To draw the water drops
  49.         FOR tm = 1 TO 200: NEXT tm
  50.         SOUND 100, .1
  51.         LINE (w, wt)-(w, wt + 3), 0: 'To erase the water drops
  52.     NEXT wt
  53. PRINT "You find a gold nugget worth $100!"
  54. INPUT "Press enter here"; e$
  55. IF e$ = "end" OR e$ = "END" THEN END
  56. PRINT "There's snakes everywhere here!"
  57. GOSUB You
  58. FOR s = 1 TO 50 STEP 10
  59.     LINE (s, 100)-(s + 10, 110): 'To Draw The Snakes
  60. fight:
  61. LOCATE 2, 1
  62. INPUT "What should you use:"; f$
  63. IF f$ = "fight" OR f$ = "FIGHT" THEN LOCATE 3, 1: PRINT "Use what weapon?": GOTO fight
  64. IF f$ = "bow" OR f$ = "BOW" OR f$ = "Bow and Arrows" OR f$ = "bow and arrows" OR f$ = "BOW AND ARROWS" OR f$ = "BOW and ARROWS" THEN GOTO cool
  65. IF f$ = "fists" OR f$ = "FISTS" OR f$ = "hands" OR f$ = "HANDS" THEN PRINT "You attempt to punch the snakes, but it doesn't work."
  66. IF f$ = "shoot snakes" OR f$ = "SHOOT SNAKES" THEN PRINT "Type out your weapon."
  67. IF f$ = "gun" OR f$ = "GUN" THEN PRINT "You don't own a gun."
  68. IF f$ = "rocks" THEN PRINT "You attempt to throw rocks at the snakes but it doesn't harm them."
  69. IF f$ = "feet" OR f$ = "FEET" THEN PRINT "You try and step on the snakes, but it doesn't work."
  70. IF f$ = "help" OR f$ = "HELP" OR f$ = "HINT" OR f$ = "hint" THEN PRINT "Here's a hint, use a weapon that the dragon gave you."
  71. IF f$ = "END" OR f$ = "end" THEN END
  72. IF LEFT$(o$, 1) = " " OR o$ = "" THEN PRINT "You must type something.": PRINT "Type end to quit game."
  73. IF f$ = "rifle" OR f$ = "RIFLE" OR f$ = "artillery" OR f$ = "grenade" OR f$ = "GRENADE" OR f$ = "TANK" OR f$ = "tank" OR f$ = "bomb" OR f$ = "BOMB" THEN PRINT "This game doesn't use those weapons."
  74. IF f$ = "end" OR f$ = "END" THEN END
  75. tim:
  76. t = t + 1
  77. IF t > 5 THEN PRINT "You took too long to decide the": PRINT "right choice and you die.": END
  78. GOTO fight
  79. cool:
  80. PRINT "You use your bow and arrows": PRINT "and kill all the snakes!"
  81. PRINT "You also find many silver dollars": PRINT "that are worth $500!"
  82. INPUT "Press enter here"; g$
  83. IF g$ = "end" OR g$ = "END" THEN END
  84. GOSUB You
  85. PRINT "Now you see holes along side the walls."
  86. PRINT "You remember an Indiana Jones movie and"
  87. PRINT "you throw a rock into the room."
  88. FOR sn = 1 TO 35
  89.     SOUND 100, .1
  90.     FOR tm = 1 TO 600: NEXT tm
  91. NEXT sn
  92. FOR dart = 160 TO 200 STEP 5
  93.     FOR dt = 60 TO 200 STEP 5
  94.         LINE (dart, dt)-(dart, dt + 3): 'To draw the darts
  95.         FOR tm = 1 TO 200: NEXT tm
  96.         LINE (dart, dt)-(dart, dt + 3), 0: 'To erase the darts
  97.     NEXT dt
  98. NEXT dart
  99. PRINT "You see many darts flying out": PRINT "of the walls and to the rock."
  100. PRINT "So you keep throwing all the rocks": PRINT "it takes so there won't be any"
  101. PRINT "arrows left."
  102. INPUT "Press enter here"; h$
  103. IF h$ = "end" OR h$ = "END" THEN END
  104. GOSUB You
  105. FOR cl = 1 TO 12
  106.     LINE (20, 100)-(40, 130), cl, BF: 'To make the glowing jacket.
  107.     FOR tm = 1 TO 3000: NEXT tm
  108. NEXT cl
  109. PRINT "Now, you see a jacket in the middle"
  110. PRINT "of the room and it is glowing!:"
  111. PRINT "There is a note next to the jacket": PRINT "saying, 'this magic jacket will cause"
  112. PRINT "you to have two images of yourself."
  113. PRINT "So, you pick it up."
  114. INPUT "Press enter here"; j$
  115. IF j$ = "end" OR j$ = "END" THEN END
  116. GOSUB You
  117. LINE (100, 50)-(90, 105): 'To draw the rope
  118. LINE (80, 60)-(80, 190): LINE (150, 60)-(150, 190): 'To draw the chasm
  119. PRINT "You come to a place where there is"
  120. PRINT "a chasm seperating your path."
  121. PRINT "You see a rope and you swing across."
  122. INPUT "Press enter here"; k$
  123. IF k$ = "end" OR k$ = "END" THEN END
  124. GOSUB You
  125. PRINT "You now see a small drum in the": PRINT "middle of the room."
  126. PRINT "You see another note saying,": PRINT "'Tap twice on the drum head": PRINT "and it will play some magic beats."
  127. 'To draw the drum
  128. CIRCLE (20, 100), 10, , , , .7
  129. LINE (30, 100)-(30, 115): LINE (10, 100)-(10, 115): CIRCLE (20, 115), 10, , , , .7
  130. INPUT "Do you pick up the drum(Y/N)"; l$
  131. IF l$ = "Y" OR l$ = "y" OR l$ = "yes" OR l$ = "YES" OR l$ = "Yes" THEN drum = 1
  132. IF l$ = "end" OR l$ = "END" THEN END
  133. GOSUB You
  134. FOR bats = 1 TO 30
  135.     X = RND * 200: Y = RND * 200
  136.     CIRCLE (X, Y), 5, , , , .7: 'To draw the bats
  137.     SOUND 800, .1
  138. NEXT bats
  139. PRINT "There are bats everywhere!"
  140. ti = 0
  141. bat:
  142. INPUT "What should you use:"; m$
  143. IF drum = 0 THEN PRINT "You don't have the right item": PRINT "to scare away the bats!": END
  144. IF m$ = "drum" OR m$ = "DRUM" OR m$ = "DRUMS" OR m$ = "magic drum" OR m$ = "MAGIC DRUM" OR m$ = "Drum" OR m$ = "Drums" OR m$ = "drums" THEN GOTO drumming:
  145. IF m$ = "bow" OR m$ = "BOW" OR m$ = "bow and arrows" OR m$ = "BOW AND ARROWS" THEN PRINT "You attempt to shoot all the bats,": PRINT "but there are too many and they are": PRINT "moving too fast."
  146. IF m$ = "fists" OR m$ = "fist" OR m$ = "foot" OR m$ = "foot" OR m$ = "FISTS" OR m$ = "FIST" OR m$ = "FOOT" THEN PRINT "Your body isn't useful as a weapon."
  147. IF m$ = "jacket" OR m$ = "magic jacket" OR m$ = "MAGIC JACKET" OR m$ = "JACKET" THEN PRINT "You put on the jacket, but the bats still bite you."
  148. IF m$ = "" THEN PRINT "You must type something.": PRINT "Type end to quit game."
  149. IF m$ = "gun" OR m$ = "GUN" OR m$ = "rifle" OR m$ = "RIFLE" OR m$ = "artillery" OR m$ = "grenade" OR m$ = "GRENADE" OR m$ = "TANK" OR m$ = "tank" OR m$ = "bomb" OR m$ = "BOMB" THEN PRINT "This game doesn't use those weapons."
  150. IF m$ = "end" OR m$ = "END" THEN END
  151. tiem:
  152. ti = ti + 1
  153. IF ti > 5 THEN PRINT "It took too long and the bats killed you!": END
  154. GOTO bat
  155. drumming:
  156. FOR dr = 1 TO 20 STEP 2
  157.     SOUND 100 + dr * 10, .1
  158.     FOR tm = 1 TO 3000: NEXT tm
  159. NEXT dr
  160. PRINT "The sound scared all the bats away!"
  161. INPUT "Press enter here"; n$
  162. IF n$ = "end" OR f$ = "END" THEN END
  163. GOSUB You
  164. 'To draw the gremlin from data below
  165. FOR Y2 = 0 TO 63
  166.     FOR X2 = 0 TO 63
  167.         READ DC$
  168.         PSET (X2, Y2 + 100), VAL("&H" + DC$)
  169.     NEXT X2
  170. NEXT Y2
  171. Gremlin:
  172. PRINT "You see a gremlin!"
  173. INPUT "What should you use:"; o$
  174. IF o$ = "bow" OR o$ = "BOW" THEN PRINT "You are out of arrows."
  175. IF o$ = "drum" OR o$ = "DRUM" THEN PRINT "The gremlin doen't respond to it."
  176. IF o$ = "jacket" OR o$ = "JACKET" OR o$ = "MAGIC JACKET" OR o$ = "magic jacket" THEN PRINT "You put it on to trick the Gremlin.": GOTO great
  177. IF LEFT$(o$, 1) = " " OR o$ = "" THEN PRINT "You must type something.": PRINT "Type end to quit your game."
  178. IF o$ = "gun" OR o$ = "GUN" OR o$ = "rifle" OR o$ = "RIFLE" OR o$ = "artillery" OR o$ = "grenade" OR o$ = "GRENADE" OR o$ = "TANK" OR o$ = "tank" OR o$ = "bomb" OR o$ = "BOMB" THEN PRINT "This game doesn't use those weapons."
  179. tym:
  180. ty = ty + 1
  181. IF ty > 5 THEN PRINT "It took you too long to get the right choice.": END
  182. IF o$ = "end" OR o$ = "END" THEN END
  183. GOTO Gremlin
  184. great:
  185. 'To draw the other image of yourself
  186. LINE (150, 150)-(160, 180), 1, BF
  187. LINE (150, 180)-(140, 190), 1
  188. LINE (160, 180)-(170, 190), 1
  189. LINE (155, 150)-(155, 145), 1
  190. LINE (150, 160)-(140, 155), 1
  191. LINE (160, 160)-(170, 155), 1
  192. CIRCLE (155, 135), 10
  193. CIRCLE (155, 138), 3, , , , .6
  194. LINE (152, 132)-(152, 132)
  195. LINE (158, 132)-(158, 132)
  196. PRINT "The Gremlin runs toward it": PRINT "and you run!"
  197. INPUT "Press enter here"; p$
  198. IF p$ = "END" OR p$ = "end" THEN END
  199. GOSUB You
  200. PRINT "You are now in another room": PRINT "and you see a light": PRINT "up ahead!"
  201. PRINT "Then, you hear a sound in back": PRINT "of you and it's the monster eating": PRINT "the Gremlin!"
  202. PRINT "After he's done, he says,": PRINT "'Thank you "; nm$; "!'"
  203. INPUT "Press enter here"; q$
  204. IF q$ = "end" OR q$ = "END" THEN END
  205. GOSUB You
  206. PRINT "You see $1,000 worth of gold!"
  207. PRINT "And then you find the exit out of": PRINT "the cave!"
  208. PRINT "When you leave the cave, all the magic": PRINT "items disappear and so does the cave!"
  209. GOSUB You
  210. PRINT "            THE    END"
  211. 'To draw the dragon again from the data.
  212. FOR Y2 = 0 TO 63
  213.     FOR X2 = 0 TO 63
  214.         READ DC$
  215.         PSET (X2, Y2 + 100), VAL("&H" + DC$)
  216.     NEXT X2
  217. NEXT Y2
  218. 'To draw you
  219. You:
  220. LINE (100, 100)-(110, 130), 1, BF
  221. LINE (100, 130)-(90, 140), 1
  222. LINE (110, 130)-(120, 140), 1
  223. LINE (105, 100)-(105, 95), 1
  224. LINE (100, 110)-(90, 105), 1
  225. LINE (110, 110)-(120, 105), 1
  226. CIRCLE (105, 85), 10
  227. CIRCLE (105, 88), 3, , , , .6
  228. LINE (102, 82)-(102, 82)
  229. LINE (108, 82)-(108, 82)
  230. 'Data for the monster picture. I used a Sprite Maker.
  231. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  232. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  233. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  234. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  235. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  236. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  237. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  238. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  239. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  240. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  241. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  242. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  243. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  244. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  245. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  246. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  247. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  248. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  249. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  250. DATA 0,0,0,0,0,0,0,0,0,0,0,6,6,6,6,6,6,6,6,6,6,6,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  251. DATA 0,0,0,0,0,0,0,0,0,0,6,6,6,6,6,6,6,6,6,6,6,6,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  252. DATA 0,0,0,0,0,0,0,0,0,6,6,6,2B,2B,6,6,6,6,2B,2B,6,6,6,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  253. DATA 0,0,0,0,0,0,0,0,6,6,6,6,2B,2B,6,6,6,6,2B,2B,6,6,6,6,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  254. DATA 0,0,0,0,0,0,0,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  255. DATA 0,0,0,0,0,0,0,0,6,6,6,2B,6,6,6,6,6,6,6,6,2B,6,6,6,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  256. DATA 0,0,0,0,0,0,0,0,0,6,6,2B,6,6,6,6,6,6,6,6,2B,6,6,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  257. DATA 0,0,0,0,0,0,0,0,0,0,6,6,2B,2B,2B,2B,2B,2B,6,6,6,0,0,0,6,6,6,6,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  258. DATA 0,0,0,0,0,0,0,0,0,0,0,6,6,6,6,6,6,6,6,6,6,6,0,0,0,0,6,6,6,6,6,6,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  259. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,28,28,28,28,28,28,28,0,0,6,6,6,6,6,6,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  260. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,28,28,28,28,28,28,28,0,0,0,6,6,6,6,6,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  261. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,28,28,28,28,28,28,28,0,0,0,6,6,6,6,6,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  262. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,28,28,28,28,28,28,28,0,0,0,0,0,28,28,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  263. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,28,28,28,28,28,28,28,0,0,0,0,28,28,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  264. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,28,28,28,28,28,28,28,0,0,0,28,28,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  265. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,28,28,28,28,28,28,28,0,0,28,28,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  266. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,28,28,28,28,28,28,28,0,28,28,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  267. DATA 0,0,0,0,0,0,0,0,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  268. DATA 0,0,0,0,0,0,0,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  269. DATA 0,0,0,0,0,0,28,28,0,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  270. DATA 0,28,28,28,28,28,28,28,0,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  271. DATA 28,0,0,0,28,28,28,28,0,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  272. DATA 0,0,0,28,0,28,28,28,0,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  273. DATA 0,28,28,0,0,28,0,28,0,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  274. DATA 0,0,0,0,0,28,0,28,0,0,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  275. DATA 0,0,0,0,0,0,0,0,0,0,28,28,28,28,28,0,0,0,0,0,0,0,28,28,28,28,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  276. DATA 0,0,0,0,0,0,0,0,28,28,28,28,28,28,28,0,0,0,0,0,0,0,28,28,28,28,28,28,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  277. DATA 0,0,0,0,0,0,28,28,28,28,28,28,28,28,28,0,0,0,0,0,0,0,28,28,28,28,28,28,28,28,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  278. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  279. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  280. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  281. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  282. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  283. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  284. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  285. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  286. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  287. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  288. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  289. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  290. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  291. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  292. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  293. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  294. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  295. 'DATA FOR THE GREMLIN PICTURE
  296. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  297. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  298. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  299. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  300. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  301. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  302. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  303. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  304. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  305. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  306. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  307. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  308. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  309. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  310. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  311. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,77,0,0,77,0,0,0,0,77,0,0,77,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  312. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,77,D9,77,77,D9,77,0,0,77,D9,77,77,D9,77,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  313. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,77,77,77,77,77,77,77,77,77,77,77,77,77,77,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  314. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,D9,77,77,77,77,77,77,77,77,77,77,77,77,77,77,D9,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  315. DATA 0,0,0,D9,0,D9,0,D9,0,0,0,0,0,D9,77,77,77,D3,D3,77,77,77,77,D3,D3,77,77,77,D9,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  316. DATA D9,0,0,D9,0,D9,0,D9,0,0,0,D9,0,D9,77,77,77,D3,D3,77,77,77,77,D3,D3,77,77,77,D9,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  317. DATA 0,D9,0,D9,0,D9,0,D9,0,0,D9,0,0,0,77,77,77,77,77,77,77,77,77,77,77,77,77,77,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  318. DATA 0,0,D9,D9,D9,D9,D9,D9,D9,D9,0,0,0,0,77,77,77,77,77,77,77,77,77,77,77,77,77,77,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  319. DATA 0,0,0,D9,D9,D9,D9,D9,0,0,0,0,0,0,77,77,77,D3,19,D3,D3,19,D3,D3,19,77,77,77,0,0,0,0,0,0,0,0,0,0,0,0,0,D9,D9,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  320. DATA 0,0,0,D9,D9,D9,D9,D9,0,0,0,0,0,0,77,77,77,19,D3,D3,19,D3,D3,19,D3,77,77,77,0,0,0,0,0,0,0,0,0,D9,D9,D9,D9,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  321. DATA 0,0,0,D9,D9,D9,D9,D9,0,0,0,0,0,0,0,0,77,77,77,77,77,77,77,77,77,77,0,0,0,0,0,0,77,77,77,77,77,D9,D9,D9,D9,0,D9,D9,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  322. DATA 0,0,0,0,77,77,77,0,0,0,0,0,0,0,0,0,77,77,77,77,77,77,77,77,77,77,0,0,0,0,0,77,77,77,77,77,77,D9,D9,D9,D9,D9,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  323. DATA 0,0,0,0,77,77,77,0,0,0,0,0,0,0,0,0,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,78,D9,D9,D9,D9,0,0,D9,D9,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  324. DATA 0,0,0,0,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,0,0,0,0,D9,D9,D9,D9,D9,D9,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  325. DATA 0,0,0,0,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  326. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,77,77,77,77,77,77,77,77,77,77,77,77,77,77,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  327. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,77,D9,D9,D9,D9,D9,D9,D9,D9,D9,D9,D9,77,77,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  328. DATA 0,0,0,0,0,0,77,77,77,77,77,77,77,77,77,D9,D9,D9,D9,D9,D9,D9,D9,D9,D9,D9,77,77,77,77,77,77,77,77,77,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  329. DATA 0,0,0,0,0,0,77,77,77,77,77,77,77,77,77,D9,D9,D9,D9,D9,D9,D9,D9,D9,D9,D9,77,77,77,77,77,77,77,77,77,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  330. DATA 0,0,0,0,0,0,77,77,77,77,77,77,77,77,D9,D9,D9,D9,D9,D9,D9,D9,D9,D9,D9,D9,D9,77,77,77,77,77,77,77,77,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  331. DATA 0,0,0,0,0,0,77,77,77,77,77,0,0,D9,D9,D9,D9,D9,D9,D9,D9,D9,D9,D9,D9,D9,D9,D9,0,0,77,77,77,77,77,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  332. DATA 0,0,0,0,0,0,77,77,77,77,77,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,77,77,77,77,77,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  333. DATA 0,0,0,0,0,0,D9,D9,D9,D9,D9,D9,D9,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,77,77,77,77,77,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  334. DATA 0,0,0,0,0,0,D9,D9,D9,D9,D9,D9,D9,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,D9,D9,D9,D9,D9,D9,D9,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  335. DATA 0,0,0,0,0,0,D9,0,D9,0,D9,0,D9,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,D9,D9,D9,D9,D9,D9,D9,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  336. DATA 0,0,0,0,0,0,D9,0,D9,0,D9,0,D9,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,D9,0,D9,0,D9,0,D9,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  337. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,D9,0,D9,0,D9,0,D9,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  338. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  339. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  340. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  341. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  342. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  343. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  344. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  345. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  346. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  347. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  348. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  349. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  350. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  351. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  352. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  353. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  354. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  355. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  356. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  357. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  358. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  359. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  360.  

« Last Edit: January 11, 2021, 07:21:48 pm by SierraKen »

Marked as best answer by SierraKen on January 11, 2021, 06:38:07 pm

Offline SMcNeill

  • QB64 Developer
  • Forum Resident
  • Posts: 3972
    • Steve’s QB64 Archive Forum
Re: My 1996 Tiny Dungeon Game
« Reply #1 on: January 11, 2021, 08:18:33 pm »
I worked and worked and worked and worked and worked and worked, but I finally got this to become a resizable, scalable window for us, so folks won't go blind staring at such a tiny little SCREEN 13 screen!

Code: QB64: [Select]
  1. 'Massive modification by STEVE!!
  2.  
  3.  
  4. 'Dungeon Of Motion And Sound
  5. 'By SierraKen
  6. 'Written April 24, 1996
  7. SCREEN 13: 'Sprites have to be in this Screen.
  8. PLAY "abcdabcd#"
  9. PLAY "abcdabcd#"
  10. PRINT "       Dungeon Of Motion And Sound"
  11. PRINT "By SierraKen"
  12. PRINT "This is a game on how well you": PRINT "can use your resources."
  13. PRINT "To end the game at any screen": PRINT "type end or END at any curser."
  14. INPUT "Enter a chosen name: "; nm$
  15. IF nm$ = "end" OR nm$ = "END" THEN END
  16. PRINT "Hello "; nm$; ", you are on a vacation in": PRINT "the Sierra Nevada Mountains and": PRINT "you decide to take a hike. ": PRINT "Then you find a cave and": PRINT "decide to enter it.": PRINT "All of a sudden, the entrance": PRINT "to the cave disappears!"
  17. GOSUB You
  18. CIRCLE (285, 200), 75: 'To draw the cave
  19. INPUT "Press enter here"; a$
  20. IF a$ = "end" OR a$ = "END" THEN END
  21. GOSUB You: 'To Draw You
  22. 'What you need to draw the sprite (dragon) from the data at the end of this program.
  23. FOR Y2 = 0 TO 63
  24.     FOR X2 = 0 TO 63
  25.         READ DC$
  26.         PSET (X2, Y2), VAL("&H" + DC$)
  27.     NEXT X2
  28. NEXT Y2
  29. PRINT "You see a Monster, and he says..."
  30. INPUT "Press enter here"; b$
  31. IF b$ = "end" OR b$ = "END" THEN END
  32. GOSUB You
  33. PRINT "Hello, my name is Joe the"
  34. PRINT "Friendly Monster."
  35. PRINT "I guard this cave and since you have": PRINT "no way out except at the end, I will"
  36. PRINT "help you by giving you a bow and": PRINT "some arrows."
  37. PRINT "If you get rid of the bad things in this": PRINT "cave, it will be mine forever again."
  38. PRINT "Goodbye and good luck."
  39. INPUT "Press enter here"; c$
  40. IF c$ = "end" OR c$ = "END" THEN END
  41. GOSUB You
  42. CIRCLE (20, 100), 10, 1: 'To draw a canteen
  43. PRINT "You enter another room in the cave."
  44. PRINT "You find a canteen full of water!"
  45. INPUT "Press enter here"; d$
  46. IF d$ = "end" OR d$ = "END" THEN END
  47. GOSUB You
  48. PRINT "Now you are in a room with": PRINT "a waterfall coming down."
  49. FOR w = 1 TO 100 STEP 10
  50.     FOR wt = 130 TO 240 STEP 10
  51.         LINE (w, wt)-(w, wt + 3): 'To draw the water drops
  52.         FOR tm = 1 TO 200: NEXT tm
  53.         SOUND 100, .1
  54.         LINE (w, wt)-(w, wt + 3), 0: 'To erase the water drops
  55.     NEXT wt
  56. PRINT "You find a gold nugget worth $100!"
  57. INPUT "Press enter here"; e$
  58. IF e$ = "end" OR e$ = "END" THEN END
  59. PRINT "There's snakes everywhere here!"
  60. GOSUB You
  61. FOR s = 1 TO 50 STEP 10
  62.     LINE (s, 100)-(s + 10, 110): 'To Draw The Snakes
  63. fight:
  64. LOCATE 2, 1
  65. INPUT "What should you use:"; f$
  66. IF f$ = "fight" OR f$ = "FIGHT" THEN LOCATE 3, 1: PRINT "Use what weapon?": GOTO fight
  67. IF f$ = "bow" OR f$ = "BOW" OR f$ = "Bow and Arrows" OR f$ = "bow and arrows" OR f$ = "BOW AND ARROWS" OR f$ = "BOW and ARROWS" THEN GOTO cool
  68. IF f$ = "fists" OR f$ = "FISTS" OR f$ = "hands" OR f$ = "HANDS" THEN PRINT "You attempt to punch the snakes, but it doesn't work."
  69. IF f$ = "shoot snakes" OR f$ = "SHOOT SNAKES" THEN PRINT "Type out your weapon."
  70. IF f$ = "gun" OR f$ = "GUN" THEN PRINT "You don't own a gun."
  71. IF f$ = "rocks" THEN PRINT "You attempt to throw rocks at the snakes but it doesn't harm them."
  72. IF f$ = "feet" OR f$ = "FEET" THEN PRINT "You try and step on the snakes, but it doesn't work."
  73. IF f$ = "help" OR f$ = "HELP" OR f$ = "HINT" OR f$ = "hint" THEN PRINT "Here's a hint, use a weapon that the dragon gave you."
  74. IF f$ = "END" OR f$ = "end" THEN END
  75. IF LEFT$(o$, 1) = " " OR o$ = "" THEN PRINT "You must type something.": PRINT "Type end to quit game."
  76. IF f$ = "rifle" OR f$ = "RIFLE" OR f$ = "artillery" OR f$ = "grenade" OR f$ = "GRENADE" OR f$ = "TANK" OR f$ = "tank" OR f$ = "bomb" OR f$ = "BOMB" THEN PRINT "This game doesn't use those weapons."
  77. IF f$ = "end" OR f$ = "END" THEN END
  78. tim:
  79. t = t + 1
  80. IF t > 5 THEN PRINT "You took too long to decide the": PRINT "right choice and you die.": END
  81. GOTO fight
  82. cool:
  83. PRINT "You use your bow and arrows": PRINT "and kill all the snakes!"
  84. PRINT "You also find many silver dollars": PRINT "that are worth $500!"
  85. INPUT "Press enter here"; g$
  86. IF g$ = "end" OR g$ = "END" THEN END
  87. GOSUB You
  88. PRINT "Now you see holes along side the walls."
  89. PRINT "You remember an Indiana Jones movie and"
  90. PRINT "you throw a rock into the room."
  91. FOR sn = 1 TO 35
  92.     SOUND 100, .1
  93.     FOR tm = 1 TO 600: NEXT tm
  94. NEXT sn
  95. FOR dart = 160 TO 200 STEP 5
  96.     FOR dt = 60 TO 200 STEP 5
  97.         LINE (dart, dt)-(dart, dt + 3): 'To draw the darts
  98.         FOR tm = 1 TO 200: NEXT tm
  99.         LINE (dart, dt)-(dart, dt + 3), 0: 'To erase the darts
  100.     NEXT dt
  101. NEXT dart
  102. PRINT "You see many darts flying out": PRINT "of the walls and to the rock."
  103. PRINT "So you keep throwing all the rocks": PRINT "it takes so there won't be any"
  104. PRINT "arrows left."
  105. INPUT "Press enter here"; h$
  106. IF h$ = "end" OR h$ = "END" THEN END
  107. GOSUB You
  108. FOR cl = 1 TO 12
  109.     LINE (20, 100)-(40, 130), cl, BF: 'To make the glowing jacket.
  110.     FOR tm = 1 TO 3000: NEXT tm
  111. NEXT cl
  112. PRINT "Now, you see a jacket in the middle"
  113. PRINT "of the room and it is glowing!:"
  114. PRINT "There is a note next to the jacket": PRINT "saying, 'this magic jacket will cause"
  115. PRINT "you to have two images of yourself."
  116. PRINT "So, you pick it up."
  117. INPUT "Press enter here"; j$
  118. IF j$ = "end" OR j$ = "END" THEN END
  119. GOSUB You
  120. LINE (100, 50)-(90, 105): 'To draw the rope
  121. LINE (80, 60)-(80, 190): LINE (150, 60)-(150, 190): 'To draw the chasm
  122. PRINT "You come to a place where there is"
  123. PRINT "a chasm seperating your path."
  124. PRINT "You see a rope and you swing across."
  125. INPUT "Press enter here"; k$
  126. IF k$ = "end" OR k$ = "END" THEN END
  127. GOSUB You
  128. PRINT "You now see a small drum in the": PRINT "middle of the room."
  129. PRINT "You see another note saying,": PRINT "'Tap twice on the drum head": PRINT "and it will play some magic beats."
  130. 'To draw the drum
  131. CIRCLE (20, 100), 10, , , , .7
  132. LINE (30, 100)-(30, 115): LINE (10, 100)-(10, 115): CIRCLE (20, 115), 10, , , , .7
  133. INPUT "Do you pick up the drum(Y/N)"; l$
  134. IF l$ = "Y" OR l$ = "y" OR l$ = "yes" OR l$ = "YES" OR l$ = "Yes" THEN drum = 1
  135. IF l$ = "end" OR l$ = "END" THEN END
  136. GOSUB You
  137. FOR bats = 1 TO 30
  138.     X = RND * 200: Y = RND * 200
  139.     CIRCLE (X, Y), 5, , , , .7: 'To draw the bats
  140.     SOUND 800, .1
  141. NEXT bats
  142. PRINT "There are bats everywhere!"
  143. ti = 0
  144. bat:
  145. INPUT "What should you use:"; m$
  146. IF drum = 0 THEN PRINT "You don't have the right item": PRINT "to scare away the bats!": END
  147. IF m$ = "drum" OR m$ = "DRUM" OR m$ = "DRUMS" OR m$ = "magic drum" OR m$ = "MAGIC DRUM" OR m$ = "Drum" OR m$ = "Drums" OR m$ = "drums" THEN GOTO drumming:
  148. IF m$ = "bow" OR m$ = "BOW" OR m$ = "bow and arrows" OR m$ = "BOW AND ARROWS" THEN PRINT "You attempt to shoot all the bats,": PRINT "but there are too many and they are": PRINT "moving too fast."
  149. IF m$ = "fists" OR m$ = "fist" OR m$ = "foot" OR m$ = "foot" OR m$ = "FISTS" OR m$ = "FIST" OR m$ = "FOOT" THEN PRINT "Your body isn't useful as a weapon."
  150. IF m$ = "jacket" OR m$ = "magic jacket" OR m$ = "MAGIC JACKET" OR m$ = "JACKET" THEN PRINT "You put on the jacket, but the bats still bite you."
  151. IF m$ = "" THEN PRINT "You must type something.": PRINT "Type end to quit game."
  152. IF m$ = "gun" OR m$ = "GUN" OR m$ = "rifle" OR m$ = "RIFLE" OR m$ = "artillery" OR m$ = "grenade" OR m$ = "GRENADE" OR m$ = "TANK" OR m$ = "tank" OR m$ = "bomb" OR m$ = "BOMB" THEN PRINT "This game doesn't use those weapons."
  153. IF m$ = "end" OR m$ = "END" THEN END
  154. tiem:
  155. ti = ti + 1
  156. IF ti > 5 THEN PRINT "It took too long and the bats killed you!": END
  157. GOTO bat
  158. drumming:
  159. FOR dr = 1 TO 20 STEP 2
  160.     SOUND 100 + dr * 10, .1
  161.     FOR tm = 1 TO 3000: NEXT tm
  162. NEXT dr
  163. PRINT "The sound scared all the bats away!"
  164. INPUT "Press enter here"; n$
  165. IF n$ = "end" OR f$ = "END" THEN END
  166. GOSUB You
  167. 'To draw the gremlin from data below
  168. FOR Y2 = 0 TO 63
  169.     FOR X2 = 0 TO 63
  170.         READ DC$
  171.         PSET (X2, Y2 + 100), VAL("&H" + DC$)
  172.     NEXT X2
  173. NEXT Y2
  174. Gremlin:
  175. PRINT "You see a gremlin!"
  176. INPUT "What should you use:"; o$
  177. IF o$ = "bow" OR o$ = "BOW" THEN PRINT "You are out of arrows."
  178. IF o$ = "drum" OR o$ = "DRUM" THEN PRINT "The gremlin doen't respond to it."
  179. IF o$ = "jacket" OR o$ = "JACKET" OR o$ = "MAGIC JACKET" OR o$ = "magic jacket" THEN PRINT "You put it on to trick the Gremlin.": GOTO great
  180. IF LEFT$(o$, 1) = " " OR o$ = "" THEN PRINT "You must type something.": PRINT "Type end to quit your game."
  181. IF o$ = "gun" OR o$ = "GUN" OR o$ = "rifle" OR o$ = "RIFLE" OR o$ = "artillery" OR o$ = "grenade" OR o$ = "GRENADE" OR o$ = "TANK" OR o$ = "tank" OR o$ = "bomb" OR o$ = "BOMB" THEN PRINT "This game doesn't use those weapons."
  182. tym:
  183. ty = ty + 1
  184. IF ty > 5 THEN PRINT "It took you too long to get the right choice.": END
  185. IF o$ = "end" OR o$ = "END" THEN END
  186. GOTO Gremlin
  187. great:
  188. 'To draw the other image of yourself
  189. LINE (150, 150)-(160, 180), 1, BF
  190. LINE (150, 180)-(140, 190), 1
  191. LINE (160, 180)-(170, 190), 1
  192. LINE (155, 150)-(155, 145), 1
  193. LINE (150, 160)-(140, 155), 1
  194. LINE (160, 160)-(170, 155), 1
  195. CIRCLE (155, 135), 10
  196. CIRCLE (155, 138), 3, , , , .6
  197. LINE (152, 132)-(152, 132)
  198. LINE (158, 132)-(158, 132)
  199. PRINT "The Gremlin runs toward it": PRINT "and you run!"
  200. INPUT "Press enter here"; p$
  201. IF p$ = "END" OR p$ = "end" THEN END
  202. GOSUB You
  203. PRINT "You are now in another room": PRINT "and you see a light": PRINT "up ahead!"
  204. PRINT "Then, you hear a sound in back": PRINT "of you and it's the monster eating": PRINT "the Gremlin!"
  205. PRINT "After he's done, he says,": PRINT "'Thank you "; nm$; "!'"
  206. INPUT "Press enter here"; q$
  207. IF q$ = "end" OR q$ = "END" THEN END
  208. GOSUB You
  209. PRINT "You see $1,000 worth of gold!"
  210. PRINT "And then you find the exit out of": PRINT "the cave!"
  211. PRINT "When you leave the cave, all the magic": PRINT "items disappear and so does the cave!"
  212. GOSUB You
  213. PRINT "            THE    END"
  214. 'To draw the dragon again from the data.
  215. FOR Y2 = 0 TO 63
  216.     FOR X2 = 0 TO 63
  217.         READ DC$
  218.         PSET (X2, Y2 + 100), VAL("&H" + DC$)
  219.     NEXT X2
  220. NEXT Y2
  221. 'To draw you
  222. You:
  223. LINE (100, 100)-(110, 130), 1, BF
  224. LINE (100, 130)-(90, 140), 1
  225. LINE (110, 130)-(120, 140), 1
  226. LINE (105, 100)-(105, 95), 1
  227. LINE (100, 110)-(90, 105), 1
  228. LINE (110, 110)-(120, 105), 1
  229. CIRCLE (105, 85), 10
  230. CIRCLE (105, 88), 3, , , , .6
  231. LINE (102, 82)-(102, 82)
  232. LINE (108, 82)-(108, 82)
  233. 'Data for the monster picture. I used a Sprite Maker.
  234. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  235. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  236. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  237. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  238. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  239. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  240. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  241. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  242. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  243. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  244. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  245. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  246. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  247. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  248. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  249. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  250. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  251. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  252. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  253. DATA 0,0,0,0,0,0,0,0,0,0,0,6,6,6,6,6,6,6,6,6,6,6,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  254. DATA 0,0,0,0,0,0,0,0,0,0,6,6,6,6,6,6,6,6,6,6,6,6,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  255. DATA 0,0,0,0,0,0,0,0,0,6,6,6,2B,2B,6,6,6,6,2B,2B,6,6,6,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  256. DATA 0,0,0,0,0,0,0,0,6,6,6,6,2B,2B,6,6,6,6,2B,2B,6,6,6,6,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  257. DATA 0,0,0,0,0,0,0,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  258. DATA 0,0,0,0,0,0,0,0,6,6,6,2B,6,6,6,6,6,6,6,6,2B,6,6,6,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  259. DATA 0,0,0,0,0,0,0,0,0,6,6,2B,6,6,6,6,6,6,6,6,2B,6,6,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  260. DATA 0,0,0,0,0,0,0,0,0,0,6,6,2B,2B,2B,2B,2B,2B,6,6,6,0,0,0,6,6,6,6,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  261. DATA 0,0,0,0,0,0,0,0,0,0,0,6,6,6,6,6,6,6,6,6,6,6,0,0,0,0,6,6,6,6,6,6,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  262. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,28,28,28,28,28,28,28,0,0,6,6,6,6,6,6,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  263. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,28,28,28,28,28,28,28,0,0,0,6,6,6,6,6,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  264. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,28,28,28,28,28,28,28,0,0,0,6,6,6,6,6,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  265. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,28,28,28,28,28,28,28,0,0,0,0,0,28,28,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  266. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,28,28,28,28,28,28,28,0,0,0,0,28,28,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  267. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,28,28,28,28,28,28,28,0,0,0,28,28,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  268. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,28,28,28,28,28,28,28,0,0,28,28,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  269. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,28,28,28,28,28,28,28,0,28,28,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  270. DATA 0,0,0,0,0,0,0,0,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  271. DATA 0,0,0,0,0,0,0,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  272. DATA 0,0,0,0,0,0,28,28,0,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  273. DATA 0,28,28,28,28,28,28,28,0,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  274. DATA 28,0,0,0,28,28,28,28,0,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  275. DATA 0,0,0,28,0,28,28,28,0,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  276. DATA 0,28,28,0,0,28,0,28,0,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  277. DATA 0,0,0,0,0,28,0,28,0,0,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  278. DATA 0,0,0,0,0,0,0,0,0,0,28,28,28,28,28,0,0,0,0,0,0,0,28,28,28,28,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  279. DATA 0,0,0,0,0,0,0,0,28,28,28,28,28,28,28,0,0,0,0,0,0,0,28,28,28,28,28,28,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  280. DATA 0,0,0,0,0,0,28,28,28,28,28,28,28,28,28,0,0,0,0,0,0,0,28,28,28,28,28,28,28,28,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  281. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  282. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  283. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  284. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  285. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  286. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  287. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  288. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  289. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  290. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  291. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  292. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  293. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  294. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  295. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  296. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  297. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  298. 'DATA FOR THE GREMLIN PICTURE
  299. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  300. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  301. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  302. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  303. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  304. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  305. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  306. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  307. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  308. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  309. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  310. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  311. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  312. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  313. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  314. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,77,0,0,77,0,0,0,0,77,0,0,77,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  315. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,77,D9,77,77,D9,77,0,0,77,D9,77,77,D9,77,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  316. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,77,77,77,77,77,77,77,77,77,77,77,77,77,77,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  317. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,D9,77,77,77,77,77,77,77,77,77,77,77,77,77,77,D9,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  318. DATA 0,0,0,D9,0,D9,0,D9,0,0,0,0,0,D9,77,77,77,D3,D3,77,77,77,77,D3,D3,77,77,77,D9,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  319. DATA D9,0,0,D9,0,D9,0,D9,0,0,0,D9,0,D9,77,77,77,D3,D3,77,77,77,77,D3,D3,77,77,77,D9,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  320. DATA 0,D9,0,D9,0,D9,0,D9,0,0,D9,0,0,0,77,77,77,77,77,77,77,77,77,77,77,77,77,77,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  321. DATA 0,0,D9,D9,D9,D9,D9,D9,D9,D9,0,0,0,0,77,77,77,77,77,77,77,77,77,77,77,77,77,77,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  322. DATA 0,0,0,D9,D9,D9,D9,D9,0,0,0,0,0,0,77,77,77,D3,19,D3,D3,19,D3,D3,19,77,77,77,0,0,0,0,0,0,0,0,0,0,0,0,0,D9,D9,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  323. DATA 0,0,0,D9,D9,D9,D9,D9,0,0,0,0,0,0,77,77,77,19,D3,D3,19,D3,D3,19,D3,77,77,77,0,0,0,0,0,0,0,0,0,D9,D9,D9,D9,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  324. DATA 0,0,0,D9,D9,D9,D9,D9,0,0,0,0,0,0,0,0,77,77,77,77,77,77,77,77,77,77,0,0,0,0,0,0,77,77,77,77,77,D9,D9,D9,D9,0,D9,D9,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  325. DATA 0,0,0,0,77,77,77,0,0,0,0,0,0,0,0,0,77,77,77,77,77,77,77,77,77,77,0,0,0,0,0,77,77,77,77,77,77,D9,D9,D9,D9,D9,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  326. DATA 0,0,0,0,77,77,77,0,0,0,0,0,0,0,0,0,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,78,D9,D9,D9,D9,0,0,D9,D9,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  327. DATA 0,0,0,0,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,0,0,0,0,D9,D9,D9,D9,D9,D9,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  328. DATA 0,0,0,0,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,77,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  329. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,77,77,77,77,77,77,77,77,77,77,77,77,77,77,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  330. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,77,D9,D9,D9,D9,D9,D9,D9,D9,D9,D9,D9,77,77,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  331. DATA 0,0,0,0,0,0,77,77,77,77,77,77,77,77,77,D9,D9,D9,D9,D9,D9,D9,D9,D9,D9,D9,77,77,77,77,77,77,77,77,77,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  332. DATA 0,0,0,0,0,0,77,77,77,77,77,77,77,77,77,D9,D9,D9,D9,D9,D9,D9,D9,D9,D9,D9,77,77,77,77,77,77,77,77,77,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  333. DATA 0,0,0,0,0,0,77,77,77,77,77,77,77,77,D9,D9,D9,D9,D9,D9,D9,D9,D9,D9,D9,D9,D9,77,77,77,77,77,77,77,77,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  334. DATA 0,0,0,0,0,0,77,77,77,77,77,0,0,D9,D9,D9,D9,D9,D9,D9,D9,D9,D9,D9,D9,D9,D9,D9,0,0,77,77,77,77,77,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  335. DATA 0,0,0,0,0,0,77,77,77,77,77,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,77,77,77,77,77,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  336. DATA 0,0,0,0,0,0,D9,D9,D9,D9,D9,D9,D9,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,77,77,77,77,77,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  337. DATA 0,0,0,0,0,0,D9,D9,D9,D9,D9,D9,D9,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,D9,D9,D9,D9,D9,D9,D9,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  338. DATA 0,0,0,0,0,0,D9,0,D9,0,D9,0,D9,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,D9,D9,D9,D9,D9,D9,D9,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  339. DATA 0,0,0,0,0,0,D9,0,D9,0,D9,0,D9,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,D9,0,D9,0,D9,0,D9,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  340. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,D9,0,D9,0,D9,0,D9,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  341. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  342. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  343. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  344. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  345. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  346. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  347. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  348. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  349. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  350. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  351. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  352. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  353. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  354. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  355. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  356. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  357. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  358. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  359. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  360. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  361. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  362. DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  363.  
  364.  

With such a change as this, I think I deserve at least 99.98% of the royalties from the sale of the  program in the future.  Right?  :D
https://github.com/SteveMcNeill/Steve64 — A github collection of all things Steve!

Offline bplus

  • Global Moderator
  • Forum Resident
  • Posts: 8053
  • b = b + ...
Re: My 1996 Tiny Dungeon Game
« Reply #2 on: January 11, 2021, 08:30:04 pm »
I worked and worked and worked and worked and worked and worked, but I finally got this to become a resizable, scalable window for us, so folks won't go blind staring at such a tiny little SCREEN 13 screen!
...

Well surely you meant to put in _FULLSCREEN?

Offline SMcNeill

  • QB64 Developer
  • Forum Resident
  • Posts: 3972
    • Steve’s QB64 Archive Forum
Re: My 1996 Tiny Dungeon Game
« Reply #3 on: January 11, 2021, 08:37:21 pm »
Well surely you meant to put in _FULLSCREEN?

PSSHHH!  Who’s going to take an easy way like that out?  I wanted custom resizable, scalable windows, not something which would hog up the whole screen!
https://github.com/SteveMcNeill/Steve64 — A github collection of all things Steve!

Offline bplus

  • Global Moderator
  • Forum Resident
  • Posts: 8053
  • b = b + ...
Re: My 1996 Tiny Dungeon Game
« Reply #4 on: January 11, 2021, 09:00:03 pm »
Ah! now I see what that $RESIZE:SMOOTH did :)
« Last Edit: January 11, 2021, 09:01:04 pm by bplus »

Offline SierraKen

  • Forum Resident
  • Posts: 1454
Re: My 1996 Tiny Dungeon Game
« Reply #5 on: January 11, 2021, 11:34:13 pm »
Woahhh Steve thank you!! I didn't know this was possible. I'll have to learn by what you did. I hope didn't spend hours on this though, the game only lasts about 3 minutes or less. I should have mentioned that when I posted it, I did say it was tiny though, sorry. But at least we can learn by what you did.

Offline SierraKen

  • Forum Resident
  • Posts: 1454
Re: My 1996 Tiny Dungeon Game
« Reply #6 on: January 11, 2021, 11:36:12 pm »
ROFL you trickster! I don't think one line of code lasts "hours". HEHEHE AWESOME!

Offline SMcNeill

  • QB64 Developer
  • Forum Resident
  • Posts: 3972
    • Steve’s QB64 Archive Forum
Re: My 1996 Tiny Dungeon Game
« Reply #7 on: January 12, 2021, 03:49:40 am »
ROFL you trickster! I don't think one line of code lasts "hours". HEHEHE AWESOME!

Note, I never said I spent hours on this.  What I said was:

Quote
I worked and worked and worked and worked and worked and worked, but I finally got this to become a resizable, scalable window for us, so folks won't go blind staring at such a tiny little SCREEN 13 screen!

So let’s break down my massive contribution here:

I worked...  copying and downloading the file...
...and worked...  opening up a copy of QB64....
...and worked.... pasting the code into the IDE and typing my change...
...and worked.... using CTRL-A to select all the code...
...and worked.... pasting the code into a response on the forums here...
...and worked even harder typing a post to explain my awesome contribution!

PHEW!!  I’m going to have to head back to bed again here in a second, since I worked so hard yesterday!



All kidding aside though, I hope hyping the massive changes helpsothers take advantage of the command more often.  As you can see, it’s simple enough to add to any program, and honestly is something which should be set by default, in my opinion, much like $DYNAMIC.  ;D
https://github.com/SteveMcNeill/Steve64 — A github collection of all things Steve!

Offline SierraKen

  • Forum Resident
  • Posts: 1454
Re: My 1996 Tiny Dungeon Game
« Reply #8 on: January 12, 2021, 01:33:48 pm »
I agree, having it on default would be perfect.