izaya
/
collapseos
дзеркало https://github.com/hsoft/collapseos.git
1
1
Форк 0
Код Проблеми 0 Релізи 0 Вікі Активність
Mirror of CollapseOS
Ви не можете вибрати більше 25 тем Теми мають розпочинатися з літери або цифри, можуть містити дефіси (-) і не повинні перевищувати 35 символів.
1154 Коміти
4 Гілки
13MB
Дерево: 62ae1012df
Гілки Теги
${ item.name }
Створити гілку ${ searchTerm }
з '62ae1012df'
${ noResults }
collapseos/emul/xcomp.fs

25 рядки
451B
Неформатований Звинувачення Історія 

  1. 0xe800 CONSTANT RAMSTART

  2. 0xf000 CONSTANT RS_ADDR

  3. 212 LOAD  ( z80 assembler )

  4. 262 LOAD  ( xcomp )

  5. : CODE XCODE ;

  6. : IMMEDIATE XIMM ;

  7. : (entry) (xentry) ;

  8. : : [ ' X: , ] ;

  9. 

  10. CURRENT @ XCURRENT !

  11. 

  12. 282 LOAD  ( boot.z80 )

  13. 393 LOAD  ( icore low )

  14. : (emit) 0 PC! ;

  15. : (key) 0 PC@ ;

  16. 415 LOAD  ( icore high )

  17. (entry) _

  18. ( Update LATEST )

  19. PC ORG @ 8 + !

  20. ," CURRENT @ HERE ! "

  21. 422 459 XPACKR

  22. ," ' (key) 12 RAM+ ! "

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

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