mirror of
https://github.com/hsoft/collapseos.git
synced 2024-11-27 14:58:06 +11:00
10 lines
313 B
Plaintext
10 lines
313 B
Plaintext
PC 3 - ORG @ 1+ ! ( main )
|
|
DX POPx, ( boot drive no ) 0x03 DL MOVmr,
|
|
SP PS_ADDR MOVxI, BP RS_ADDR MOVxI,
|
|
DI 0x08 MOVxm, ( LATEST )
|
|
( HERE begins at CURRENT )
|
|
SYSVARS 0x4 ( HERE ) + DI MOVmx,
|
|
SYSVARS 0x2 ( CURRENT ) + DI MOVmx,
|
|
DI 0x04 ( BOOT ) MOVxm,
|
|
JMPn, lblexec @ RPCn, ( execute )
|