X = //移動したいX座標
//X座標付近まで移動
WHILE !CHKIMG("img/位置",0,0,0,X+3,150)
KBD(VK_LEFT,DOWN)
WEND
KBD(VK_LEFT,UP)
WHILE CHKIMG("img/位置",0,0,0,X-2,150)
KBD(VK_RIGHT,DOWN)
WEND
KBD(VK_RIGHT,UP)
//X座標に移動
WHILE TRUE
WHILE !CHKIMG("img/位置",0,0,0,X+1,150)
KBD(VK_LEFT,DOWN,70)
KBD(VK_LEFT,UP,10)
WEND
sleep(0.7)
IFB CHKIMG("img/位置",0,X,0,X+1,150)
PRINT G_IMG_X + "," + G_IMG_Y
BREAK
ENDIF
WHILE CHKIMG("img/位置",0,0,0,X,150)
KBD(VK_RIGHT,DOWN,70)
KBD(VK_RIGHT,UP,10)
WEND
sleep(0.7)
IFB CHKIMG("img/位置",0,X,0,X+1,150)
PRINT G_IMG_X + "," + G_IMG_Y
BREAK
ENDIF
WEND
