( FILE: ICREATE2)

( This file creates KERNEL2.IMG -- consisting of 7BASIC2
  7OSI2 and 7DISP2. 
  --- this is a minimum kernel (interpreter and compiler missing)
      which is adequate for most turnkey COM programs.
      ----- no EGA graphics is included however -- EGAM will have
            to be CLOADed separately if needed.)


OFF PRINTLOAD

 100H FF00H CROSS-COMPILE 

LAST @ " -- LAST" ." .H 5 spcs
HEAD @ " -- HEAD" ." .H 5 spcs
HEAD @ BASE @ - " -- (HEAD - BASE)" ." .H 5 spcs 

103H ORG ( leave room for jump)
    " 7BASIC2"   LOAD    " 7BASIC2 LOADED"   ."   CRLF
 
LAST @ " -- LAST" ." .H 5 spcs
HEAD @ " -- HEAD" ." .H 5 spcs
HEAD @ BASE @ - " -- (HEAD - BASE)" ." .H 5 spcs

 0     ( no multi-task interlock)
    " 7OSI2"     LOAD    " 7OSI2 LOADED"     ."   CRLF

LAST @ " -- LAST" ." .H 5 spcs
HEAD @ " -- HEAD" ." .H 5 spcs
HEAD @ BASE @ - " -- (HEAD - BASE)" ." .H 5 spcs

    " 7DISP2"    LOAD    " 7DISP2 LOADED"    ."   CRLF


    isave kernel2.img    " 7B PIMAGED"    ."   CRLF

STATUS
HEAD @ BASE @ - " -- (HEAD - BASE)" ." .H 5 CRLF
UNCROSS
DS

quit