20 *LOAD CODEFIL 900
   30 ?&72=34
   40 *LOAD GHOST2 2000
   50 CALL &900
   60 GOTO50