1
0
mirror of https://github.com/cc65/cc65.git synced 2024-12-25 02:29:52 +00:00

Add __fastcall__ stuff

git-svn-id: svn://svn.cc65.org/cc65/trunk@5950 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
karri 2012-12-17 17:31:07 +00:00
parent 1cfe0edee2
commit 4697cf255f

View File

@ -11,8 +11,10 @@
.export _lynx_snd_play .export _lynx_snd_play
.export _lynx_snd_stop .export _lynx_snd_stop
.export _lynx_snd_pause .export _lynx_snd_pause
.export _lynx_snd_unpause .export _lynx_snd_continue
.interruptor lynx_snd_handler .interruptor lynx_snd_handler
.import popa
.importzp ptr1
;---------------------------------------------------------------------------- ;----------------------------------------------------------------------------
; ZP variables that go into APPZP ; ZP variables that go into APPZP
@ -1101,7 +1103,12 @@ set0: ldy SndOffsets,x
_lynx_snd_play: _lynx_snd_play:
sta ptr1
stx ptr1+1
jsr popa
tax
lda ptr1
ldy ptr1+1
php php
pha pha
lda SndActive,x lda SndActive,x
@ -1213,7 +1220,7 @@ _lynx_snd_pause: php
rts rts
_lynx_snd_unpause: php _lynx_snd_continue: php
sei sei
SndPauseOff1: lda #0 ; Selbsmodifizierter Code!!! SndPauseOff1: lda #0 ; Selbsmodifizierter Code!!!
sta STIMCTLA sta STIMCTLA