/******************************* PRE6 ******************************/
/*       (DOS) FEATURE MODULES H and N PREREQUISITE LOADER         */
/*******************************************************************/
menu = 1
cls
write screen (15t,5t) '    Loading Feature Module prerequisites'
write screen (15t,6t) '---------------------------------------------'
write screen (15t,8t) 'Loading the sample program MESSG '
load MESSG
write screen (29t,13t)'LOADING COMPLETE'
write screen (15t,15t)'-----------Press any key to continue-----------'
define char reply = ci
remove reply
cls
GTS  /* go to first screen of module */