>>162
こんな感じでどう?

For i = 1 to 100

HOGE1(x[i],y[i])

next



PROCEDURE HOGE1(x, y)

BTN(LEFT,CLICK,x,y,0)
sleep(5)
IFB CHKIMG("画像A.bmp");BTN(LEFT,CLICK,G_IMG_X+5,G_IMG_Y+5,0);ENDIF

FEND