izaya
/
collapseos
mirror of https://github.com/hsoft/collapseos.git
1
1
Fork 0
Code Issues 0 Releases 0 Wiki Activity
Mirror of CollapseOS
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
1188 Commits
4 Branches
13MB
Tree: 74896051bb
Branches Tags
${ item.name }
Create branch ${ searchTerm }
from '74896051bb'
${ noResults }
collapseos/recipes/trs80/xcomp.fs

23 lines
549B
Raw Blame History 

  1. 0xf000 CONSTANT RS_ADDR

  2. 0xfffa CONSTANT PS_ADDR

  3. RS_ADDR 0x80 - CONSTANT RAMSTART

  4. 212 LOAD  ( z80 assembler )

  5. 262 LOAD  ( xcomp )

  6. 270 LOAD  ( xcomp overrides )

  7. 

  8. 0x3000 BIN( !

  9. 282 LOAD  ( boot.z80 )

  10. 492 LOAD  ( trs80.z80 )

  11. 393 LOAD  ( xcomp core low )

  12. 420 LOAD  ( xcomp core high )

  13. (entry) _

  14. ( Update LATEST )

  15. PC ORG @ 8 + !

  16. ," CURRENT @ HERE ! "

  17. 440 444 XPACKR ( core )

  18. 499 500 XPACKR ( trs80.fs )

  19. ( 0x0a == NLPTR. TRS-80 wants CR-only newlines )

  20. ," : _ ['] CR 0x0a RAM+ ! BLK$ FD$ (ok) RDLN$ ; _ "

  21. ORG @ 256 /MOD 2 PC! 2 PC!

  22. H@ 256 /MOD 2 PC! 2 PC!