/******************************* PRE5 ******************************/
/*           (DOS) FEATURE MODULE P PREREQUISITE LOADER            */
/*******************************************************************/
menu = 1
cls
write screen (15t,5t) '    Loading Feature Module prerequisites '
write screen (15t,6t) '---------------------------------------------'
write screen (15t,8t) 'Defining literals: BHEX and CURUP'       
DEFINE LITERALLY BHEX  = 'BASE = HEX; BASE'
DEFINE LITERALLY CURUP = 'CURY = CURY - 2; CLEAREOL'
write screen (29t,11t)'LOADING COMPLETE'
write screen (15t,13t)'-----------Press any key to continue-----------'
define char reply = ci
remove reply
cls
GTS  /* go to first screen of module */
