100 CLS 
  110 CYCLE 
  120   PRINT 
  130   PRINT "Low or High resolution graphics ? ";  
  140   k$ = GET$
  150   IF (k$ = "l") OR (k$ = "L") THEN 
  160     GR 
  170     BREAK 
  180   ELSE 
  190   ENDIF 
  200   IF (k$ = "h") OR (k$ = "H") THEN 
  210     HGR 
  220     BREAK 
  230   ELSE 
  240   ENDIF 
  250 REPEAT 
  260 //
  270 CYCLE 
  280   COLOUR = RND (16)
  290   x = RND (GWIDTH)
  300   y = RND (GHEIGHT)
  310   w = RND (GWIDTH / 4)
  320   h = RND (GHEIGHT / 4)
  330   f = RND (2)
  340   RECT (x, y, w, h, f)
  350   WAIT (0)
  360   IF INKEY <> -1 THEN BREAK 
  370 REPEAT 
  380 END