mirror of
https://github.com/cc65/cc65.git
synced 2024-07-06 13:29:01 +00:00
53dd513176
which included commits to RCS files with non-trunk default branches. git-svn-id: svn://svn.cc65.org/cc65/trunk@3 b7a2c559-68d2-44c3-8de9-860c34a00d81
38 lines
765 B
ArmAsm
38 lines
765 B
ArmAsm
|
|
;
|
|
; Maciej 'YTM/Alliance' Witkowiak
|
|
;
|
|
; 21.12.99
|
|
|
|
; void BitOtherClip (void *proc1, void* proc2, char skipl, char skipr, int skipy,
|
|
; struct iconpic *myGfx);
|
|
|
|
; both proc1, proc2 should be: char __fastcall something (void);
|
|
; proc1 is called before reading a byte (.A returns next data)
|
|
; proc2 is called before reading each byte which is not pattern (code >219)
|
|
|
|
|
|
.import popa, popax
|
|
.import BitOtherRegs
|
|
.export _BitOtherClip
|
|
|
|
.include "../inc/jumptab.inc"
|
|
.include "../inc/geossym.inc"
|
|
|
|
_BitOtherClip:
|
|
jsr BitOtherRegs
|
|
jsr popax
|
|
sta r12L
|
|
stx r12H
|
|
jsr popa
|
|
sta r11H
|
|
jsr popa
|
|
sta r11L
|
|
jsr popax
|
|
sta r14L
|
|
stx r14H
|
|
jsr popax
|
|
sta r13L
|
|
stx r13H
|
|
jmp BitOtherClip
|