10'DOT GAME2 20'KURIKOU 2007 30CLS :CLEAR :WAIT 0:RANDOMIZE 40LOCATE 3,1:PRINT "*** DOT GAME 2 ***" 50WAIT 90:LOCATE 7,3:PRINT "by kurikou" 60WAIT 0:LOCATE 1,5:PRINT "PUSH [SPACE] TO STRAT" 70IF INKEY$ <> CHR$ (32) THEN 70 80*SET 90Y=25:YY=0:X=0:MG=0:A=0.005+(( RND 25)/100) 100*START 110CLS 120LINE (50,25)-(143,25) 130WAIT 120:PRINT "Ö°²":WAIT 0:LOCATE 0,0:PRINT "ʼÞÒ" 140*LOOP 150PSET (X,Y) 160IF INKEY$ <>"" THEN YY=YY-A ELSE YY=YY+A 170Y=Y+YY 180IF Y<0 THEN Y=0:YY=0 ELSE IF Y>48 THEN Y=48:YY=0 190IF X>50 THEN G= ABS (25-Y):IF MG CHR$ (32) THEN *SET 300CLS :PRINT "SEE YOU AGAIN!"