home *** CD-ROM | disk | FTP | other *** search
/ Syzygy Magazine 6 / Syzygy_Magazine_6_1999___pl_Disk_2_of_3_Side_A.atr / msxrel.arc / CMCR.ASM next >
Assembly Source File  |  1979-12-31  |  971b  |  1 lines
  1. ûבלב≥σ∮é¢ûצ·τáúÀ颠    opt %100101¢¢muz  equ $a000    poczatek danych¢*                 modulu.¢muz2 equ $9000    pod jaki adr. rel.¢lsb  equ muz+$14¢msb  equ muz+$54¢¢     org $80¢adr1 org *+2¢adr2 org *+2¢¢     org $b000¢run  lda <muz     poczatkowy adres¢     sta adr1     muzyki (patrz¢     lda >muz     naglowek pliku).¢     sta adr1+1¢     lda <muz2    pod jaki adres¢     sta adr2     relokowac muzyke.¢     lda >muz2¢     sta adr2+1¢     jsr cmcr¢     rts¢¢cmcr ldy #0¢     lda lsb,y¢     cmp #$ff¢     bne k1¢     lda msb,y¢     cmp #$ff¢     beq k3¢     lda lsb,y¢k1   sec¢     sbc adr1¢     sta lsb,y¢     bcs k2¢     lda msb,y¢     tax¢     dex¢     txa¢     sta msb,y¢k2   lda msb,y¢     sec¢     sbc adr1+1¢     clc¢     adc adr2+1¢     sta msb,y¢     lda lsb,y¢     clc¢     adc adr2¢     sta lsb,y¢     bcc k3¢     lda msb,y¢     tax¢     inx¢     txa¢     sta msb,y¢k3   iny¢     cpy #$40¢     bne cmcr+2¢     rts¢¢     org $2e0¢     dta a(run)¢     end¢