home *** CD-ROM | disk | FTP | other *** search
/ C!T ROM 5 / ctrom5b.zip / ctrom5b / PROGRAM / PASCAL / PAVT199 / SNAKE.TXT < prev    next >
Text File  |  1992-06-26  |  4KB  |  284 lines
  1. snake
  2. HJY.1IY1N#Y6<$Y"TsAss
  3. ssY"SSY !-----------------------------------------------------------------------------|
  4. |
  5. |
  6. |
  7. |
  8. |
  9. |
  10. |
  11. |
  12. |
  13. |
  14. |
  15. |
  16. |
  17. |
  18. |
  19. |
  20. |
  21. |
  22. |
  23. |
  24. |
  25. |
  26. |Y  |
  27. |
  28. |
  29. |
  30. |
  31. |
  32. |
  33. |
  34. |
  35. |
  36. |
  37. |
  38. |
  39. |
  40. |
  41. |
  42. |
  43. |
  44. |
  45. |
  46. |
  47. |
  48. |
  49. |-----------------------------------------------------------------------------Y-0
  50. C 
  51. IY"W Y"SsSY.0
  52. C 
  53. IY"V sSY/0
  54. C 
  55. IY!V Y"SsASY00
  56. C AIY!U sSY/0
  57. C 
  58. IY!UsSY00
  59. C 
  60. IY!Ts
  61. SY10
  62. C 
  63. IY"T sASY20
  64. C IY"S AsSY21
  65. C IY!UsSY22
  66. C IY!TsSY23
  67. C IY!SsSY24
  68. C IY"U As
  69. SY25
  70. C IY"TsSY26
  71. C IY!U Y"Ss
  72. SY27
  73.      IY#SsASY28
  74. C IY!S 
  75. sASY29
  76. C IY!T s
  77. SY2:
  78. C IY"T sASY2;
  79. C 
  80. IY!RsSY3;
  81. C 
  82. IY#S Y!QsSY4;
  83. C 
  84. IY&!$Y!!$25Y5;
  85. C AIY"S Y!Ps
  86. SY4;
  87. C AIY"OsSY3;
  88. C AIY"R sASY2;
  89. C IY!R sSY2:
  90. C IY!QsSY29
  91. C IY!Rs
  92. SY28
  93. C IY"O Cs
  94. SY27Y"P 
  95. s
  96. SY27
  97.      IY!P Y$Os
  98. SY28
  99. C IY!Q Y%Ns
  100. SY27
  101.      IY!R Y&NsSY26
  102. C IY"Q Y&MsASY25Y#P Y%MsASY25Y$O sSY25
  103. C IY%N Y$LsASY24
  104. C IY&N Y#Ks
  105. SY23
  106. C IY&M Y$JsASY22
  107. C IY%M Y#KsASY21
  108. C AIY$M Y"LsASY11
  109. C AIY$L AAAs
  110. SY01
  111. C AIY"LsASY/1
  112. C AIY$J AAAsSY.1
  113. C AIY#K Y!Js
  114. SY-1
  115. C AIY"KsASY,1
  116. C AIY!M s
  117. SY+1
  118. C AIY"L s
  119. SY*1
  120. C AIY!K Y#Js
  121. SY)1
  122. C AIY!J Y$Is
  123. SY(1
  124. C IY%JsSY(0
  125. C IY!L Y%Is
  126. SY(/
  127.      IY"K Y&Js
  128. SY(.
  129. C IY#J Y'Ks
  130. SY(-
  131. C IY$I Y(Ls
  132. SY(,
  133. C AIY%J Y)MsSY',
  134. C AIY%I Y)NsASY&,
  135. C AIY&J Y(NsASY%,
  136. C IY'K Y'NsSY%+
  137. C IY(L AsASY%*
  138. C IY)M Y&MsSY%)
  139. C IY)N Y&LsASY%(
  140. C     IY(N Y%KsASY%'
  141.      IY'N Y$Ls
  142. SY%&
  143. C IY'M Y%Ls
  144. SY%%
  145. C IY&M sSY%$
  146. C IY&KsASCCC
  147. C IY%KsSCC
  148. C IY$L Y%JsSC
  149. C IY1E$Y!!$50Y% 
  150. C IY%L sASY%!
  151. C IY&L AAsSY%"
  152. C 
  153. IY&K Y$MsSY&"
  154. C 
  155. IY$LsSY'"
  156. C 
  157. IY%J As
  158. SY("
  159. C IY%K sSY(#
  160. C IY%IsSY($
  161. C IY$M Y%HsSY(%
  162. C IY$L Y%Gs
  163. SY(&
  164. C IY$K Y&GsASY('
  165.      IY%J Y%FsASY((
  166. C IY%I Y$Gs
  167. SY()
  168. C IY%H s
  169. SY(*
  170. C IY&GsSY(+
  171. C IY&FsSY(,
  172. C IY%F 
  173. sSY(-
  174. C IY$G Y&DsSY(.
  175. C IY%G Y&CsSY(/
  176.      IY&G Y&BsSY(0
  177. C IY&F Y&AsASY(1
  178. C IY&E Y%BsASY(2
  179. C IY&D Y$CsSY(3
  180. C 
  181. IY&C Y$Bs
  182. SY)3
  183. C 
  184. IY&B AsASY*3
  185. C 
  186. IY&A AAs
  187. SY+3
  188. C 
  189. IY%B s
  190. SY,3
  191. C IY$C Y&@s
  192. SY,4
  193. C IY'?s
  194. SY,5
  195. C IY%C Y(?s
  196. SY,6
  197. C IY$B Y)?s
  198. SY,7
  199.      IY%A Y*>s
  200. SY,8
  201. C 
  202. IY&@ Y+=sSY-8
  203. C 
  204. IY'? Y+>s
  205. SY.8
  206. C 
  207. IY(? Y,=s
  208. SY/8
  209. C 
  210. IY)? Y-<s
  211. SY08
  212. C 
  213. IY*> Y.;sSY18
  214. C 
  215. IY+= Y.:sSY28
  216. C IY+> Y.;s
  217. SY29
  218. C IY,= Y/;sSY2:
  219. C IY-< 
  220.  
  221. sSY2;
  222. C IY/=s
  223. S
  224.  
  226. C IY.: Y0<sASY2=
  227. C IY.; 
  228. sASY2>
  229. C IY.:sASY2?
  230.      IY/< Y-9sSY2@
  231. C IY/= Y-:s
  232. SY2A
  233. C IY0< Y.9sASY2B
  234. C AIY/; Y-9sASY1B
  235. C IY.: AAsASY1C
  236. C AIY+9sASY0C
  237. C IY&5$Y!!$75Y0D
  238. C IY-: Y*8s
  239. SY0E
  240. C IY.9 Y+9s
  241. SY0F
  242. C IY-9 AsSY0G
  243.      IY,;s
  244. SY0H
  245. C IY-<sSY0I
  246. C IY*8 Y-=sASY0J
  247. C IY+9 Y,<sSY0K
  248. C IY,: Y,=sSY0L
  249. C I#A##
  250. #
  251. ###A#A#A####
  252. #
  253. #
  254. #
  255. #####A#A#A#A#A######
  256. #
  257. #
  258. #
  259. #
  260. #
  261. #######A#A#A#A#A#A#A########
  262. #
  263. #
  264. #
  265. #
  266. #
  267. #
  268. #
  269. #########A#A#A#A#A#A#A#A#A##########
  270. #
  271. #
  272. #
  273. #
  274. #
  275. #
  276. #
  277. #
  278. #
  279. ##########Y7 You have won with $75.
  280. You bettered your previous best of $0
  281. You beat root's old record of $0!
  282. You made 129 moves.
  283.  
  284. [5][~] bohemia%