Gow BOT

//Public変数
Public ID //AndyウィンドウのID
Public Current_No //アカウント番号
Public Err_Flag //Gow起動エラーフラグ

//設定
MAX_GCNT=2000 //全体の繰り返し数
AOWARI_WAIT=200 //ANDY終了後の待ち時間(秒)

//ここから全体の繰り返し
Call gow_state_log.uws("開始")
For G_CNT=1 To MAX_GCNT
ERR_FLAG=true
ST=Gettime()
Call gow_state_log.uws("----------------------------------------------------------")
Call gow_state_log.uws(G_CNT+"/"+MAX_GCNT+"セット")
Call gow_state_log.uws("----------------------------------------------------------")

//ビープ
Sound("BEEP")

//ANDY QUIT終了
Ifb Getid("AndyConsole")>=0 then
Sleep(2)
CtrlWIN(Getid("AndyConsole"),CLOSE2)
Sleep(1)
Endif

//ANDY起動
Call start_andy.uws
ID=Getid("andy")

//ANDY起動のチェック
Ifb ID<>0 Then
//相対座標化
MouseORG(ID)

//GOW起動
Call gow_start.uws()

//課金広告を閉じる
Kbd(VK_ESC,CLICK,100)
Sleep(1)

//鳩チェック
Select Current_No
Case 5
//鳩チェックしない例外
Default
Call gow_shield.uws()
Selend

//アテナ開封
Call gow_atena.uws()

//支援
Call gow_sien.uws()

//クエスト
Call gow_quest.uws()

//同盟の贈り物
Call gow_gift.uws()

//資源送付
Select Current_No
Case 3,4
//資源送付しない例外
Default
Call gow_send.uws()
Selend

//ログアウト
Call gow_logout.uws()

//エラーフラグ処理
Err_Flag=false

//ANDY終了
CtrlWIN(ID,CLOSE)
Sleep(2)
MouseORG(Getid("AndyConsole","Qt5QWindow"))
Btn(LEFT,CLICK,160,122,78)

//次の起動まで待ち、エラー時は10秒
Ifb AOWARI_WAIT>10 Then
Ifb Err_Flag Then
a_w=10
Err_Flag=false
Else
a_w=AOWARI_WAIT
Endif
Call gow_state_log.uws("ANDY終了 wait" + a_w + "sec")
For i=1 To a_w/10
Sleep(10)
Call gow_state_log.uws(" wait" + i*10+ "sec経過/" + a_w)
Next
Else
Call gow_state_log.uws("ANDY終了 wait" + AOWARI_WAIT + "sec")
Sleep(AOWARI_WAIT)
Endif
Endif
Call gow_state_log.uws(G_CNT+"セット終了("+(Gettime()-ST)+"sec)")
Next

//全て完了
Call gow_state_log.uws("----------------------------------------------------------")
Call gow_state_log.uws("終了")
Call gow_state_log.uws("----------------------------------------------------------")