10 DEFFNS="Xload"
   20 MODE2
   21 COLOUR 2
   30 VDU23;8202;0;0;0;
   40 *LO. X 3000
   50 VDU28,10,31,19,0
   60 PRINT''"The 8BS"'"Xmas Tree"''''"13*CDs"''"23*3.5'"'"discs"''"7*5.25'"'"discs"''"1*8'disc"
   70 PRINT'"50' backuptape"''"30' cable"'
   80 PRINT''"Storage"'"space=7.82Gigabytes"
   90 *FX21
  100 REPEATUNTILGET
  110 *DIR $
  120 *EX. !BOOT