home *** CD-ROM | disk | FTP | other *** search
/ Tajemnice Atari 8 / Tajemnice_Atari_Nr_08_1992_Avalon_pl.atr / demo1.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¢¢Colpf2    Equ $D018¢Dliv      Equ $0200¢Dlptrs    Equ $0230¢Rtclok    Equ $12¢Nmien     Equ $D40E¢Wsync     Equ $D40A¢¢Pom       Equ $F0¢¢          Opt List_err+Code_mem¢          Org Program¢¢          Jmp Init¢¢Przerw    Pha¢          Txa¢          Pha¢          Tya¢          Pha¢¢          Ldx #$D0¢          Ldy Rtclok+$02¢L1        Sty Colpf2¢          Sty Wsync¢          Iny¢          Dex¢          Bne L1¢¢          Pla¢          Tay¢          Pla¢          Tax¢          Pla¢          Rti¢¢Init      Lda Dlptrs¢          Sta Pom¢          Lda Dlptrs+1¢          Sta Pom+1¢          Lda Dliv¢          Pha¢          Lda Dliv+1¢          Pha¢          Ldy #$00¢          Lda (Pom),y¢          Ora #$80¢          Sta (Pom),y¢          Ldx <Przerw¢          Ldy >Przerw¢          Lda #$C0¢          Stx Dliv¢          Sty Dliv+1¢          Sta Nmien¢          Jsr Klawisz¢          Lda #$00¢          Sta Nmien¢          Sei¢          Pla¢          Sta Dliv+1¢          Pla¢          Sta Dliv¢          Lda #$FF¢          Sta Nmien¢          Cli¢          Rts¢¢Kolory    Dta B($00)¢¢          End of file¢