編成を考える（その２）

//第２部隊編成
print "2SQ 編成開始"
	ifb chkimgx("pack2.bmp",NOXid,1,220,110,340,1,10,-1) then
		P_adb_BTN(15 , 240 ,500,"2SQ")	//第２選択
	else
print "Status error (formation 2SQ)"
		exitexit
	endif
	repeat
		sleep(1)
	until chkimgx("pack2rdy.bmp",NOXid,1,220,110,340,1,10,-1)
	sleep(0.5)
	repeat
		P_adb_BTN(175 , 400, 500,"1st pos")	//１人目枠クリック
		P_random_sleep(2.5,3)
	until chkimgx("cancel.bmp", NOXid, 0, 0, 0, 0, 1, 15, -1)
		ifb formation = "A" then
		ifb chkimgx("A-1.bmp",NOXid,0,0,0,0,-1,15,-1) then
			P_adb_BTN(G_IMGX_X + delta_X ,G_IMGX_Y + delta_Y ,100,"A-1")	//肖像クリック
			break
		else
print "2SQ(A-1) failed"	//本来はスクロールして探す
			exitexit
		endif
	elseif formation ="B" then
		ifb chkimgx("B-1.bmp",NOXid,0,0,0,0,-1,15,-1) then
			P_adb_BTN(G_IMGX_X + delta_X ,G_IMGX_Y + delta_Y ,100,"B-1")	//肖像クリック
			break
		else
print "2SQ(B-1) failed"	//本来はスクロールして探す
			exitexit
		endif
	endif
	repeat
		P_adb_BTN(350 ,400 ,500,"2nd pos")	//２人目枠クリック
		P_random_sleep(2.5,3)
	until chkimgx("cancel.bmp", NOXid, 0, 0, 0, 0, 1, 15, -1)
	tim = gettime() + 10	//ボタンが滑った場合の判定用（スクロールして探すときは時間延ばすこと）
	ifb formation = "A" then
		ifb chkimgx("A-2.bmp",NOXid,0,0,0,0,-1,15,-1) then
			P_adb_BTN(G_IMGX_X + delta_X ,G_IMGX_Y + delta_Y ,100,"A-2")	//肖像クリック
			break
		else
print "2SQ(A-1) failed"	//本来はスクロールして探す
			exitexit
		endif
	elseif formation ="B" then
		ifb chkimgx("B-2.bmp",NOXid,0,0,0,0,-1,15,-1) then
			P_adb_BTN(G_IMGX_X + delta_X ,G_IMGX_Y + delta_Y ,100,"B-2")	//肖像クリック
			break
		else
print "2SQ(B-2) failed"	//本来はスクロールして探す
			exitexit
		endif
	endif
	tim = gettime() + 15	//ボタンが滑った場合の判定用
	repeat
		sleep(1)
		ifb tim < gettime() then
print "Exchange result is unexpected status"
			exitexit
		endif
	until chkimgx("back_home.bmp",NOXid,0, 20, 140, 100, 1, 10, -1)
	formation = false	//編成終了
	P_adb_BTN(G_IMGX_X + delta_X ,G_IMGX_Y + delta_Y ,0,"Back Home")	//戻るクリック
fend