10 DEFFNS="Loader"
   20 MODE0
   30 VDU23;8202;0;0;0;
   40 *LO. Pic FFFF3000
   50 FORL%=1TO3000
   60 NEXT
   70 PRINTTAB(0,0);"Do you have room for this vehicle on your drive?"
   80 PRINTTAB(0,31);"(Comes complete with large family and various tents)";
   90 L%=300
  100 REPEAT
  110 L%=L%+1
  120 IFL%=600 L%=1
  130 IF L%<300 PRINTTAB(30,10);"CJR here"; ELSE PRINTTAB(30,10);SPC(8);
  140 IF INKEY(0)=32:OSCLI"EX.!BOOT":END    
  150 UNTIL FALSE