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