home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Tajemnice Atari 5
/
Tajemnice_Atari_Nr_05_1992_Avalon_pl.atr
/
jemu.asm
< prev
next >
Wrap
Assembly Source File
|
2023-02-26
|
1KB
|
1 lines
opt %010101¢¢*----- system ------------------¢dosvec equ $0a¢pokmsk equ $10¢vtimr1 equ $0210¢stick0 equ $0278¢strig0 equ $0284¢audf1 equ $d200¢kbcode equ $d209¢stimer equ $d209¢irqen equ $d20e¢skstat equ $d20f¢¢frq equ 127¢¢ org $600¢¢*----- main --------------------¢main lda <myint¢ sta vtimr1¢ lda >myint¢ sta vtimr1+1¢ lda #frq¢ sta audf1¢ lda pokmsk¢ ora #1¢ sta pokmsk¢ sta irqen¢ sta stimer¢ jmp (dosvec)¢¢*----- my pokey interrupt ------¢myint txa¢ pha¢¢jmove ldx #15¢ lda skstat¢ and #%00000100¢ bne jfire¢¢ lda kbcode¢ ldx #3¢chkkey cmp keytab,x¢ beq setjoy¢ dex¢ bpl chkkey¢ bmi jfire¢setjoy lda joytab,x¢ tax¢¢jfire txa¢ and #15¢ sta stick0¢ lda skstat¢ and #%00001000¢ bne myintx¢ sta strig0¢¢myintx pla¢ tax¢ pla¢ rti¢¢*----- data --------------------¢keytab dta b(14)¢ dta b(15)¢ dta b(6)¢ dta b(7)¢joytab dta b(14)¢ dta b(13)¢ dta b(11)¢ dta b(7)¢¢ org $2e0¢ dta a(main)¢¢ end¢