.export pushb, pushbidx
.import pushax
- .importzp ptr1
+ .importzp ptr1
pushbidx:
sty ptr1
pushb: sta ptr1
stx ptr1+1
ldx #0 ; Load index/high byte
- lda (ptr1,x)
+.ifpc02
+ lda (ptr1) ; Save one cycle for the C02
+.else
+ lda (ptr1,x)
+.endif
bpl L1
dex ; Make high byte FF
L1: jmp pushax