190 DEFPROCgame
  200 dotleft%=dotnum%+1
  210 CLS
  220 GCOL 7
  230 FOR num%=0 TO dotnum%
  240   PROCsetdot(num%)
  250 NEXT
  260 GCOL 8,0
  270 xpos%=200:ypos%=200
  280 *SChoose mun_right
  290 PLOT 237,xpos%,ypos%
  300 start%=TIME
  310 REPEAT
  320   PROCmove
  330 UNTIL dotleft%=0
  340 PRINT TAB(10,25)"You took ";(TIME-start%)/100" seconds"
  350 PRINT TAB(10,26)"Another go? (y/n)"
  360 REPEAT
  370   char%=GET
  380 UNTIL (char% AND &DF)=ASC("Y") OR (char% AND &DF)=ASC("N")
  390 ENDPROC
  400 :