2 ; Ullrich von Bassewitz, 26.10.2000
4 ; CC65 runtime: Store a/x indirect into address at top of stack with index
9 .importzp sp, tmp1, ptr1
20 sta ptr1 ; Address now in ptr1
22 iny ; Address high byte
24 sta (ptr1),y ; Store high byte
25 dey ; Address low byte
26 pla ; Restore low byte into A
27 sta (ptr1),y ; Store low byte
28 jmp incsp2 ; Drop address