Advertisement
Guest User

Untitled

a guest
Jan 31st, 2016
172
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. (main)QUATTRPC
  2. * Code (simplifié) de quattropic par UTZ
  3. * adapté au 6809 en utilisant le BUZZER.
  4.         org     $A000
  5.         setdp   *<-8
  6.  
  7. KTST    equ     $E809
  8.        
  9. main    pshs    d,x,y,u,dp,cc
  10.  
  11.         lda     $E7CD
  12.         ora     #$3F
  13.         sta     $E7CD
  14.        
  15. wait    jsr     KTST
  16.         bcs     wait
  17.  
  18.         lda     #*<-8
  19.         tfr     a,dp
  20.  
  21.         ldx     #zik
  22.  
  23. * speed -> duree ligne
  24.         lda     ,x+
  25.         ldb     #129        ; 256*224/4/111
  26.         mul
  27.         tfr     d,y
  28.  
  29. * lecture sequence
  30. rdseq   ldu     ,x++
  31.         bne     iniptn
  32.         ldx     #zikbak
  33.         bra     rdseq
  34.  
  35. * lecture d'une ligne pattern
  36. iniptn
  37.        jsr     KTST        ; test clavier
  38.        bcs     exit
  39.        
  40.        ldd     ,u
  41.        beq     rdseq
  42.        std     <noise
  43.        
  44.        ldd     2,u
  45.        sta     <ch1rat
  46.        stb     <ch2rat
  47.        ldd     4,u
  48.        sta     <ch3rat
  49.        stb     <ch4rat
  50.        
  51.        ldd     6,u
  52.        std     <ch1frq
  53.        ldd     8,u
  54.        std     <ch2frq
  55.        ldd     10,u
  56.        std     <ch3frq
  57.        ldd     12,u
  58.        std     <ch4frq
  59.  
  60.        bsr     playptn
  61.        bra     rdseq
  62.        
  63. exit    puls    d,x,y,u,dp,cc,pc
  64.  
  65. * joue un pattern Y=durée
  66. playptn pshs    cc,d,x,y,u
  67.        orcc    #$50
  68.        sts     <savsp
  69.        lds     #$E7C0
  70.        ldd     ,s
  71. *        ldd     #$30
  72.        orb     #8
  73.        tfr     d,x     ; x=buzzer 0
  74.        eorb    #8
  75.        tfr     d,u     ; u=buzzer 1
  76.  
  77. playlp  set     *
  78.  
  79. * oscillo 1
  80.        ldd     #0      ; 3
  81.        addd    #0      ; 4
  82. ch1frq  set     *-2     ; freq
  83.        std     <*-5    ; 5
  84.        cmpa    #$80    ; 2 (rap. cyclique)
  85. ch1rat  set     *-1
  86.        blo     ch1zer  ; 3
  87.        stu     ,s      ; 5
  88.        bra     ch1end  ; 3
  89. ch1zer  stx     ,s      ; 5
  90.        bra     ch1end  ; 3
  91. ch1end  set     *       ; 25=3+4+5+2+3+5+3
  92.  
  93. * oscillo 2
  94.        ldd     #0      ; 3
  95.        addd    #0      ; 4
  96. ch2frq  set     *-2     ; freq
  97.        std     <*-5    ; 5
  98.        cmpa    #$80    ; 2 (rap. cyclique)
  99. ch2rat  set     *-1
  100.        blo     ch2zer  ; 3
  101.        stu     ,s      ; 5
  102.        bra     ch2end  ; 3
  103. ch2zer  stx     ,s      ; 5
  104.        bra     ch2end  ; 3
  105. ch2end  set     *       ; 25=3+4+5+2+3+5+3
  106.  
  107. * oscillo 3
  108.        ldd     #0      ; 3
  109.        addd    #0      ; 4
  110. ch3frq  set     *-2     ; freq
  111.        std     <*-5    ; 5
  112.        cmpa    #$80    ; 2 (rap. cyclique)
  113. ch3rat  set     *-1
  114.        blo     ch3zer  ; 3
  115.        stu     ,s      ; 5
  116.        bra     ch3end  ; 3
  117. ch3zer  stx     ,s      ; 5
  118.        bra     ch3end  ; 3
  119. ch3end  set     *       ; 25=3+4+5+2+3+5+3
  120.  
  121. * oscillo 4 / noise
  122.        ldd     #0      ; 3
  123. noise   set     *
  124.        lsla            ; 2
  125.        adca    #0      ; 2
  126. *       nop
  127. *       adda    #0
  128.        addd    #0      ; 4
  129. ch4frq  set     *-2     ; freq
  130.        std     <noise-2    ; 5
  131.        cmpa    #$80    ; 2 (rap. cyclique)
  132. ch4rat  set     *-1
  133.        blo     ch4zer  ; 3
  134.        stu     ,s      ; 5
  135.        bra     ch4end  ; 3
  136. ch4zer  stx     ,s      ; 5
  137.        bra     ch4end  ; 3
  138. ch4end  set     *       ; 29=3+2+2+4+5+2+3+5+3
  139.  
  140. * bouclage
  141.        leay    -1,y    ; 4
  142.        bne     playlp  ; 3=>111
  143.        
  144.        lds     #0
  145. savsp   set     *-2
  146.        puls    cc,d,x,y,u,pc
  147.  
  148.        includ  ZIK
  149.        
  150.        end     main
  151. (include)ZIK.ASM
  152. * morceau musique
  153. zik
  154. fcb 6 ;speed
  155.  
  156. *sequence
  157. zikbak
  158. * fdb ptn,0
  159. fdb ptn0
  160. fdb ptn0
  161. fdb ptn1
  162. fdb ptn0
  163. fdb ptn5
  164. fdb ptn3
  165. fdb ptn4
  166. fdb ptn6
  167. fdb 0
  168.  
  169. XX set 1000
  170. YY set 1000
  171. ZZ set 1000/2
  172. TT set 1000/2
  173. ptn
  174. fdb $128b,$8080,$8080,XX,YY,ZZ,TT,0
  175.  
  176. *pattern data
  177. ptn0
  178. fdb $4889,$8080,$8080,$2f9,$5f2,$be4,$000
  179. fdb $128b,$8080,$8080,$2f9,$711,$000,$000
  180. fdb $4889,$8080,$8020,$2f9,$8e9,$17c,$3104
  181. fdb $4889,$8080,$8020,$2f9,$a97,$17c,$3104
  182. fdb $4889,$8080,$8040,$5f2,$be4,$be4,$1939
  183. fdb $4889,$8080,$8040,$5f2,$e25,$000,$000
  184. fdb $4889,$8080,$8020,$5f2,$11d0,$17c,$3104
  185. fdb $4889,$8080,$8020,$5f2,$1531,$17c,$3104
  186. fdb $4889,$8040,$8020,$2f9,$5f2,$be4,$000
  187. fdb $128b,$8040,$8020,$2f9,$711,$000,$000
  188. fdb $4889,$8040,$8020,$2f9,$8e9,$17c,$3104
  189. fdb $4889,$8040,$8020,$2f9,$a97,$17c,$3104
  190. fdb $4889,$8040,$8040,$5f2,$be4,$be4,$1939
  191. fdb $4889,$8040,$8040,$5f2,$e25,$000,$000
  192. fdb $4889,$8040,$8020,$5f2,$11d0,$17c,$3104
  193. fdb $4889,$8040,$8020,$5f2,$1531,$17c,$3104
  194. fdb $4889,$8020,$8020,$2f9,$5f2,$be4,$000
  195. fdb $128b,$8020,$8020,$2f9,$711,$000,$000
  196. fdb $4889,$8020,$8020,$2f9,$8e9,$17c,$3104
  197. fdb $4889,$8020,$8020,$2f9,$a97,$17c,$3104
  198. fdb $4889,$8020,$8040,$5f2,$be4,$be4,$1939
  199. fdb $4889,$8020,$8040,$5f2,$e25,$000,$000
  200. fdb $4889,$8020,$8020,$5f2,$11d0,$17c,$3104
  201. fdb $4889,$8020,$8020,$5f2,$1531,$17c,$3104
  202. fdb $4889,$8010,$8020,$389,$5f2,$be4,$000
  203. fdb $128b,$8010,$8020,$389,$711,$000,$000
  204. fdb $4889,$8010,$8020,$389,$8e9,$1c3,$3104
  205. fdb $4889,$8010,$8020,$389,$a97,$1c3,$3104
  206. fdb $4889,$8010,$8040,$711,$be4,$be4,$1939
  207. fdb $4889,$8010,$8040,$711,$e25,$000,$000
  208. fdb $4889,$8010,$8020,$711,$11d0,$1c3,$3104
  209. fdb $4889,$8010,$8020,$711,$1531,$1c3,$3104
  210. fdb $4889,$8010,$8020,$2f9,$5f2,$be4,$000
  211. fdb $128b,$8010,$8020,$2f9,$711,$000,$000
  212. fdb $4889,$8010,$8020,$2f9,$8e9,$17c,$3104
  213. fdb $4889,$8010,$8020,$2f9,$a97,$17c,$3104
  214. fdb $4889,$8010,$8040,$5f2,$be4,$be4,$1939
  215. fdb $4889,$8010,$8040,$5f2,$e25,$000,$000
  216. fdb $4889,$8010,$8020,$5f2,$11d0,$17c,$3104
  217. fdb $4889,$8010,$8020,$5f2,$1531,$17c,$3104
  218. fdb $4889,$8020,$8020,$2f9,$5f2,$be4,$000
  219. fdb $128b,$8020,$8020,$2f9,$711,$000,$000
  220. fdb $4889,$8020,$8020,$2f9,$8e9,$17c,$3104
  221. fdb $4889,$8020,$8020,$2f9,$a97,$17c,$3104
  222. fdb $4889,$8020,$8040,$5f2,$be4,$be4,$1939
  223. fdb $4889,$8020,$8040,$5f2,$e25,$000,$000
  224. fdb $4889,$8020,$8020,$5f2,$11d0,$17c,$3104
  225. fdb $4889,$8020,$8020,$5f2,$1531,$17c,$3104
  226. fdb $4889,$8040,$8020,$2f9,$5f2,$be4,$000
  227. fdb $128b,$8040,$8020,$2f9,$711,$000,$000
  228. fdb $4889,$8040,$8020,$2f9,$8e9,$17c,$3104
  229. fdb $4889,$8040,$8020,$2f9,$a97,$17c,$3104
  230. fdb $4889,$8040,$8040,$5f2,$be4,$be4,$1939
  231. fdb $4889,$8040,$8040,$5f2,$e25,$000,$000
  232. fdb $4889,$8040,$8020,$5f2,$11d0,$17c,$3104
  233. fdb $4889,$8040,$8020,$5f2,$1531,$17c,$3104
  234. fdb $4889,$8080,$8020,$8e9,$5f2,$be4,$000
  235. fdb $128b,$8080,$8020,$8e9,$711,$000,$000
  236. fdb $4889,$8080,$8020,$8e9,$8e9,$59d,$3104
  237. fdb $4889,$8080,$8020,$8e9,$a97,$59d,$3104
  238. fdb $4889,$8080,$8040,$711,$be4,$be4,$1939
  239. fdb $4889,$8080,$8020,$711,$e25,$000,$196d
  240. fdb $4889,$8080,$8020,$711,$11d0,$59d,$3104
  241. fdb $4889,$8080,$8010,$711,$1531,$59d,$1308
  242. fdb 0
  243.  
  244. ptn1
  245. fdb $4889,$8080,$8080,$3f8,$7ef,$be4,$000
  246. fdb $128b,$8080,$8080,$3f8,$970,$000,$000
  247. fdb $4889,$8080,$8020,$3f8,$be4,$1fb,$3104
  248. fdb $4889,$8080,$8020,$3f8,$e25,$1fb,$3104
  249. fdb $4889,$8080,$8040,$7ef,$fdf,$be4,$1939
  250. fdb $4889,$8080,$8040,$7ef,$12e0,$000,$000
  251. fdb $4889,$8080,$8020,$7ef,$17c9,$1fb,$3104
  252. fdb $4889,$8080,$8020,$7ef,$1c48,$1fb,$3104
  253. fdb $4889,$8080,$8020,$3f8,$7ef,$be4,$000
  254. fdb $128b,$8080,$8020,$3f8,$970,$000,$000
  255. fdb $4889,$8080,$8020,$3f8,$be4,$1fb,$3104
  256. fdb $4889,$8080,$8020,$3f8,$e25,$1fb,$3104
  257. fdb $4889,$8080,$8040,$7ef,$fdf,$be4,$1939
  258. fdb $4889,$8080,$8040,$7ef,$12e0,$000,$000
  259. fdb $4889,$8080,$8020,$7ef,$17c9,$1fb,$3104
  260. fdb $4889,$8080,$8020,$7ef,$1c48,$1fb,$3104
  261. fdb $4889,$8040,$8020,$3f8,$7ef,$be4,$000
  262. fdb $128b,$8040,$8020,$3f8,$970,$000,$000
  263. fdb $4889,$8040,$8020,$3f8,$be4,$1fb,$3104
  264. fdb $4889,$8040,$8020,$3f8,$e25,$1fb,$3104
  265. fdb $4889,$8040,$8040,$7ef,$fdf,$be4,$1939
  266. fdb $4889,$8040,$8040,$7ef,$12e0,$000,$000
  267. fdb $4889,$8040,$8020,$7ef,$17c9,$1fb,$3104
  268. fdb $4889,$8040,$8020,$7ef,$1c48,$1fb,$3104
  269. fdb $4889,$8040,$8020,$4b9,$7ef,$be4,$000
  270. fdb $128b,$8040,$8020,$4b9,$970,$000,$000
  271. fdb $4889,$8040,$8020,$4b9,$be4,$25c,$3104
  272. fdb $4889,$8040,$8020,$4b9,$e25,$25c,$3104
  273. fdb $4889,$8040,$8040,$970,$fdf,$be4,$1939
  274. fdb $4889,$8040,$8040,$970,$12e0,$000,$000
  275. fdb $4889,$8040,$8020,$970,$17c9,$25c,$3104
  276. fdb $4889,$8040,$8020,$970,$1c48,$25c,$3104
  277. fdb $4889,$8020,$8020,$3f8,$7ef,$be4,$000
  278. fdb $128b,$8020,$8020,$3f8,$970,$000,$000
  279. fdb $4889,$8020,$8020,$3f8,$be4,$1fb,$3104
  280. fdb $4889,$8020,$8020,$3f8,$e25,$1fb,$3104
  281. fdb $4889,$8020,$8040,$7ef,$fdf,$be4,$1939
  282. fdb $4889,$8020,$8040,$7ef,$12e0,$000,$000
  283. fdb $4889,$8020,$8020,$7ef,$17c9,$1fb,$3104
  284. fdb $4889,$8020,$8020,$7ef,$1c48,$1fb,$3104
  285. fdb $4889,$8020,$8020,$3f8,$7ef,$be4,$000
  286. fdb $128b,$8020,$8020,$3f8,$970,$000,$000
  287. fdb $4889,$8020,$8020,$3f8,$be4,$1fb,$3104
  288. fdb $4889,$8020,$8020,$3f8,$e25,$1fb,$3104
  289. fdb $4889,$8020,$8040,$7ef,$fdf,$be4,$1939
  290. fdb $4889,$8020,$8040,$7ef,$12e0,$000,$000
  291. fdb $4889,$8020,$8020,$7ef,$17c9,$1fb,$3104
  292. fdb $4889,$8020,$8020,$7ef,$1c48,$1fb,$3104
  293. fdb $4889,$8010,$8020,$3f8,$7ef,$be4,$000
  294. fdb $128b,$8010,$8020,$3f8,$970,$000,$000
  295. fdb $4889,$8010,$8020,$3f8,$be4,$1fb,$3104
  296. fdb $4889,$8010,$8020,$3f8,$e25,$1fb,$3104
  297. fdb $4889,$8010,$8040,$7ef,$fdf,$be4,$1939
  298. fdb $4889,$8010,$8040,$7ef,$12e0,$000,$000
  299. fdb $4889,$8010,$8020,$7ef,$17c9,$1fb,$3104
  300. fdb $4889,$8010,$8020,$7ef,$1c48,$1fb,$3104
  301. fdb $4889,$8010,$8020,$2a5,$7ef,$be4,$000
  302. fdb $128b,$8010,$8020,$2a5,$970,$000,$000
  303. fdb $4889,$8010,$8020,$2a5,$be4,$59d,$3104
  304. fdb $4889,$8010,$8020,$2a5,$e25,$59d,$3104
  305. fdb $4889,$8010,$8040,$54b,$fdf,$be4,$1939
  306. fdb $4889,$8010,$8020,$54b,$12e0,$000,$196d
  307. fdb $4889,$8010,$8020,$54b,$17c9,$59d,$3104
  308. fdb $4889,$8010,$8010,$54b,$1c48,$59d,$1308
  309. fdb 0
  310.  
  311. ptn3
  312. fdb $128b,$8080,$8080,$5f2,$e25,$11d0,$1531
  313. fdb $128b,$8080,$8080,$5f2,$711,$11d0,$1531
  314. fdb $128b,$8080,$8080,$5f2,$711,$8e9,$1531
  315. fdb $128b,$8080,$8080,$5f2,$711,$8e9,$a97
  316. fdb $128b,$8080,$8080,$be4,$711,$8e9,$a97
  317. fdb $128b,$8080,$8080,$be4,$e25,$8e9,$a97
  318. fdb $128b,$8080,$8080,$be4,$e25,$11d0,$a97
  319. fdb $128b,$8080,$8080,$be4,$e25,$11d0,$1531
  320. fdb $128b,$4080,$8080,$5f2,$e25,$11d0,$1531
  321. fdb $128b,$4040,$8080,$5f2,$711,$11d0,$1531
  322. fdb $128b,$4040,$4080,$5f2,$711,$8e9,$1531
  323. fdb $128b,$4040,$4040,$5f2,$711,$8e9,$a97
  324. fdb $128b,$4040,$4040,$be4,$711,$8e9,$a97
  325. fdb $128b,$4040,$4040,$be4,$e25,$8e9,$a97
  326. fdb $128b,$4040,$4040,$be4,$e25,$11d0,$a97
  327. fdb $128b,$4040,$4040,$be4,$e25,$11d0,$1531
  328. fdb $128b,$2040,$4040,$5f2,$e25,$11d0,$1531
  329. fdb $128b,$2020,$4040,$5f2,$711,$11d0,$1531
  330. fdb $128b,$2020,$2040,$5f2,$711,$8e9,$1531
  331. fdb $128b,$2020,$2020,$5f2,$711,$8e9,$a97
  332. fdb $128b,$2020,$2020,$be4,$711,$8e9,$a97
  333. fdb $128b,$2020,$2020,$be4,$e25,$8e9,$a97
  334. fdb $128b,$2020,$2020,$be4,$e25,$11d0,$a97
  335. fdb $128b,$2020,$2020,$be4,$e25,$11d0,$1531
  336. fdb $128b,$1020,$2020,$5f2,$e25,$11d0,$1531
  337. fdb $128b,$1010,$2020,$5f2,$711,$11d0,$1531
  338. fdb $128b,$1010,$1020,$5f2,$711,$8e9,$1531
  339. fdb $128b,$1010,$1010,$5f2,$711,$8e9,$a97
  340. fdb $128b,$1010,$1010,$be4,$711,$8e9,$a97
  341. fdb $128b,$1010,$1010,$be4,$e25,$8e9,$a97
  342. fdb $128b,$1010,$1010,$be4,$e25,$11d0,$a97
  343. fdb $128b,$1010,$1010,$be4,$e25,$11d0,$1531
  344. fdb $128b,$1010,$1010,$5f2,$e25,$11d0,$1531
  345. fdb $128b,$1010,$1010,$5f2,$711,$11d0,$1531
  346. fdb $128b,$1010,$1010,$5f2,$711,$8e9,$1531
  347. fdb $128b,$1010,$1010,$5f2,$711,$8e9,$a97
  348. fdb $128b,$1010,$1010,$be4,$711,$8e9,$a97
  349. fdb $128b,$1010,$1010,$be4,$e25,$8e9,$a97
  350. fdb $128b,$1010,$1010,$be4,$e25,$11d0,$a97
  351. fdb $128b,$1010,$1010,$be4,$e25,$11d0,$1531
  352. fdb $128b,$2010,$1010,$5f2,$e25,$11d0,$1531
  353. fdb $128b,$2020,$1010,$5f2,$711,$11d0,$1531
  354. fdb $128b,$2020,$2010,$5f2,$711,$8e9,$1531
  355. fdb $128b,$2020,$2020,$5f2,$711,$8e9,$a97
  356. fdb $128b,$2020,$2020,$be4,$711,$8e9,$a97
  357. fdb $128b,$2020,$2020,$be4,$e25,$8e9,$a97
  358. fdb $128b,$2020,$2020,$be4,$e25,$11d0,$a97
  359. fdb $128b,$2020,$2020,$be4,$e25,$11d0,$1531
  360. fdb $128b,$4020,$2020,$5f2,$e25,$11d0,$1531
  361. fdb $128b,$4040,$2020,$5f2,$711,$11d0,$1531
  362. fdb $128b,$4040,$4020,$5f2,$711,$8e9,$1531
  363. fdb $128b,$4040,$4040,$5f2,$711,$8e9,$a97
  364. fdb $128b,$4040,$4040,$be4,$711,$8e9,$a97
  365. fdb $128b,$4040,$4040,$be4,$e25,$8e9,$a97
  366. fdb $128b,$4040,$4040,$be4,$e25,$11d0,$a97
  367. fdb $128b,$4040,$4040,$be4,$e25,$11d0,$1531
  368. fdb $128b,$8040,$4040,$5f2,$e25,$11d0,$1531
  369. fdb $128b,$8080,$4040,$5f2,$711,$11d0,$1531
  370. fdb $128b,$8080,$8040,$5f2,$711,$8e9,$1531
  371. fdb $128b,$8080,$8080,$5f2,$711,$8e9,$a97
  372. fdb $128b,$8080,$8080,$be4,$711,$8e9,$a97
  373. fdb $128b,$8080,$8080,$be4,$e25,$8e9,$a97
  374. fdb $128b,$8080,$8080,$be4,$e25,$11d0,$a97
  375. fdb $128b,$8080,$8080,$be4,$e25,$11d0,$1531
  376. fdb 0
  377.  
  378. ptn4
  379. fdb $128b,$8080,$8080,$7ef,$e25,$11d0,$1531
  380. fdb $128b,$8080,$8080,$7ef,$970,$11d0,$1531
  381. fdb $128b,$8080,$8080,$7ef,$970,$be4,$1531
  382. fdb $128b,$8080,$8080,$7ef,$970,$be4,$e25
  383. fdb $128b,$8080,$8080,$fdf,$970,$be4,$e25
  384. fdb $128b,$8080,$8080,$fdf,$12e0,$be4,$e25
  385. fdb $128b,$8080,$8080,$fdf,$12e0,$17c9,$e25
  386. fdb $128b,$8080,$8080,$fdf,$12e0,$17c9,$1c48
  387. fdb $128b,$4080,$8080,$7ef,$12e0,$17c9,$1c48
  388. fdb $128b,$4040,$8080,$7ef,$970,$17c9,$1c48
  389. fdb $128b,$4040,$4080,$7ef,$970,$be4,$1c48
  390. fdb $128b,$4040,$4040,$7ef,$970,$be4,$e25
  391. fdb $128b,$4040,$4040,$fdf,$970,$be4,$e25
  392. fdb $128b,$4040,$4040,$fdf,$12e0,$be4,$e25
  393. fdb $128b,$4040,$4040,$fdf,$12e0,$17c9,$e25
  394. fdb $128b,$4040,$4040,$fdf,$12e0,$17c9,$1c48
  395. fdb $128b,$2040,$4040,$7ef,$12e0,$17c9,$1c48
  396. fdb $128b,$2020,$4040,$7ef,$970,$17c9,$1c48
  397. fdb $128b,$2020,$2040,$7ef,$970,$be4,$1c48
  398. fdb $128b,$2020,$2020,$7ef,$970,$be4,$e25
  399. fdb $128b,$2020,$2020,$fdf,$970,$be4,$e25
  400. fdb $128b,$2020,$2020,$fdf,$12e0,$be4,$e25
  401. fdb $128b,$2020,$2020,$fdf,$12e0,$17c9,$e25
  402. fdb $128b,$2020,$2020,$fdf,$12e0,$17c9,$1c48
  403. fdb $128b,$1020,$2020,$7ef,$12e0,$17c9,$1c48
  404. fdb $128b,$1010,$2020,$7ef,$970,$17c9,$1c48
  405. fdb $128b,$1010,$1020,$7ef,$970,$be4,$1c48
  406. fdb $128b,$1010,$1010,$7ef,$970,$be4,$e25
  407. fdb $128b,$1010,$1010,$fdf,$970,$be4,$e25
  408. fdb $128b,$1010,$1010,$fdf,$12e0,$be4,$e25
  409. fdb $128b,$1010,$1010,$fdf,$12e0,$17c9,$e25
  410. fdb $128b,$1010,$1010,$fdf,$12e0,$17c9,$1c48
  411. fdb $128b,$1010,$1010,$7ef,$12e0,$17c9,$1c48
  412. fdb $128b,$1010,$1010,$7ef,$970,$17c9,$1c48
  413. fdb $128b,$1010,$1010,$7ef,$970,$be4,$1c48
  414. fdb $128b,$1010,$1010,$7ef,$970,$be4,$e25
  415. fdb $128b,$1010,$1010,$fdf,$970,$be4,$e25
  416. fdb $128b,$1010,$1010,$fdf,$12e0,$be4,$e25
  417. fdb $128b,$1010,$1010,$fdf,$12e0,$17c9,$e25
  418. fdb $128b,$1010,$1010,$fdf,$12e0,$17c9,$1c48
  419. fdb $128b,$2010,$1010,$7ef,$12e0,$17c9,$1c48
  420. fdb $128b,$2020,$1010,$7ef,$970,$17c9,$1c48
  421. fdb $128b,$2020,$2010,$7ef,$970,$be4,$1c48
  422. fdb $128b,$2020,$2020,$7ef,$970,$be4,$e25
  423. fdb $128b,$2020,$2020,$fdf,$970,$be4,$e25
  424. fdb $128b,$2020,$2020,$fdf,$12e0,$be4,$e25
  425. fdb $128b,$2020,$2020,$fdf,$12e0,$17c9,$e25
  426. fdb $128b,$2020,$2020,$fdf,$12e0,$17c9,$1c48
  427. fdb $128b,$4020,$2020,$7ef,$12e0,$17c9,$1c48
  428. fdb $128b,$4040,$2020,$7ef,$970,$17c9,$1c48
  429. fdb $128b,$4040,$4020,$7ef,$970,$be4,$1c48
  430. fdb $128b,$4040,$4040,$7ef,$970,$be4,$e25
  431. fdb $128b,$4040,$4040,$fdf,$970,$be4,$e25
  432. fdb $128b,$4040,$4040,$fdf,$12e0,$be4,$e25
  433. fdb $128b,$4040,$4040,$fdf,$12e0,$17c9,$e25
  434. fdb $128b,$4040,$4040,$fdf,$12e0,$17c9,$1c48
  435. fdb $128b,$8040,$4040,$7ef,$12e0,$17c9,$1c48
  436. fdb $128b,$8080,$4040,$7ef,$970,$17c9,$1c48
  437. fdb $128b,$8080,$8040,$7ef,$970,$be4,$1c48
  438. fdb $128b,$8080,$8080,$7ef,$970,$be4,$e25
  439. fdb $128b,$8080,$8080,$fdf,$970,$be4,$e25
  440. fdb $128b,$8080,$8080,$fdf,$12e0,$be4,$e25
  441. fdb $128b,$8080,$8080,$fdf,$12e0,$17c9,$e25
  442. fdb $128b,$8080,$8080,$fdf,$12e0,$17c9,$1c48
  443. fdb 0
  444.  
  445. ptn5
  446. fdb $128b,$8080,$8080,$5f2,$000,$000,$000
  447. fdb $128b,$8080,$8080,$5f2,$711,$000,$000
  448. fdb $128b,$8080,$8080,$5f2,$711,$8e9,$000
  449. fdb $128b,$8080,$8080,$5f2,$711,$8e9,$a97
  450. fdb $128b,$8080,$8080,$be4,$711,$8e9,$a97
  451. fdb $128b,$8080,$8080,$be4,$e25,$8e9,$a97
  452. fdb $128b,$8080,$8080,$be4,$e25,$11d0,$a97
  453. fdb $128b,$8080,$8080,$be4,$e25,$11d0,$1531
  454. fdb $128b,$4080,$8080,$5f2,$e25,$11d0,$1531
  455. fdb $128b,$4040,$8080,$5f2,$711,$11d0,$1531
  456. fdb $128b,$4040,$4080,$5f2,$711,$8e9,$1531
  457. fdb $128b,$4040,$4040,$5f2,$711,$8e9,$a97
  458. fdb $128b,$4040,$4040,$be4,$711,$8e9,$a97
  459. fdb $128b,$4040,$4040,$be4,$e25,$8e9,$a97
  460. fdb $128b,$4040,$4040,$be4,$e25,$11d0,$a97
  461. fdb $128b,$4040,$4040,$be4,$e25,$11d0,$1531
  462. fdb $128b,$2040,$4040,$5f2,$e25,$11d0,$1531
  463. fdb $128b,$2020,$4040,$5f2,$711,$11d0,$1531
  464. fdb $128b,$2020,$2040,$5f2,$711,$8e9,$1531
  465. fdb $128b,$2020,$2020,$5f2,$711,$8e9,$a97
  466. fdb $128b,$2020,$2020,$be4,$711,$8e9,$a97
  467. fdb $128b,$2020,$2020,$be4,$e25,$8e9,$a97
  468. fdb $128b,$2020,$2020,$be4,$e25,$11d0,$a97
  469. fdb $128b,$2020,$2020,$be4,$e25,$11d0,$1531
  470. fdb $128b,$1020,$2020,$5f2,$e25,$11d0,$1531
  471. fdb $128b,$1010,$2020,$5f2,$711,$11d0,$1531
  472. fdb $128b,$1010,$1020,$5f2,$711,$8e9,$1531
  473. fdb $128b,$1010,$1010,$5f2,$711,$8e9,$a97
  474. fdb $128b,$1010,$1010,$be4,$711,$8e9,$a97
  475. fdb $128b,$1010,$1010,$be4,$e25,$8e9,$a97
  476. fdb $128b,$1010,$1010,$be4,$e25,$11d0,$a97
  477. fdb $128b,$1010,$1010,$be4,$e25,$11d0,$1531
  478. fdb $128b,$1010,$1010,$5f2,$e25,$11d0,$1531
  479. fdb $128b,$1010,$1010,$5f2,$711,$11d0,$1531
  480. fdb $128b,$1010,$1010,$5f2,$711,$8e9,$1531
  481. fdb $128b,$1010,$1010,$5f2,$711,$8e9,$a97
  482. fdb $128b,$1010,$1010,$be4,$711,$8e9,$a97
  483. fdb $128b,$1010,$1010,$be4,$e25,$8e9,$a97
  484. fdb $128b,$1010,$1010,$be4,$e25,$11d0,$a97
  485. fdb $128b,$1010,$1010,$be4,$e25,$11d0,$1531
  486. fdb $128b,$2010,$1010,$5f2,$e25,$11d0,$1531
  487. fdb $128b,$2020,$1010,$5f2,$711,$11d0,$1531
  488. fdb $128b,$2020,$2010,$5f2,$711,$8e9,$1531
  489. fdb $128b,$2020,$2020,$5f2,$711,$8e9,$a97
  490. fdb $128b,$2020,$2020,$be4,$711,$8e9,$a97
  491. fdb $128b,$2020,$2020,$be4,$e25,$8e9,$a97
  492. fdb $128b,$2020,$2020,$be4,$e25,$11d0,$a97
  493. fdb $128b,$2020,$2020,$be4,$e25,$11d0,$1531
  494. fdb $128b,$4020,$2020,$5f2,$e25,$11d0,$1531
  495. fdb $128b,$4040,$2020,$5f2,$711,$11d0,$1531
  496. fdb $128b,$4040,$4020,$5f2,$711,$8e9,$1531
  497. fdb $128b,$4040,$4040,$5f2,$711,$8e9,$a97
  498. fdb $128b,$4040,$4040,$be4,$711,$8e9,$a97
  499. fdb $128b,$4040,$4040,$be4,$e25,$8e9,$a97
  500. fdb $128b,$4040,$4040,$be4,$e25,$11d0,$a97
  501. fdb $128b,$4040,$4040,$be4,$e25,$11d0,$1531
  502. fdb $128b,$8040,$4040,$5f2,$e25,$11d0,$1531
  503. fdb $128b,$8080,$4040,$5f2,$711,$11d0,$1531
  504. fdb $128b,$8080,$8040,$5f2,$711,$8e9,$1531
  505. fdb $128b,$8080,$8080,$5f2,$711,$8e9,$a97
  506. fdb $128b,$8080,$8080,$be4,$711,$8e9,$a97
  507. fdb $128b,$8080,$8080,$be4,$e25,$8e9,$a97
  508. fdb $128b,$8080,$8080,$be4,$e25,$11d0,$a97
  509. fdb $128b,$8080,$8080,$be4,$e25,$11d0,$1531
  510. fdb 0
  511.  
  512. ptn6
  513. fdb $128b,$8080,$8080,$5f2,$12e0,$17c9,$1c48
  514. fdb $128b,$8080,$8080,$5f2,$711,$17c9,$1c48
  515. fdb $128b,$8080,$8080,$5f2,$711,$8e9,$1c48
  516. fdb $128b,$8080,$8080,$5f2,$711,$8e9,$a97
  517. fdb $128b,$8080,$8080,$be4,$711,$8e9,$a97
  518. fdb $128b,$8080,$8080,$be4,$e25,$8e9,$a97
  519. fdb $128b,$8080,$8080,$be4,$e25,$11d0,$a97
  520. fdb $128b,$8080,$8080,$be4,$e25,$11d0,$1531
  521. fdb $128b,$4080,$8080,$5f2,$e25,$11d0,$1531
  522. fdb $128b,$4040,$8080,$5f2,$711,$11d0,$1531
  523. fdb $128b,$4040,$4080,$5f2,$711,$8e9,$1531
  524. fdb $128b,$4040,$4040,$5f2,$711,$8e9,$a97
  525. fdb $128b,$4040,$4040,$be4,$711,$8e9,$a97
  526. fdb $128b,$4040,$4040,$be4,$e25,$8e9,$a97
  527. fdb $128b,$4040,$4040,$be4,$e25,$11d0,$a97
  528. fdb $128b,$4040,$4040,$be4,$e25,$11d0,$1531
  529. fdb $128b,$2040,$4040,$5f2,$e25,$11d0,$1531
  530. fdb $128b,$2020,$4040,$5f2,$711,$11d0,$1531
  531. fdb $128b,$2020,$2040,$5f2,$711,$8e9,$1531
  532. fdb $128b,$2020,$2020,$5f2,$711,$8e9,$a97
  533. fdb $128b,$2020,$2020,$be4,$711,$8e9,$a97
  534. fdb $128b,$2020,$2020,$be4,$e25,$8e9,$a97
  535. fdb $128b,$2020,$2020,$be4,$e25,$11d0,$a97
  536. fdb $128b,$2020,$2020,$be4,$e25,$11d0,$1531
  537. fdb $128b,$1020,$2020,$5f2,$e25,$11d0,$1531
  538. fdb $128b,$1010,$2020,$5f2,$711,$11d0,$1531
  539. fdb $128b,$1010,$1020,$5f2,$711,$8e9,$1531
  540. fdb $128b,$1010,$1010,$5f2,$711,$8e9,$a97
  541. fdb $128b,$1010,$1010,$be4,$711,$8e9,$a97
  542. fdb $128b,$1010,$1010,$be4,$e25,$8e9,$a97
  543. fdb $128b,$1010,$1010,$be4,$e25,$11d0,$a97
  544. fdb $128b,$1010,$1010,$be4,$e25,$11d0,$1531
  545. fdb $128b,$1010,$1010,$5f2,$e25,$11d0,$1531
  546. fdb $128b,$1010,$1010,$5f2,$711,$11d0,$1531
  547. fdb $128b,$1010,$1010,$5f2,$711,$8e9,$1531
  548. fdb $128b,$1010,$1010,$5f2,$711,$8e9,$a97
  549. fdb $128b,$1010,$1010,$be4,$711,$8e9,$a97
  550. fdb $128b,$1010,$1010,$be4,$e25,$8e9,$a97
  551. fdb $128b,$1010,$1010,$be4,$e25,$11d0,$a97
  552. fdb $128b,$1010,$1010,$be4,$e25,$11d0,$1531
  553. fdb $128b,$2010,$1010,$5f2,$e25,$11d0,$1531
  554. fdb $128b,$2020,$1010,$5f2,$711,$11d0,$1531
  555. fdb $128b,$2020,$2010,$5f2,$711,$8e9,$1531
  556. fdb $128b,$2020,$2020,$5f2,$711,$8e9,$a97
  557. fdb $128b,$2020,$2020,$be4,$711,$8e9,$a97
  558. fdb $128b,$2020,$2020,$be4,$e25,$8e9,$a97
  559. fdb $128b,$2020,$2020,$be4,$e25,$11d0,$a97
  560. fdb $128b,$2020,$2020,$be4,$e25,$11d0,$1531
  561. fdb $128b,$4020,$2020,$5f2,$e25,$11d0,$1531
  562. fdb $128b,$4040,$2020,$5f2,$711,$11d0,$1531
  563. fdb $128b,$4040,$4020,$5f2,$711,$8e9,$1531
  564. fdb $128b,$4040,$4040,$5f2,$711,$8e9,$a97
  565. fdb $128b,$4040,$4040,$be4,$711,$8e9,$a97
  566. fdb $128b,$4040,$4040,$be4,$e25,$8e9,$a97
  567. fdb $128b,$4040,$4040,$be4,$e25,$11d0,$a97
  568. fdb $128b,$4040,$4040,$be4,$e25,$11d0,$1531
  569. fdb $128b,$8040,$4040,$5f2,$e25,$11d0,$1531
  570. fdb $128b,$8080,$4040,$5f2,$711,$11d0,$1531
  571. fdb $128b,$8080,$8040,$5f2,$711,$8e9,$1531
  572. fdb $128b,$8080,$8080,$5f2,$711,$8e9,$a97
  573. fdb $128b,$8080,$8080,$be4,$711,$8e9,$a97
  574. fdb $128b,$8080,$8080,$be4,$e25,$8e9,$a97
  575. fdb $128b,$8080,$8080,$be4,$e25,$11d0,$a97
  576. fdb $128b,$8080,$8080,$be4,$e25,$11d0,$1531
  577. fdb 0
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement