1. SIZE EQU $1B01
  2. RAMSTART EQU $0000
  3. RAMEND EQU RAMSTART+SIZE
  4. ROMSTART EQU $C000
  5. ROMEND EQU ROMSTART+SIZE
  6. LOADSTART EQU $1C00
  7.  
  8. ORG $A048 ;location of address for "goto"
  9. FDB LOADSTART
  10.  
  11. ORG LOADSTART
  12. LDX #0
  13. LDS #ROMSTART-1
  14. loop: PULA
  15. STAA 0,X
  16. INX
  17. CPX #RAMEND+1
  18. BNE loop
  19.  
  20. LDS $4000 ;make SP non-zero
  21. JMP $E0E3 ;jump back to monitor