lol.s 296 B

123456789101112131415161718192021
  1. .define Lol
  2. .sect .text
  3. .sect .rom
  4. .sect .data
  5. .sect .bss
  6. .sect .text
  7. ! This subroutine loads a local in registerpair AX which
  8. ! offset from the localbase is to big.
  9. Lol:
  10. jsr Locaddr ! get the address of local
  11. ldy #0
  12. lda (ADDR),y ! get lowbyte
  13. tax
  14. iny
  15. lda (ADDR),y ! get highbyte
  16. rts