ACLS @3 X=RND(7)+1 Y=RND(7)+1 Z=RND(7)+1 LOCATE 10,10:COLOR X:PRINT "X" LOCATE 15,10:COLOR X:PRINT "X" LOCATE 20,10:COLOR X:PRINT "X" IF INKEY$=="" THEN @3 IF X==Y AND Y==Z PRINT "オオアタリ!!":END IF X==Y OR Y==Z OR Z==X THEN PRINT "アタリ!":END たぶんこれで動くはず