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

2022/08/05(金) 22:22:30.08

!extend:checked:vvvvv:1000:512
!extend:checked:vvvvv:1000:512

やっぱりワッチョイ無しだと荒れましたね！

Windowsの作業を自動化するツール
フリーソフト版とシェアウェア版の2種類がある
・UWSC Free版　Ver5.3.0.2
https://www.vector.co.jp/soft/winnt/util/se115105.html
・UWSC Pro　Ver5.3.0.2　（スレ建て時点で、現在シェアレジはできません。）
http://web.archive.org/web/20180125141222/http://www.uwsc.info/download.html
・UWSCR クローン版（開発途中）
https://github.com/stuncloud/UWSCR

●UWSC 掲示板（※作成依頼掲示版ではありません）
　質問の際には自力で作ったスクリプトを晒すか、具体的な解らない場所を提示すること
　上級者が常駐、たまに作者も現れるため過去ログには有益情報の宝庫
http://www3.rocketbbs.com/13/bbs.cgi?id=umiumi
http://www3.rocketbbs.com/601/siromasa.html

●UWSC - Wikipedia
http://ja.wikipedia.org/wiki/UWSC

※前スレ
自動化ツールUWSC使いよ集まれ25
http://egg.5ch.net/test/read.cgi/software/1653097810/

VIPQ2_EXTDAT: checked:vvvvv:1000:512:: EXT was configured

2022/08/22(月) 00:00:22.13

みなさんアドバイスありがとうございます。
参考にして色々試したところ、タップ操作の押してから離すまでが早すぎるため、アプリ側が認識できていないようでした。
長押しにしたところ正常に動作してくれるようになりました。初歩的なミスですみません...レスありがとうございました。

2022/08/30(火) 03:29:32.51

質問です。このコードが動くことは動くんですが、何故か遅いのでどこをどう変えれば
速くなるかご教示願いたいです。明らかに余計な文、短く書く方法などもあればアドバイスください。
それから、関数の中に関数を作ることは原則不可能だと思いますが、何か代わりの方法があれば教えて下さい。
実行環境はWindows11、
クッキーランというゲームでゲームマクロを組んでいます。エミュはBluestacksです。
初心者なので冗長ですが最後まで読んでいただけるとありがたいです。

●メインルーチン（呼び出し側）※長いので途中省略しています
//IMGARR[]はbmpファイルの名前
DIM IMGARR[] = "広告閉じる","お知らせ閉じる","リクエストクッキー受け取り確認","未反映のゲーム結果","ポストチェックスキップ"
BTNSWAIT(IMGARR,200,80,FALSE)//呼び出し
//BTNSWAIT(bmpファイル群,クリックにかかる総時間(mm),クリックするかダブルクリックするか判定のみか)

関数側はめっちゃ長いので小分けにします。
間違えて２ちゃんのほうに書き込んでしまったので再度書き込みしました。

2022/08/30(火) 03:30:55.40

●関数側
//複数画像認識
FUNCTION BTNSWAIT(IMGARR[],CLKTIME,SLEEPTIME,CLKTIME2)
DIM RECLOG
PRINT RECLOG = JOIN(IMGARR," OR ")//今何を認識しようとしてるか確認するため
DIM a[-1]　　　　　　　　　　　//bmpファイル群(名前)をCHKIMG("ファイルの名前.bmp")の形に整形
IMGNUM = RESIZE(IMGARR)
FOR i = 0 TO IMGNUM
　str = IMGARR[i]
　str2 = "CHKIMG(<#DBL>" + str + ".bmp<#DBL>)"
　an = i
　dt = str2
　RESIZE(a, LENGTH(a)-1+1)
　IF an<0 or an>LENGTH(a)-1
　　a[LENGTH(a)-1]=dt
　ELSE
　　FOR i2=LENGTH(a)-1 TO an step -1
　　　IF i2=an
　　　　a[i2]=dt
　　　ELSE
　　　　a[i2]=a[i2-1]
　　　ENDIF
　　NEXT
　ENDIF
NEXT
strarr = SLICE(a)
str = JOIN(strarr, " OR ")//CHKIMG("ファイルの名前.bmp") OR CHKIMG("ファイルの名前.bmp") OR ...

2022/08/30(火) 03:32:03.44

SETHOTKEY(VK_ESC, EMPTYPARAM, "forceQuit2")
DIM ID = GETID(GET_LOGPRINT_WIN)
LOGPRINT(TRUE,1489,668)

DIM j = 0//これはRESULTの前段階として使用※いらないかも？
DIM k = 0//永遠にループすることを避けるため失敗回数として使用※後述

REPEAT
IFB EVAL(str)
FOR i = 0 TO LENGTH(strarr) - 1
IFB EVAL(strarr[i])
ARR = SPLIT(strarr[i],"<#DBL>")
IMGNAME = ARR[1]
PRINT IMGNAME
REPEAT
IFB CLKTIME2 = "None"
BREAK
ELSE
BTN(LEFT,CLICK, G_IMG_X, G_IMG_Y,CLKTIME)
IFB CLKTIME2 = True
BTN(LEFT,CLICK, G_IMG_X, G_IMG_Y,CLKTIME)

2022/08/30(火) 03:32:35.98

ENDIF
ENDIF
SLEEP(1.5)
UNTIL EVAL(strarr[i]) = FALSE
BREAK
ENDIF
NEXT
BREAK
ELSE
k = k + 1
SLEEP(0.5)
ENDIF
UNTIL k > SLEEPTIME
IFB k > SLEEPTIME
IMGSNAME = JOIN(IMGARR,",")
PRINT "「" + IMGSNAME + "」ボタンの画像認識に失敗しました。"
j = IMGSNAME
ELSE
j = IMGNAME
ENDIF
RESULT = j
k = 0
FEND

PROCEDURE forceQuit2()
EXITEXIT
FEND

2022/08/30(火) 11:42:00.92

斜め読みだけどSLEEPを極端に短くしたら速く動くんじゃね？

2022/08/30(火) 18:37:14.54

斜め読みってｗ
まぁこれだけ長けりゃ流し読みしたくもなりますわな。
あまり極端に短くすると何回もクリックしちゃったりするので短くできないんですよねー
なるたけ試してみます。提案ありがとうございます。
他に誰かありませんか？

2022/08/30(火) 18:52:28.25

うちでは KBD(VK_LEFT, Click, 10)みたいなのが、PCによってひどく速度差があった
もし他に動かせるPCがあったら、ためしに動かしてみると、速度が違うかも

2022/08/30(火) 19:08:26.37

>>関数の中に関数を作ることは原則不可能だと思いますが
「作る」のさすところが不明ですが、定義のことだと解釈します
関数の中で関数を定義したことは無いので、不可能なのか（自分には）わかりません

関数の中から関数を呼び出す事は可能です
また、適当なたとえば my-library.uws に、複数の関数(Procedure - Fend, Function - Fend)を書いておいて
メインのuwsの先頭で
call "my-library.uwsのパス"
としておくと、メインのUWSの中から、my-library.uwsの関数を使う事が出来ます

2022/08/30(火) 19:23:53.76

肝心の動作は読み取れていませんが、眺めて気になったところとして

重たい関数と思われる LENGTH()の使い方が良くない

FOR i = 0 TO IMGNUM
　str = IMGARR[i]
　str2 = "CHKIMG(<#DBL>" + str + ".bmp<#DBL>)"
　an = i
　dt = str2
　RESIZE(a, LENGTH(a)-1+1)　　※
　IF an<0 or an>LENGTH(a)-1　　※
　　a[LENGTH(a)-1]=dt　　　　　※
　ELSE
　　FOR i2=LENGTH(a)-1 TO an step -1　※この4つのLENGTH(a)は同じ値を返すはずですよね

例えば次のようにしておいて、できればFORループの外にだすか、RESIZEの前に置きましょう
　a_length = LENGTH(a)

　RESIZE(a, a_length -1 +1)　　※
　IF an<0 or an>a_length -1　　※
　　a[a_length -1]=dt　　　　　※
　ELSE
　　FOR i2=a_length -1 TO an step -1　※

2022/08/31(水) 09:26:21.70

そんなもん誤差やぞ。
ミリ秒で応答返さないと行けない系なら気にするが。

2022/08/31(水) 15:17:00.63

やりたいことは複数画像認識なんですけど、
画像が出てくる順番は分かっても肝心の画像が出てくるか出てこないかが
分からないことってありますよね。
例えば、A→B→C→D→Eの順番で出てくることは絶対なんだけど、
AとBとCは条件を満たしたときのポップアップだから出てこないこともある、
すると最初に出てくるのはAかBかCかDのどれかが出てくる、みたいな。
そうなるとどうしても画面の方はBなのにAから律儀に順番に判定してしまうとかが出てきて
無駄な判定が増えて遅くなっちゃうんですよね...
しかもそのあとCが来るかどうかっていってるうちに
プログラムがどんどんIFBの入れ子になっていく。
考えただけで嫌になりますよ...
これはあくまで例え話ですけどね。貼ったソースの説明じゃありませんが、悪しからず。

2022/08/31(水) 15:19:49.91

>>38
別のPCがないのでできません。

2022/08/31(水) 15:22:40.59

大切なのは確実に動作することであって速度は二の次ですよ

2022/08/31(水) 15:25:00.65

>>39
> 関数の中から関数を呼び出す事は可能です
> また、適当なたとえば my-library.uws に、複数の関数(Procedure - Fend, Function - Fend)を書いておいて
> メインのuwsの先頭で
> call "my-library.uwsのパス"
> としておくと、メインのUWSの中から、my-library.uwsの関数を使う事が出来ます

多分言われてることとは違いますが、解決しました！プログラム貼ります。
●main.uws
CALL C:\Users\User\Downloads\uwsc5302\クキラン\テスト.uws
func1()

●Functions.uws
PROCEDURE func1()
a = "Hello World!"
func2(a)
FEND

PROCEDURE func2(b)
PRINT b
SLEEP(30)
FEND

2022/08/31(水) 15:32:27.70

>>45
関数の中に関数を作るっていうのは間違ってました。何なら作ってるんじゃなくて呼び出してるし。
さっき貼ったプログラムは例です。
func1()の中でfunc2()を呼び出してるので成功です。

2022/08/31(水) 15:36:02.07

>>41
>>44
それもそうですよね。
せっかくここまで作ったんだから、速くしたいなって欲が出ちゃうんですよｗｗ

2022/08/31(水) 16:12:41.74

>>42
chkimgx

2022/08/31(水) 16:18:20.94

>>42
ひとつの画像を認識するのにそんなに時間がかかるかな？
ガチガチに最適化をするとスクリプトの視認性や保守性が低下するし労力に見合わないこともある

2022/08/31(水) 16:28:21.41

君の場合はBTNやめてadbコマンドにするといい
どうせマウスが動いてPC使えなくなるから早くしたいとか言ってるんだろ？

2022/08/31(水) 16:31:52.65

>>40
一応書き換えました。やっぱり気休めですね。でもありがとうございます。
THREADとかしたらややこしいことになるかなぁ

2022/08/31(水) 16:33:49.22

>>50
PC使えなくなるのは覚悟の上です。adb設定するのめんどくさいし。

2022/09/02(金) 02:57:38.30

https://drive.google.com/file/d/1dIozE4Sa9tr-ntkdpdtnsH-HklzDMPOI/view?usp=sharing
このフローチャートのような処理をプログラムを使って簡単に書くにはどうすればよいですか。
どんな処理をするかは自分で決めるのでIFの分岐を自動で書いてくれて、
並列処理も可能なようにできませんかね。
かなり漠然とした質問ですが答えてくれると嬉しいです。

2022/09/02(金) 03:06:04.77

見づらいと思うので改良版
https://drive.google.com/file/d/1ZCmcskqtXcYnrZJ8dANzTZEcAJiZBOcl/view?usp=sharing

2022/09/02(金) 04:14:13.31

>>54　= >>52
めんどくさい

2022/09/02(金) 07:35:39.16

並列処理ってマルチスレッドを使うのか

2022/09/02(金) 09:33:45.32

これ以上触れないほうがいいな

2022/09/02(金) 18:37:55.34

どういう意味かわからんが　○ー○　はご法度だと思う

2022/09/02(金) 18:50:49.12

まぁいっか！

2022/09/02(金) 22:52:19.03

UWSCって64個迄スレッドが作れて
簡単に分散処理出来るマルチスレッド機能があるのが地味に凄い

2022/09/06(火) 09:20:23.37

GetTime()したときのG_TIME_*って関数の中だけで有効なんやね
ちょっとハマってしまった
考えてみりゃ、そうじゃなきゃスレッドで実行したときエライことになるわな・・・

2022/09/06(火) 13:19:13.42

CHKIMGXのG_IMGX_*がPublicなの忘れて、
画像認識をスレッドで早く済ませてやろうとしてハマったことならある

2022/09/09(金) 23:21:22.64

>>54
同じ処理は関数作って呼ぶのは基本として、あとは並列処理で何とかなるだろ
面倒くさいから頼まれてもタダではやらんが

2022/09/11(日) 19:34:24.73

自動化ツール（UWSCではない）でウィンドウの指定の仕方についてですが、

コードで
CC 10,10,Chrome_WidgetWin_1■,Chrome_RenderWidgetHostHWND●

こういう記述をしているのですが、chromeを頻繁に複数立ち上げたり終了したりするせいか、■や●の部分に
*2とか*3とか、いつのまにか増えていてコードが実行できなくなることがあります。

この現象は避けられないのでしょうか？
該当スレ見つけられず、初歩的な質問でスレ違いだと思うのですが教えていただけないでしょうか

2022/09/11(日) 20:28:11.75

その自動化ツールの名前は何？

2022/09/12(月) 02:48:25.61

なんでここで聞くんだろ？

2022/09/13(火) 19:50:21.96

>>64
何を使ってるかも分からんのに答えようがないし、ここはUWSCスレだし

2022/09/13(火) 20:01:29.91

誤爆じゃないんですか

2022/09/23(金) 20:52:26.39

webdriverのIEモード対応が待ち望まれる

2022/10/04(火) 19:28:46.90

noxが管理者モード実行になってchkimgxがエラー吐くようになった
uwscを管理者モードで起動したくないんで、batファイル作ってショートカットに管理者権限与えて対処

2022/10/04(火) 20:41:15.80

作者が生きていればpythonなんかより便利なソフトつくっていたんだろうな

2022/10/05(水) 00:05:11.27

今更chkimgx導入した
重さが想像以上だった
ウインドウID機能しない
相対座標で運用してたから絶対座標で面倒くさい
極稀にエラー吐くけどよくわからんｗ

ただ画像が認識できず止まるようなことはなくなったな

2022/10/05(水) 20:52:02.54

重さは工夫で何とかなる
絶対座標が面倒なら相対座標で指定出来るように改良すれば良い

2022/10/06(木) 10:35:04.12

できるだけ色判定がいいよ

2022/10/06(木) 16:30:34.51

>>74
そんな簡単に言われてもよぉ・・・
それができないからxの方使ってるんやろ

2022/10/07(金) 12:00:09.61

ええ…

2022/10/07(金) 17:09:36.78

暇があったらchkimgxを関数でくるんで指定相対座標付近を起点に画像サイズを取得して範囲指定するようにしたい

2022/10/08(土) 17:01:44.43

x1, y1, x2, y2のサーチ範囲指定が面倒なんで、サーチ起点x1, y1と横,縦の幅を指定して使えるようにはしてる
起点100,100で横幅100,縦幅100とかで指定できると使いやすい

2022/10/10(月) 04:36:11.98

>>77
chkimgxにimagesizeって関数が用意してあるから1分もあれば出来るぞ

2022/10/10(月) 09:12:53.93

仮想上でWindows11作って
UWSCでIE起動したら立ち上がった

EdgeのIEモードがあるかぎり使えるな

2022/10/10(月) 09:14:03.47

厳密にはIEは封じられてるから

createOLEobj("InternetExplorer.Application")

2022/10/10(月) 14:10:01.04

window10にはProgram files以下にiexpoere.exeが残ってて直起動してるんだが、11だと消えた？

2022/10/10(月) 15:15:48.66

>>82
あるけどダブルクリックするとEdgeが起動する
EdgeのIEモードのためにおいてあるのかも

2022/10/12(水) 01:09:53.99

edgeって毎月更新するからそのたびに画像を一から収集し直さないといけないんだけど、更新頻度の低いブラウザってないものかね

2022/10/12(水) 02:24:12.51

狐のESR
しかしブラウザの更新で画像が変わるとは思えないのだが

2022/10/12(水) 10:58:20.45

>>84
表示される画像が認識できないほど変わるような事は無いだろ
3年前に集めた画像が今でも使えるから、ブラウザのせいとも言えないと思うが

2022/10/12(水) 13:35:07.88

古いOSでも使える仕様が枯れてるようなブラウザはSeaMonkeyがあるけど

SeaMonkey
https://www.vector.co.jp/soft/winnt/net/se517207.html

2022/10/12(水) 13:41:46.76

>>86
現実に毎月起こってるんだからしょうがない
スコアチェックするとそれまで0.1未満だったのが更新のタイミングで4を超えてしまう
かといってchkimgxをこれ以上ガバガバにすると今度は誤認識を始めてしまうし

2022/10/12(水) 13:53:53.18

>>88
そうじゃなくて、現実に起こってるけど原因は別のところにあるって可能性もあるでしょ
上の人も言ってるように俺もだけどブラウザの更新で近似のスコア変わったりしないよ

2022/10/13(木) 05:16:36.76

判定してる場所がマズいってのはありそう

2022/10/13(木) 14:07:54.05

そのページを見れば原因が分かるかもしれん
ブラインドで対策を立てられる訳がない

2022/10/14(金) 00:27:46.65

まぁ、User-Agent文字列を使って画像を微妙に変化させてるとかじゃね？ヲーターマークで画像に入れ込んでるとか

2022/10/15(土) 19:38:24.26

>>32
多分、配列に入った画像名をわざわざ配列から出して、
"CHKIMG"という文字列とその画像名を組み合わせて"OR"で繋ぎ、長い文字列を作り、
をれをEVALでプログラムとして評価させると言う処理をしていますよね？
EVALは重い（遅い）関数ですよ。それをREPEATで繰り返したら、当然遅くなるでしょうね。

2022/10/27(木) 03:04:34.67

Chromeの画面をSAVEIMGで保存すると真っ黒になってしまう、、
因みにスクリーン全体だとChromeの画面もしっかり保存できますが、
Chromeはいつも同じ位置じゃないのでこれではダメです、、
idにChromeを指定して画像保存する方法を教えて

2022/10/27(木) 07:14:56.82

>>94
IMG_BACK付けてない？Firefoxもだけど白とか黒になる
はずせばいけるかと

2022/10/27(木) 09:37:12.72

それか、表示位置がかわってもStatus()で取得できるだろうし
Chromeの部分だけ切り抜けばいいのでは？

2022/10/27(木) 10:14:53.09

>>95
デフォルトが「指定アプリがフォアグランドかバックグランドかにより画面の取得方法を変更」だったので、
敢えて、IMG_FOREを指定すると行けました。
あざす

2022/11/07(月) 11:45:09.74

スタックトレースの取得に失敗するchkimgxのエラーの原因は何が関係してますか？
chkimgxのエラーが出ることは稀ですが、なぜ出るかが分かりません

2022/11/07(月) 12:07:42.63

パラメータミスじゃね

2022/11/12(土) 18:17:51.70

ヘブバンというSteamのゲームで今までマウスを左右に振りながらクリックする動きを録画して無限ループに変えて使っていたのですがある日ゲームのアップデートと共に使用できなくなりました。
マウスは同じように動いているのですがゲームは反応しないという状況です。元通り使うためにはどうしたらよいでしょうか?

2022/11/12(土) 19:50:07.86

>>100
もう一度録画しなおす
それでだめならゲーム側が不正に対応したってことなので諦める

2022/11/12(土) 22:42:44.65

>>101
録画し直しても駄目でした
ありがとうございます(⁠´⁠；⁠ω⁠；⁠｀⁠)

2022/11/13(日) 05:17:38.57

同じ動きを無視するような仕組みか

2022/11/13(日) 06:49:03.39

座標や振り幅やタイミングが常に一定だとバレるんじゃね

2022/11/13(日) 10:20:39.00

どんなゲームかしらねーけどrandom関数を使ってみれば？
頭をフル回転させてゲームそっちのけで一日中作業してみてごらん

2022/11/13(日) 23:58:50.24

BTN(LEFT,CLICK,x,y)としてるなら、

BTN(LEFT,DOWN,x,y,1000)
BTN(LEFT,UP,x,y,1000)

とすると、うまくいく事もある

2022/11/14(月) 03:55:02.62

録画って事は手で動かしてるのかな？
無限ループが途中で止まるようになってしまったのか
最初から全く反応しなくなったのかで変わるけど
後者ならuwscやアプリを管理者権限で起動して試してみて

2022/11/14(月) 14:06:10.45

録画してというのは、UWSCの記録機能の事か？

2022/11/14(月) 15:46:04.96

EXE化したケータイ待受Flashを30秒おきに再描画させ、
TVClockと共にデジタルサイネージとして表示しているのですが
EscキーでUWSCを含めた全てをTaskKillさせるにはどのように記述すべきでしょうか？

今は↓このようになってます

//「TVClock」起動
EXEC("C:\#Apps\Signage\!TVClock\TVClock.exe")
// 「LISMO3」起動
EXEC("C:\#Apps\Signage\!FlashPlayerProjector\LISMO3.exe")

// 「LISMO3」フルスクリーン化
SCKEY(GETID("Adobe Flash Player 11","ShockwaveFlash"), VK_CTRL,DOWN, VK_F)

//30秒毎「LISMO3再読み込み(Ctlr+Enter)繰り返し
WHILE TRUE
SLEEP(30)
SCKEY(GETID("Adobe Flash Player 11","ShockwaveFlash"), VK_CTRL,DOWN, VK_RETURN)
WEND

2022/11/14(月) 16:21:58.20

sethotkeyでESCキー引っ掛ける
procedure中で2つのWindowIDに対してctrlwin(id, CLOSE)発行してからexitでスクリプトも終了

最大化もctrlwin(id, MAX)でいけるんじゃ？

2022/11/15(火) 16:01:57.85

>>110
ありがとう
できた

2022/11/15(火) 22:27:36.24

>>106
というかゲームはアンチチート関係なくCLICKが通りにくいから
自分でクリック関数作るのがいい

2022/11/25(金) 22:21:40.94

なんかキーボードが勝手にFキーをサマータイムレンダするようになっちゃって
SharpKeys 3.5 で無効化して
AutoHotKey でShiFt+ｊをＦに置換するようにした。

AutoHotKey で無効化できるって書いてあったからやってみたけどたまに発病するから無理だった。
たまに発病する原因は自動スリープかと思って無効化してみたけど関係なかったっぽい。
・・・書く場所間違ったとかかな。

2022/11/25(金) 22:30:06.49

勝手にキーレンダされるからｊａｎｅのポップアップとかが一瞬で消えたり、リストから勝手にＦが選択されたりしてたけど治った。
ただ、今度はａとｅが入りにくくなった。
ソニータイマーを中国が真似をしたのかな？

2022/11/26(土) 02:43:41.02

ここはみんなの日記帳です

2022/11/30(水) 10:35:32.28

質問です

現在 ie で使っていたスクリプトを edge に移行しようと検討中です
UwscWebDriver.uwsを試させてもらっていますが遅いしエラー出るし困惑してます
msedgedriver.exe は同一フォルダに置いてあります

STOPFORM(FALSE)
call UwscWebDriver
driver = WebDriver.ChromiumEdge()
url="http://www.google.com/";
driver.Navigate( url )

こんな感じで実行するとコンソールが立ち上がり数秒で edge-google が起動するも
その際コンソールに以下のエラーが出ます

DevTools listening on ws://127.0.0.1:54403/devtools/browser/0684f6e6-65cc-4b7f-9e51-5139567940d6
[16744:7832:1130/102123.343:ERROR:edge_auth_errors.cc(450)] EDGE_IDENTITY: Get Default OS Account failed: Error: Primary Error: kImplicitSignInFailure, Secondary Error: kAccountProviderFetchError, Platform error: 0, Error string:

[16744:7832:1130/102128.031:ERROR:device_event_log_impl.cc(215)] [10:21:28.031] USB: usb_device_handle_win.cc:1048 Failed to read descriptor from node connection: システムに接続されたデバイスが機能していません。 (0x1F)
[16744:7832:1130/102128.032:ERROR:device_event_log_impl.cc(215)] [10:21:28.032] USB: usb_device_handle_win.cc:1048 Failed to read descriptor from node connection: システムに接続されたデバイスが機能していません。 (0x1F)

このコンソール画面を放っておくと次の edge 操作スクリプトがハングしてしまいます
どうしたもんでしょうか…

2022/12/02(金) 20:11:51.07

>>116
https://www.google.co.jp/search?q=%22kImplicitSignInFailure%22

2022/12/21(水) 13:29:42.63

質問なんですが
GETDIRで二つの拡張子を選択したい場合どうすれば良いですか？
例えばjpgとpngを指定したい時指定ファイルのところに*.jpg とかいたらjpgしか指定できなくて困ってます
IFとか使えばできなくはないけど一発で書く方法が知りたいです

2022/12/21(水) 13:47:20.47

*.**ｇ

2022/12/21(水) 13:58:13.07

mpgやregとかも当然引っ掛かるわけだから、ちゃんと処理するためには非該当ファイルを除外するコードが必要という落ち

2022/12/21(水) 19:06:45.95

正規表現なら簡単なのにね

2022/12/21(水) 19:12:16.27

if+posの一行追加するだけだけどね
それを嫌がる理由が分からないんで

2022/12/22(木) 01:23:27.85

何かよりスマートな方法があるんじゃないかと思って聞いてるだけでしょ

2022/12/22(木) 01:28:55.83

数ある文字列のうちjpgとpngを指定したいのに
jpgとpngを指定する以外のスマートな方法なんてねーよとしか言いようがない

2022/12/22(木) 01:43:17.60

nox上をadbのコマンドで数秒ごとにスクロールさせていって画面に表示されるオブジェクトを画像認識させたいけどイマイチ精度が上がらない
認識用サンプル画像増やすと重くなるし精度が上がったのかどうかも微妙
いい方法はないもんか

2022/12/22(木) 07:06:29.36

chkimgx使ってるならスコアを確認して閾値調整

2022/12/22(木) 15:33:25.49

>>123
ファイル名の一括リネーム
jpgとpngだけ選んで
末尾に「img」とかを追加すればいい

もしくはpngをファイルそのものをjpgに変換
これも画像ソフトで一括でできる

2022/12/22(木) 15:49:34.74

>>127
リネームするくらいならjpgPngしか存在しない専用フォルダ作る方がマシかな

2022/12/23(金) 00:21:07.91

s = ""
for filename in GetDirRegExp("C:\Users\user1\Pictures", "\.(jpe?g|png|gif|bmp|webp|avif)$")
　 s = s + filename + "<#CR>"
next
MsgBox(s)

function GetDirRegExp(dir, pattern, dir_mode=FALSE, hidden=EMPTY, order=EMPTY)
　 if dir_mode then GetDir(dir, "\") else GetDir(dir, "*")
　 dim array = SafeArray(0, Length(GETDIR_FILES)-1)
　 re = CreateOleObj("VBScript.RegExp")
　 re.IgnoreCase = TRUE
　 re.Pattern = pattern
　 n = 0
　 for name in GETDIR_FILES
　　 if ! re.Test(name) then continue
　　 array[n] = name
　　 n = n + 1
　 next
　 Resize(array, n-1)
　 RESULT = array
fend

2022/12/23(金) 00:32:26.42

ちょっと間違えてる。訂正

function GetDirRegExp(dir, pattern, dir_mode=FALSE, hidden=FALSE, order=0)
　 if dir_mode then GetDir(dir, "\", hidden, order) else GetDir(dir, "*", hidden, order)