home *** CD-ROM | disk | FTP | other *** search
/ Tajemnice Atari 8 / Tajemnice_Atari_Nr_08_1992_Avalon_pl.atr / demo2.asm < prev    next >
Assembly Source File  |  2023-02-26  |  1KB  |  1 lines
  1. Program   Equ $8800¢¢List_mem  Equ %00000110¢List_err  Equ %00000101¢Code_mem  Equ %00010000¢Code_dsk  Equ %00100000¢¢Colpf1    Equ $D017¢Colpf2    Equ $D018¢Dliv      Equ $0200¢Dlptrs    Equ $0230¢Nmien     Equ $D40E¢Wsync     Equ $D40A¢¢Pom       Equ $F0¢¢          Opt List_err+Code_mem¢          Org Program¢¢          Ldy #$00¢          Ldx #$07¢L1        Tya¢          Asl @¢          Sta Kolory,y¢          Txa¢          Asl @¢          Sta Kolory+$08,y¢          Iny¢          Dex¢          Bpl L1¢          Ldy #$01¢L2        Tya¢          Pha¢          Ldx #$00¢          Asl @¢          Asl @¢          Asl @¢          Asl @¢          Tay¢L3        Lda Kolory,x¢          Sta Kolory,y¢          Inx¢          Iny¢          Cpx #$10¢          Bne L3¢          Pla¢          Tay¢          Iny¢          Cpy #$0C¢          Bne L2¢¢          Jmp Init¢¢Przerw    Pha¢          Txa¢          Pha¢          Tya¢          Pha¢¢          Ldx #$00¢L4        Lda Kolory,x¢          Sta Colpf2¢          Eor #$FF¢          Sta Colpf1¢          Sta Wsync¢          Inc Kolory,x¢          Inx¢          Cpx #$C0¢          Bne L4¢¢          Pla¢          Tay¢          Pla¢          Tax¢          Pla¢          Rti¢¢Kolory    Dta B($00)¢¢          End of file¢