10 MODE0
   20 *LO. BBCMAD FFFF3000
   30 *FX21
   40 REPEAT UNTILGET
   50 *EX. !BOOT