自動化ツールUWSC使いよ集まれ16

自動化ツールUWSC使いよ集まれ16 at SOFTWARE

571:名無しさん＠お腹いっぱい。
16/02/10 22:55:35.86 UdxSvPdk0.net
>>533
とりあえずこんな感じ？　細かい部分は適当なので後は自分でいじって
dim tmpstr
dim def_StateParam[8]
dim VWS = 1
def_StateParam[1] = "CASE1,400,200,0,30,1.5,画像9.bmp,1,1,0"
def_StateParam[2] = "CASE2,400,200,0,30,1.5,画像2.bmp,2,1,0"
def_StateParam[3] = "CASE3,400,200,0,30,1.5,画像3.bmp,3,1,0"
def_StateParam[4] = "CASE4,400,200,0,30,1.5,画像4.bmp,4,1,0.1"
def_StateParam[5] = "CASE5,400,200,0,30,1.5,画像4.bmp,5,1,0"
def_StateParam[6] = "CASE6,400,200,0,30,1.5,画像4.bmp,6,1,0"
def_StateParam[7] = "CASE7,400,200,0,30,1.5,画像4.bmp,7,1,0"
def_StateParam[8] = "CASE8,400,200,0,30,1.5,画像5.bmp,8,1,0"
while true
　　tmpstr = split(def_StateParam[VWS],",")
　　fukidasi(tmpstr[0],val(tmpstr[1]),val(tmpstr[2]),val(tmpstr[3]),val(tmpstr[4]),,,)
　　SLEEP(val(tmpstr[5]))
　　fukidasi()
　　//ここに稀に出現する画像をチェックする処理を書く
　　IF VWS = 4 THEN
　　　　WHILE (CHKIMG(tmpstr[6])=FALSE)
　　　　SLEEP(val(tmpstr[9]))
　　WEND
　　ENDIF
　　IFb Chkimg(tmpstr[6]) Then
　　　　MMV(G_IMG_X, G_IMG_Y)
　　　　BTN(LEFT,CLICK)
　　　　VSW = val(tmpstr[7])
　　ELSE
　　　　VSW = val(tmpstr[8])
　　ENDIF
wend

次ページ

続きを表示

1を表示