home *** CD-ROM | disk | FTP | other *** search
/ AMOS PD CD / amospdcd.iso / 401-425 / apd410 / bigscroller.amos.pp / bigscroller.amos / bigscroller.amosSourceCode < prev    next >
AMOS Source Code  |  1992-05-17  |  10KB  |  523 lines
  1. Set Buffer 20
  2. '
  3. 'STORMS  
  4. '
  5. ' bbbbb   iiiiii  gggggg 
  6. ' b    b    ii    gg   g 
  7. ' b    b    ii    gg 
  8. ' bbbbb     ii    gg  gg 
  9. ' b    b    ii    gg   g 
  10. ' b    b    ii    gg   g 
  11. ' bbbbb   iiiiii  gggggg    S C R O L L E R ...... 
  12. '
  13. 'can you make it smooth and error free?? 
  14. 'best improvement will get a pd disk full of goodies...
  15. 'so get cracking 
  16. '
  17. '  
  18. '
  19. '
  20. '
  21. '
  22. '
  23. Hide 
  24. Screen Open 7,640,20,8,Lowres
  25. Curs Off : Pen 2 : Paper 0 : Cls 0
  26. Screen Display 7,140,40,320,18
  27. Palette $0,$A10,$666,$3A0,$FFF,$F0F,$FF0,$FF,$F
  28. Flash Off 
  29. Def Scroll 1,0,0 To 500,17,-64,0
  30. '
  31. Screen Open 6,640,20,8,Lowres
  32. Curs Off : Pen 2 : Paper 0 : Cls 0
  33. Flash Off 
  34. Palette $0,$A10,$666,$3A0,$FFF,$F0F,$FF0,$FF,$F
  35. Screen Display 6,140,60,320,18
  36. '
  37. Screen Open 5,640,20,8,Lowres
  38. Curs Off : Pen 2 : Paper 0 : Cls 0
  39. Flash Off 
  40. Palette $0,$A10,$666,$3A0,$FFF,$F0F,$FF0,$FF,$F
  41. Screen Display 5,140,80,320,18
  42. '
  43. Screen Open 4,640,20,8,Lowres
  44. Curs Off : Pen 2 : Paper 0 : Cls 0
  45. Flash Off 
  46. Palette $0,$A10,$666,$3A0,$FFF,$F0F,$FF0,$FF,$F
  47. Screen Display 4,140,100,320,18
  48. '
  49. Screen Open 3,640,20,8,Lowres
  50. Curs Off : Pen 2 : Paper 0 : Cls 0
  51. Flash Off 
  52. Palette $0,$A10,$666,$3A0,$FFF,$F0F,$FF0,$FF,$F
  53. Screen Display 3,140,120,320,18
  54. '
  55. Screen Open 2,640,20,8,Lowres
  56. Curs Off : Pen 2 : Paper 0 : Cls 0
  57. Flash Off 
  58. Palette $0,$A10,$666,$3A0,$FFF,$F0F,$FF0,$FF,$F
  59. Screen Display 2,140,140,320,18
  60. '
  61. Screen Open 1,640,20,8,Lowres
  62. Curs Off : Pen 2 : Paper 0 : Cls 0
  63. Flash Off 
  64. Palette $0,$A10,$666,$3A0,$FFF,$F0F,$FF0,$FF,$F
  65. Screen Display 1,140,160,320,18
  66. '
  67. Screen Open 0,640,20,8,Lowres
  68. Curs Off : Pen 2 : Paper 0 : Cls 0
  69. Flash Off 
  70. Colour 3,$FF
  71. Palette $0,$A10,$666,$3A0,$FFF,$F0F,$FF0,$FF,$F
  72. Screen Display 0,140,180,320,18
  73. '
  74. Channel 1 To Screen Display 0
  75. Amal 1,"Loop:M 0,20,50;M 0,-20,50;P;J Loop"
  76. Amal On 1
  77. Channel 2 To Screen Display 1
  78. Amal 2,"Loop:M 0,30,50;M 0,-30,50;P;J Loop"
  79. Amal On 2
  80. Channel 3 To Screen Display 2
  81. Amal 3,"Loop:M 0,40,50;M 0,-40,50;P;J Loop"
  82. Amal On 3
  83. Channel 4 To Screen Display 3
  84. Amal 4,"Loop:M 0,50,50;M 0,-50,50;P;J Loop"
  85. Amal On 4
  86. Channel 5 To Screen Display 4
  87. Amal 5,"Loop:M 0,60,50;M 0,-60,50;P;J Loop"
  88. Amal On 5
  89. Channel 6 To Screen Display 5
  90. Amal 6,"Loop:M 0,70,50;M 0,-70,50;P;J Loop"
  91. Amal On 6
  92. Channel 7 To Screen Display 6
  93. Amal 7,"Loop:M 0,80,50;M 0,-80,50;P;J Loop"
  94. Amal On 7
  95. Channel 8 To Screen Display 7
  96. Amal 8,"Loop:M 0,90,50;M 0,-90,50;P;J Loop"
  97. Amal On 8
  98. '
  99. 'End 
  100. Dim FT(2688)
  101. Restore DGE
  102. CV=0 : RE=0
  103. For I=1 To 2688
  104. Read FT(I)
  105. Next I
  106. '
  107. AZ$="STORM PLEASE TRY TO IMPROVE THIS EXCELLENT SCROLLER   IDEA FROM AN OLD ARKANIOD DEMO    BYE"
  108. LTH=Len(AZ$)
  109. '
  110. For JK=1 To LTH
  111.    RE=7 : CV=0
  112.    D$=Mid$(AZ$,JK,1)
  113.    SD=Asc(D$)
  114.    ST=SD-50
  115.    SQ=ST*64
  116.    SFT=SQ-64
  117. If SD=32 Then SQ=2624
  118. '
  119.       For YU=1 To 64
  120.       If CV=>8 Then Add RE,-1 : CV=0
  121.       Screen RE
  122.       Add CV,1
  123.       HI=FT(SQ+YU)
  124.       If HI=>1 Then Paste Bob 330+CV*16,0,RE
  125. '      If HI=<0 Then Paste Bob 330+CV*16,0,2 
  126. '      If HI=>1 Then Ink 1 : Bar 330+CV*16,0 To 330+CV*16+16,8 
  127.        If HI=<0 Then Ink 0 : Bar 330+CV*16,0 To 330+CV*16+16,8
  128.    Next YU
  129. '
  130. '   Wait Key 
  131. For I=0 To 1
  132. '   Screen 0 : Scroll 1
  133.    Screen 1 : Scroll 1
  134.    Screen 2 : Scroll 1
  135.    Screen 3 : Scroll 1
  136.    Screen 4 : Scroll 1
  137.    Screen 5 : Scroll 1
  138.    Screen 6 : Scroll 1
  139.    Screen 7 : Scroll 1
  140. Wait Vbl 
  141. Next I
  142.    Next JK
  143. End 
  144. '
  145. '
  146. DGE:
  147. Data 0,0,0,1,1,1,0,0
  148. Data 0,0,0,1,1,1,0,0
  149. Data 0,0,0,1,1,1,0,0
  150. Data 0,0,0,1,1,1,0,0
  151. Data 0,0,0,1,1,0,0,0
  152. Data 0,0,0,0,0,0,0,0
  153. Data 0,0,0,1,1,0,0,0
  154. Data 0,0,0,0,0,0,0,0
  155. '
  156. Data 0,0,0,0,1,1,0,0
  157. Data 0,0,0,1,1,0,0,0
  158. Data 0,0,1,1,0,0,0,0
  159. Data 0,0,1,1,0,0,0,0
  160. Data 0,0,1,1,0,0,0,0
  161. Data 0,0,0,1,1,0,0,0
  162. Data 0,0,0,0,1,1,0,0
  163. Data 0,0,0,0,0,0,0,0
  164. '
  165. Data 0,0,0,1,1,0,0,0
  166. Data 0,0,0,0,1,1,0,0
  167. Data 0,0,0,0,0,1,1,0
  168. Data 0,0,0,0,0,1,1,0
  169. Data 0,0,0,0,0,1,1,0
  170. Data 0,0,0,0,1,1,0,0
  171. Data 0,0,0,1,1,0,0,0
  172. Data 0,0,0,0,0,0,0,0
  173. '
  174. Data 0,0,0,0,0,0,0,0
  175. Data 0,0,0,0,0,0,0,0
  176. Data 0,0,0,0,0,0,0,0
  177. Data 0,0,0,0,0,0,0,0
  178. Data 0,0,0,0,0,0,0,0
  179. Data 0,0,0,0,1,1,0,0
  180. Data 0,0,0,0,1,1,0,0
  181. Data 0,0,0,0,0,0,0,0
  182. '
  183. Data 0,1,1,1,1,1,1,1
  184. Data 0,1,0,0,0,0,0,1
  185. Data 0,1,0,0,0,0,0,1
  186. Data 0,1,0,0,0,1,1,1
  187. Data 0,1,0,0,0,1,1,1
  188. Data 0,1,0,0,0,1,1,1
  189. Data 0,1,1,1,1,1,1,1
  190. Data 0,0,0,0,0,0,0,0
  191. '
  192. Data 0,0,0,0,0,1,1,0
  193. Data 0,0,0,0,0,1,1,0
  194. Data 0,0,0,0,0,1,1,0
  195. Data 0,0,0,0,1,1,1,0
  196. Data 0,0,0,0,1,1,1,0
  197. Data 0,0,0,0,1,1,1,0
  198. Data 0,0,0,0,1,1,1,0
  199. Data 0,0,0,0,0,0,0,0
  200. '
  201. Data 0,1,1,1,1,1,1,1
  202. Data 0,1,0,0,0,0,0,1
  203. Data 0,0,0,0,0,0,0,1
  204. Data 0,1,1,1,1,1,1,1
  205. Data 0,1,1,1,0,0,0,0
  206. Data 0,1,1,1,0,0,0,0
  207. Data 0,1,1,1,1,1,1,1
  208. Data 0,0,0,0,0,0,0,0
  209. '
  210. Data 0,1,1,1,1,1,1,0
  211. Data 0,1,0,0,0,0,1,0
  212. Data 0,0,0,0,0,0,1,0
  213. Data 0,0,0,1,1,1,1,1
  214. Data 0,0,0,0,0,1,1,1
  215. Data 0,1,0,0,0,1,1,1
  216. Data 0,1,1,1,1,1,1,1
  217. Data 0,0,0,0,0,0,0,0
  218. '
  219. Data 0,1,1,1,1,1,1,0
  220. Data 0,1,0,0,0,0,1,0
  221. Data 0,1,0,0,0,0,1,0
  222. Data 0,1,0,0,0,0,1,0
  223. Data 0,1,1,1,1,1,1,1
  224. Data 0,0,0,1,1,1,0,0
  225. Data 0,0,0,1,1,1,0,0
  226. Data 0,0,0,0,0,0,0,0
  227. '
  228. Data 0,1,1,1,1,1,1,1
  229. Data 0,1,0,0,0,0,0,0
  230. Data 0,1,1,1,1,1,1,1
  231. Data 0,0,0,0,0,1,1,1
  232. Data 0,1,0,0,0,1,1,1
  233. Data 0,1,0,0,0,1,1,1
  234. Data 0,1,1,1,1,1,1,1
  235. Data 0,0,0,0,0,0,0,0
  236. '
  237. Data 0,1,1,1,1,1,1,1
  238. Data 0,1,0,0,0,0,0,1
  239. Data 0,1,0,0,0,0,0,0
  240. Data 0,1,1,1,1,1,1,1
  241. Data 0,1,0,0,0,1,1,1
  242. Data 0,1,0,0,0,1,1,1
  243. Data 0,1,1,1,1,1,1,1
  244. Data 0,0,0,0,0,0,0,0
  245. '
  246. Data 0,1,1,1,1,1,1,1
  247. Data 0,0,0,0,0,0,1,1
  248. Data 0,0,0,0,0,0,1,1
  249. Data 0,0,0,0,0,1,1,1
  250. Data 0,0,0,0,0,1,1,1
  251. Data 0,0,0,0,0,1,1,1
  252. Data 0,0,0,0,0,1,1,1
  253. Data 0,0,0,0,0,0,0,0
  254. '
  255. Data 0,0,0,1,1,1,1,0
  256. Data 0,0,0,1,0,0,1,0
  257. Data 0,0,0,1,0,0,1,0
  258. Data 0,0,1,1,1,1,1,1
  259. Data 0,0,1,0,0,0,1,1
  260. Data 0,0,1,0,0,0,1,1
  261. Data 0,0,1,1,1,1,1,1
  262. Data 0,0,0,0,0,0,0,0
  263. '
  264. Data 0,1,1,1,1,1,1,1
  265. Data 0,1,0,0,0,0,0,1
  266. Data 0,1,0,0,0,0,0,1
  267. Data 0,1,1,1,1,1,1,1
  268. Data 0,0,0,0,0,0,1,1
  269. Data 0,1,0,0,0,0,1,1
  270. Data 0,1,1,1,1,1,1,1
  271. Data 0,0,0,0,0,0,0,0
  272. '
  273. Data 0,1,1,1,1,1,1,1
  274. Data 0,1,0,0,0,0,1,1
  275. Data 0,0,0,0,0,0,1,1
  276. Data 0,0,0,0,0,1,1,0
  277. Data 0,0,0,0,1,1,0,0
  278. Data 0,0,0,0,0,0,0,0
  279. Data 0,0,0,0,1,1,0,0
  280. Data 0,0,0,0,0,0,0,0
  281. ' letter " A " 
  282. Data 0,0,0,1,1,1,1,0
  283. Data 0,0,0,1,0,0,1,0
  284. Data 0,0,0,1,0,0,1,0
  285. Data 0,1,1,1,1,1,1,1
  286. Data 0,1,1,1,0,0,0,1
  287. Data 0,1,1,1,0,0,0,1
  288. Data 0,1,1,1,0,0,0,1
  289. Data 0,0,0,0,0,0,0,0
  290. '
  291. Data 0,1,1,1,1,1,0,0
  292. Data 0,1,0,0,0,1,0,0
  293. Data 0,1,0,0,0,1,0,0
  294. Data 0,1,1,1,1,1,1,1
  295. Data 0,1,1,1,0,0,0,1
  296. Data 0,1,1,1,0,0,0,1
  297. Data 0,1,1,1,1,1,1,1
  298. Data 0,0,0,0,0,0,0,0
  299. '
  300. Data 0,1,1,1,1,1,1,1
  301. Data 0,1,1,0,0,0,0,1
  302. Data 0,1,1,0,0,0,0,0
  303. Data 0,1,1,1,0,0,0,0
  304. Data 0,1,1,1,0,0,0,0
  305. Data 0,1,1,1,0,0,0,1
  306. Data 0,1,1,1,1,1,1,1
  307. Data 0,0,0,0,0,0,0,0
  308. '
  309. Data 0,1,1,1,1,1,1,0
  310. Data 0,1,1,0,0,0,0,1
  311. Data 0,1,1,0,0,0,0,1
  312. Data 0,1,1,1,0,0,0,1
  313. Data 0,1,1,1,0,0,0,1
  314. Data 0,1,1,1,0,0,0,1
  315. Data 0,1,1,1,1,1,1,1
  316. Data 0,0,0,0,0,0,0,0
  317. '
  318. Data 0,1,1,1,1,1,1,1
  319. Data 0,1,0,0,0,0,0,0
  320. Data 0,1,0,0,0,0,0,0
  321. Data 0,1,1,1,1,1,1,1
  322. Data 0,1,1,1,0,0,0,0
  323. Data 0,1,1,1,0,0,0,0
  324. Data 0,1,1,1,1,1,1,1
  325. Data 0,0,0,0,0,0,0,0
  326. '
  327. Data 0,1,1,1,1,1,1,1
  328. Data 0,1,0,0,0,0,0,0
  329. Data 0,1,0,0,0,0,0,0
  330. Data 0,1,1,1,1,1,1,1
  331. Data 0,1,1,1,0,0,0,0
  332. Data 0,1,1,1,0,0,0,0
  333. Data 0,1,1,1,0,0,0,0
  334. Data 0,0,0,0,0,0,0,0
  335. '
  336. Data 0,1,1,1,1,1,1,1
  337. Data 0,1,1,0,0,0,0,1
  338. Data 0,1,1,0,0,0,0,0
  339. Data 0,1,1,1,0,1,1,1
  340. Data 0,1,1,1,0,0,0,1
  341. Data 0,1,1,1,0,0,0,1
  342. Data 0,1,1,1,1,1,1,1
  343. Data 0,0,0,0,0,0,0,0
  344. '
  345. Data 0,1,0,0,0,0,0,1
  346. Data 0,1,0,0,0,0,0,1
  347. Data 0,1,0,0,0,0,0,1
  348. Data 0,1,1,1,1,1,1,1
  349. Data 0,1,1,1,0,0,0,1
  350. Data 0,1,1,1,0,0,0,1
  351. Data 0,1,1,1,0,0,0,1
  352. Data 0,0,0,0,0,0,0,0
  353. '
  354. Data 0,0,0,0,1,1,0,0
  355. Data 0,0,0,0,1,1,0,0
  356. Data 0,0,0,0,1,1,0,0
  357. Data 0,0,0,0,1,1,0,0
  358. Data 0,0,0,0,1,1,1,0
  359. Data 0,0,0,0,1,1,1,0
  360. Data 0,0,0,0,1,1,1,0
  361. Data 0,0,0,0,0,0,0,0
  362. '
  363. Data 0,0,0,0,0,1,1,0
  364. Data 0,0,0,0,0,1,1,0
  365. Data 0,0,0,0,0,1,1,0
  366. Data 0,0,0,0,0,1,1,1
  367. Data 0,0,0,0,0,1,1,1
  368. Data 0,1,0,0,0,1,1,1
  369. Data 0,1,1,1,1,1,1,1
  370. Data 0,0,0,0,0,0,0,0
  371. '
  372. Data 0,1,0,0,0,0,1,0
  373. Data 0,1,0,0,0,0,1,0
  374. Data 0,1,0,0,0,0,1,0
  375. Data 0,1,1,1,1,1,1,1
  376. Data 0,1,1,1,0,0,0,1
  377. Data 0,1,1,1,0,0,0,1
  378. Data 0,1,1,1,0,0,0,1
  379. Data 0,0,0,0,0,0,0,0
  380. '
  381. Data 0,1,0,0,0,0,0,0
  382. Data 0,1,0,0,0,0,0,0
  383. Data 0,1,0,0,0,0,0,0
  384. Data 0,1,1,1,0,0,0,0
  385. Data 0,1,1,1,0,0,0,0
  386. Data 0,1,1,1,0,0,0,0
  387. Data 0,1,1,1,1,1,1,1
  388. Data 0,0,0,0,0,0,0,0
  389. '
  390. Data 0,1,1,1,1,1,1,1
  391. Data 0,1,0,0,1,0,0,1
  392. Data 0,1,0,0,1,0,0,1
  393. Data 0,1,0,0,1,0,0,1
  394. Data 0,1,1,0,1,0,0,1
  395. Data 0,1,1,0,1,0,0,1
  396. Data 0,1,1,0,1,0,0,1
  397. Data 0,0,0,0,0,0,0,0
  398. '
  399. Data 0,1,1,1,1,1,1,0
  400. Data 0,1,0,0,0,0,0,1
  401. Data 0,1,0,0,0,0,0,1
  402. Data 0,1,1,1,0,0,0,1
  403. Data 0,1,1,1,0,0,0,1
  404. Data 0,1,1,1,0,0,0,1
  405. Data 0,1,1,1,0,0,0,1
  406. Data 0,0,0,0,0,0,0,0
  407. '
  408. Data 0,1,1,1,1,1,1,1
  409. Data 0,1,0,0,0,1,1,1
  410. Data 0,1,0,0,0,1,1,1
  411. Data 0,1,0,0,0,1,1,1
  412. Data 0,1,0,0,0,0,0,1
  413. Data 0,1,0,0,0,0,0,1
  414. Data 0,1,1,1,1,1,1,1
  415. Data 0,0,0,0,0,0,0,0
  416. '
  417. Data 0,1,1,1,1,1,1,1
  418. Data 0,1,0,0,0,0,0,1
  419. Data 0,1,0,0,0,0,0,1
  420. Data 0,1,1,1,1,1,1,1
  421. Data 0,1,1,1,0,0,0,0
  422. Data 0,1,1,1,0,0,0,0
  423. Data 0,1,1,1,0,0,0,0
  424. Data 0,0,0,0,0,0,0,0
  425. '
  426. Data 0,1,1,1,1,1,1,1
  427. Data 0,1,0,0,0,0,0,1
  428. Data 0,1,0,0,0,0,0,1
  429. Data 0,1,0,0,0,0,0,1
  430. Data 0,1,0,0,0,0,0,1
  431. Data 0,1,0,1,1,1,1,1
  432. Data 0,1,1,1,1,1,1,1
  433. Data 0,0,0,0,0,0,0,0
  434. '
  435. Data 0,1,1,1,1,1,0,0
  436. Data 0,1,0,0,0,1,0,0
  437. Data 0,1,0,0,0,1,0,0
  438. Data 0,1,1,1,1,1,1,1
  439. Data 0,1,1,1,0,0,0,1
  440. Data 0,1,1,1,0,0,0,1
  441. Data 0,1,1,1,0,0,0,1
  442. Data 0,0,0,0,0,0,0,0
  443. '
  444. Data 0,1,1,1,1,1,1,1
  445. Data 0,1,0,0,0,0,0,1
  446. Data 0,1,0,0,0,0,0,0
  447. Data 0,1,1,1,1,1,1,1
  448. Data 0,0,0,0,0,1,1,1
  449. Data 0,1,0,0,0,1,1,1
  450. Data 0,1,1,1,1,1,1,1
  451. Data 0,0,0,0,0,0,0,0
  452. '
  453. Data 0,1,1,1,1,1,1,1
  454. Data 0,0,0,1,1,0,0,0
  455. Data 0,0,0,1,1,0,0,0
  456. Data 0,0,0,1,1,1,0,0
  457. Data 0,0,0,1,1,1,0,0
  458. Data 0,0,0,1,1,1,0,0
  459. Data 0,0,0,1,1,1,0,0
  460. Data 0,0,0,0,0,0,0,0
  461. '
  462. Data 0,1,0,0,0,0,0,1
  463. Data 0,1,0,0,0,0,0,1
  464. Data 0,1,0,0,0,0,0,1
  465. Data 0,1,1,1,0,0,0,1
  466. Data 0,1,1,1,0,0,0,1
  467. Data 0,1,1,1,0,0,0,1
  468. Data 0,1,1,1,1,1,1,1
  469. Data 0,0,0,0,0,0,0,0
  470. '
  471. Data 0,1,1,0,0,0,0,1
  472. Data 0,1,1,0,0,0,0,1
  473. Data 0,1,1,0,0,0,0,1
  474. Data 0,1,1,0,0,0,0,1
  475. Data 0,0,1,0,0,0,1,1
  476. Data 0,0,1,0,0,0,1,0
  477. Data 0,0,1,1,1,1,1,0
  478. Data 0,0,0,0,0,0,0,0
  479. '
  480. Data 0,1,0,0,0,0,0,1
  481. Data 0,1,0,0,0,0,0,1
  482. Data 0,1,0,0,0,0,0,1
  483. Data 0,1,1,0,1,1,0,1
  484. Data 0,1,1,0,1,1,0,1
  485. Data 0,1,1,0,1,1,0,1
  486. Data 0,1,1,1,1,1,1,1
  487. Data 0,0,0,0,0,0,0,0
  488. '
  489. Data 0,1,0,0,0,0,0,1
  490. Data 0,1,0,0,0,0,0,1
  491. Data 0,1,0,0,0,0,0,1
  492. Data 0,0,1,1,1,1,1,0
  493. Data 0,1,1,1,0,0,0,1
  494. Data 0,1,1,1,0,0,0,1
  495. Data 0,1,1,1,0,0,0,1
  496. Data 0,0,0,0,0,0,0,0
  497. '
  498. Data 0,1,0,0,0,0,0,1
  499. Data 0,1,0,0,0,0,0,1
  500. Data 0,1,0,0,0,0,0,1
  501. Data 0,1,1,1,1,1,1,1
  502. Data 0,0,0,0,1,1,0,0
  503. Data 0,0,0,0,1,1,0,0
  504. Data 0,0,0,0,1,1,0,0
  505. Data 0,0,0,0,0,0,0,0
  506. '
  507. Data 0,1,1,1,1,1,1,1
  508. Data 0,1,0,0,0,0,0,1
  509. Data 0,0,0,0,0,1,1,1
  510. Data 0,0,0,0,1,1,0,0
  511. Data 0,1,1,1,1,0,0,0
  512. Data 0,1,0,0,0,0,0,1
  513. Data 0,1,1,1,1,1,1,1
  514. Data 0,0,0,0,0,0,0,0
  515. '
  516. Data 0,0,0,0,0,0,0,0
  517. Data 0,0,0,0,0,0,0,0
  518. Data 0,0,0,0,0,0,0,0
  519. Data 0,0,0,0,0,0,0,0
  520. Data 0,0,0,0,0,0,0,0
  521. Data 0,0,0,0,0,0,0,0
  522. Data 0,0,0,0,0,0,0,0
  523. Data 0,0,0,0,0,0,0,0