12345678910111213141516171819202122232425262728 |
- .define Loil
- .sect .text
- .sect .rom
- .sect .data
- .sect .bss
- .sect .text
- ! This subroutine pushes an object of size greater than four bytes
- ! onto the stack.
- Loil:
- sta ADDR+1 ! source address (lowbyte)
- stx ADDR ! source address (highbyte)
- sty NBYTES
- sec
- lda SP+2
- sbc NBYTES
- sta ADDR+2 ! destination address (lowbyte)
- sta SP+2 ! new stackpointer
- lda SP+1
- sbc NBYTES+1
- sta ADDR+3 ! destination address (highbyte)
- sta SP+1 ! new stackpointer
- inc NBYTES+1
- jmp Blmnp ! do the move
|