.title pasvir .ident /850124/ ;+ ; Dummy root to allow NBS programs to load into high memory. ;- .globl III000 ; .asect jsw = 44 virt$ = 2000 . = jsw .word virt$ ; .psect $root$,sav $root$:: mov #1000,sp ;need to kick start stack jmp III000 ;assume a standard NBS program .end $root$