10 MODE1
   20 VDU23;8202;0;0;0;
   30 *LOAD 1SFIRE 3000
   40 *FX 21
   50 REPEATUNTILGET
   60 *DIR $
   70 *EXEC !BOOT