「Game of War」の宝箱開封スクリプト

Game of Warで宝箱を開くのがあまりにつらい人に向けた、Windows操作自動化プログラム「UWSC」のスクリプト例。
Androidエミュレータは「Andy」を使用しています。

//設定
INST_FOLDER="C:\Program Files\Andy\Andy.exe" //Andyのインストールフォルダ
MAX_GCNT=200 //全体の繰り返し数
MAX_SCNT=200 //一回の繰り返し数
AKIDOU_WAIT=30 //ANDY起動時の待ち時間(秒)
GKIDOU_WAIT=30 //GOW起動時の待ち時間(秒)
KAIFUU_WAIT=20 //宝箱開封前の最終確認時間(秒)
AOWARI_WAIT=10 //ANDY終了後の待ち時間(秒)
OC_WAIT=2.5 //宝箱開封とポップアップクローズのインターバル(秒)
CO_WAIT=2 //ポップアップクローズと宝箱開封のインターバル(秒)

KAKIN_X=222 //起動時の課金ボタン位置
KAKIN_Y=1034 //起動時の課金ボタン位置
KAKIN_COLOR=1006763 //起動時の課金ボタンカラー
GOW_W=699 //GOW画面のサイズ
GOW_H=1160 //GOW画面のサイズ
GOW_X=G_SCREEN_W-GOW_W //GOW画面の位置
GOW_Y=0 //GOW画面の位置
ITEM_X=309 //"アイテム"ボタン位置
ITEM_Y=1051 //"アイテム"ボタン位置
MYITEM_X=428 //"マイアイテム"タブ位置
MYITEM_Y=271 //"マイアイテム"タブ位置
MYITEM_COLOR=9480374 //"マイアイテム"タブの選択色
TAKARA_X=577 //"宝"タブ位置
TAKARA_Y=367 //"宝"タブ位置
TAKARA_COLOR=461163 //"宝"タブの選択色
OPN1_X=580 //宝箱上段の位置
OPN1_Y=557 //宝箱上段の位置
OPN2_X=580 //宝箱中段の位置
OPN2_Y=737 //宝箱中段の位置
OPN3_X=580 //宝箱下段の位置
OPN3_Y=900 //宝箱下段の位置
CLOSE_X=614 //ポップアップを閉じるボタンの位置
CLOSE_Y=331 //ポップアップを閉じるボタンの位置

//解像度が低い場合の補正
If G_SCREEN_H<=1200 Then
ALFA=G_SCREEN_H/1200
Else
ALFA=1
EndIf

//ここから全体の繰り返し
Print GetTime()+" "+"開始"
For G_CNT=1 TO MAX_GCNT
ST=GetTime()
Print GetTime()+" "+G_CNT+"/"+MAX_GCNT+"セット"
//ANDY起動
Print GetTime()+" "+".ANDY起動"
ID=Exec(INST_FOLDER)
Sleep(AKIDOU_WAIT)

//ANDY起動のチェック
If ID<>0 Then
//相対座標化
MouseORG(ID)
//GOW起動
//CNT=1
//While !Abs(PeekColor(KAKIN_X*ALFA,KAKIN_Y*ALFA)-KAKIN_COLOR)=0
Print GetTime()+" "+".GOW起動"
Kbd(VK_G,CLICK,100)
Kbd(VK_A,CLICK,100)
Kbd(VK_M,CLICK,100)
Kbd(VK_E,CLICK,100)
Kbd(VK_SPACE,CLICK,100)
Kbd(VK_O,CLICK,100)
Kbd(VK_F,CLICK,100)
Kbd(VK_SPACE,CLICK,100)
Kbd(VK_W,CLICK,100)
Kbd(VK_A,CLICK,100)
Kbd(VK_R,CLICK,100)
Kbd(VK_DOWN,CLICK,300)
Kbd(VK_RIGHT,CLICK,300)
Kbd(VK_RIGHT,CLICK,300)
Kbd(VK_RETURN,CLICK,300)
Sleep(GKIDOU_WAIT)
//CNT=CNT+1
//If CNT>=5 Then Break //起動の試行は5回まで
//Wend

//GOWの起動確認,課金広告のボタン色で評価
If Abs(PeekColor(KAKIN_X*ALFA,KAKIN_Y*ALFA)-KAKIN_COLOR)<=0 Then
//ウィンドウサイズ変更
Acw(ID,GOW_X,GOW_Y,GOW_W*ALFA,GOW_H*ALFA,100)
Sleep(1)
//課金広告を閉じる
Kbd(VK_ESC,CLICK,40)
Sleep(0.5)
//宝タブまで開く,アイテムタブと宝タブの色で評価
CNT=1
While !Abs(PeekColor(MYITEM_X*ALFA,MYITEM_Y*ALFA)-MYITEM_COLOR)<=0 AND_
!Abs(PeekColor(TAKARA_X*ALFA,TAKARA_Y*ALFA)-TAKARA_COLOR)<=1000
//アイテム画面を開く
Print GetTime()+" "+".アイテム画面を開く"+CNT
Btn(LEFT,CLICK,ITEM_X*ALFA,ITEM_Y*ALFA,100)
Sleep(0.5)
//マイアイテムタブを開く
Print GetTime()+" "+".マイアイテムタブを開く"+CNT
Btn(LEFT,CLICK,MYITEM_X*ALFA,MYITEM_Y*ALFA,100)
Sleep(0.5)
//宝タブを開く
Print GetTime()+" "+".宝タブを開く"+CNT
Btn(LEFT,CLICK,TAKARA_X*ALFA,TAKARA_Y*ALFA,100)
Sleep(0.5)
CNT=CNT+1
If CNT>=5 Then Break //起動の試行は5回まで
Wend

//宝箱開封前の最終確認
If CNT<5 Then
Print GetTime()+" "+"."+KAIFUU_WAIT+"秒待ちます..."
Sound("beep")
Sleep(KAIFUU_WAIT)
//宝箱開封の繰り返し
For S_CNT=1 TO MAX_SCNT
Print GetTime()+" "+".開封("+G_CNT + "_" +S_CNT+"/"+MAX_SCNT+")"
//開く
Btn(LEFT,CLICK,OPN1_X*ALFA,OPN1_Y*ALFA,100)
Btn(LEFT,CLICK,OPN1_X*ALFA,OPN1_Y*ALFA,100)
Btn(LEFT,CLICK,OPN2_X*ALFA,OPN2_Y*ALFA,100)
Btn(LEFT,CLICK,OPN2_X*ALFA,OPN2_Y*ALFA,100)
Btn(LEFT,CLICK,OPN3_X*ALFA,OPN3_Y*ALFA,100)
Btn(LEFT,CLICK,OPN3_X*ALFA,OPN3_Y*ALFA,300)
Sleep(OC_WAIT)
//閉じる
Btn(LEFT,CLICK,CLOSE_X*ALFA,CLOSE_Y*ALFA,100)
Btn(LEFT,CLICK,CLOSE_X*ALFA,CLOSE_Y*ALFA,100)
Btn(LEFT,CLICK,CLOSE_X*ALFA,CLOSE_Y*ALFA,100)
Btn(LEFT,CLICK,CLOSE_X*ALFA,CLOSE_Y*ALFA,100)
Btn(LEFT,CLICK,CLOSE_X*ALFA,CLOSE_Y*ALFA,100)
Btn(LEFT,CLICK,CLOSE_X*ALFA,CLOSE_Y*ALFA,100)
Sleep(CO_WAIT)
Next
EndIf
EndIf

//ANDY終了
Print GetTime()+" "+".ANDY終了"
CtrlWIN(ID,CLOSE2)
Sleep(AOWARI_WAIT)
EndIf
Print GetTime()+" "+G_CNT+"セット終了("+(GetTime()-ST)+"sec)"
Next
Print GetTime()+" "+"終了"