UWSC初心者用スレ2

**デフォルトの名無しさん** · 2021/11/18(木) 19:12:15.32

UWSC初心者用スレです

わかってる人はこっち
自動化ツールUWSC使いよ集まれ24
http://egg.2ch.net/test/read.cgi/software/1625624264/

アドバイスされる方には
相談者が理解できていない部分を責めたりしないよう
お願いいたします

前スレ
UWSC初心者用スレ
http://mevius.2ch.net/test/read.cgi/tech/1537758829/

**デフォルトの名無しさん** · 2021/12/10(金) 22:55:50.53

>>32、33、34
ありがとうございます！
まずご参考の通り開いてみてやってみます！

**デフォルトの名無しさん** · 2021/12/12(日) 11:50:31.75

質問なんですが、PCを買い替えた場合、モニターのサイズと解像度が同じなら画像をそのまま新しいPCでも流用することは可能ですか？
それとも画像を再取得する必要があるのでしょうか？

**デフォルトの名無しさん** · 2021/12/12(日) 12:21:31.25

流用できることもある

**デフォルトの名無しさん** · 2021/12/12(日) 13:54:09.62

拡大縮小してなければモニタの解像度が違っても行けるだろ

**デフォルトの名無しさん** · 2021/12/12(日) 16:48:28.91

>>36
ブラウザの操作ならブラウザの縦横幅を同じにすれば使える
解像度は影響しないように汎用的に作れば良い

**デフォルトの名無しさん** · 2021/12/12(日) 22:37:17.97

色が
グラボやＯＳやソフトで、グラデやスムジを切るか、旧と同じに

**デフォルトの名無しさん** · 2021/12/12(日) 22:38:38.53

半透明
バッグラ描画さぼり

**デフォルトの名無しさん** · 2021/12/14(火) 03:11:27.78

何故にカタコト

**デフォルトの名無しさん** · 2021/12/14(火) 03:20:27.17

相手に
合わせた

**デフォルトの名無しさん** · 2021/12/14(火) 08:25:28.27

別にその質問レスは片言でも何でもないだろ

**デフォルトの名無しさん** · 2021/12/24(金) 10:11:28.47

これの代わりになるツールないの？

**デフォルトの名無しさん** · 2021/12/30(木) 21:03:24.29

動く画像を認識させる方法ってないのかな？
いくら調べても静止画像の認識方法しか出てこないんだけど

**デフォルトの名無しさん** · 2021/12/30(木) 21:10:29.75

動いてる画像を録画ツールで記録して、静止画に分解して、分解した画像をchkimgxで認識させてる

**デフォルトの名無しさん** · 2021/12/30(木) 21:57:23.32

なるほど、フレームの画像を取得するのか

**デフォルトの名無しさん** · 2022/01/13(木) 01:01:01.47

windows11へアップグレードしたけど画像が撮り直しになってしまった
仮想OSのほうもイメージ自体は変わってないはずだけどそっちも画像が取り直しになって
めんどくさいから10に戻した

**デフォルトの名無しさん** · 2022/01/14(金) 09:03:29.23

初心者です。同じ名前の複数ウインドウを指定位置にそれぞれ移動させたいのですがうまくいきません
GETALLWINではやりたい動きにはならなかったので他の方法でわかる人いませんか？

**デフォルトの名無しさん** · 2022/01/14(金) 10:31:06.33

見つかったウィンドウを順番に指定位置に移動するのではダメということですか
自動化しない場合は同じ名前のウィンドウをどうやって区別しますか

**デフォルトの名無しさん** · 2022/01/14(金) 10:52:30.69

>>51
1番目に見つけたのを左上、2番目を右上、3番目を左下みたいな感じにしたいです
ACWでの区別の方法がわからない状態です

**デフォルトの名無しさん** · 2022/01/14(金) 11:17:36.33

見つけた順を元にするのならわざわざ区別する必要は無いだろ
見つけたものから順に処理させれば良いだけのことだ

**デフォルトの名無しさん** · 2022/01/14(金) 11:24:57.20

>>53
使い方がわかってないのでは
>>52
getallwinで取れるidの配列をforループか個別にacwに指定したらダメですか
FOR n = 0 TO GETALLWIN() - 1
DIM ID = ALL_WIN_ID[n]
acw(id,位置指定とか)
省略

**デフォルトの名無しさん** · 2022/01/14(金) 11:42:09.49

ネットのテンプレ文を少し変えて使ってるレベルの理解度なので応用とかは全然わかってないです
>>54
試してみます
ありがとうございます

**デフォルトの名無しさん** · 2022/01/14(金) 12:48:18.52

>>55
>>54 に書かれているものと組み合わせて
STATUS()でとったタイトルを
IF で判断して必要な場合だけ
ACW()するようにする

特殊な表示をしていればSTATUS()で思うような内容が
返ってこないことはありえるけど滅多にないだろう

テスト中STATUS() で返ってくる内容をチェックするには
ウィンドウ数が少なければMSGBOX()
多ければSLEEP()で適当に時間をとりながらPRINTを使う
選択的に表示しないで
にPRINT一回一回にSLEEPを使わず
GETALLWIN()の内容を全部表示したあと
SLEEP()を長くとってまとめてチェックすれば
IFでの処理間違いで表示が出ない場合などの確認ができる

テスト中はSTOPFORM()を表示して
止めたいときに止められるようにしておくといい

**デフォルトの名無しさん** · 2022/01/14(金) 13:22:03.98

>>56
詳しくありがとうございます
やってみます

**デフォルトの名無しさん** · 2022/01/14(金) 20:21:44.68

実行中
UWSC自体の位置を変えて終わるときに位置を元に戻す
といったことをやりたいのですが
UWSC自体のウィンドウの制御ってどうやるんでしょう？

**デフォルトの名無しさん** · 2022/01/14(金) 21:46:02.04

>>58
UWSC自体というのが
https://img02.hamazo.tv/usr/k/t/p/ktpcschool/uwsc.png
( https://ktpcschool.hamazo.tv/e7906854.html )
(↑このURLは画像を借りた場所という以上の意味はないです)
これのことだとしたら
GETID("UWSC", "TUMain_uwsc")
で取得したIDで動かすことができる

**デフォルトの名無しさん** · 2022/01/14(金) 22:07:31.95

ただ、もしかしたら勘違いしてるんじゃないかという気がするのは
実行時にそのウィンドウは別に必要ないということ
コマンドプロンプトその他から
c:\dokoka\UWSC.exe c:\script\nanika.uws param1 param2 param3 ...
の形で実行されさえすればいい

**デフォルトの名無しさん** · 2022/01/14(金) 22:34:09.28

拡張子uwsと関連付けができていればエクスプローラー上で
uwsをダブルクリックすれば動作するようになる

HKEY_CLASSES_ROOT\Applications\UWSC.exe\shell\open\command
や
HKEY_CLASSES_ROOT\uws_auto_file\shell\open\command
の
既定値を
"c:\dokoka\UWSC.exe" "%1" %*
のように「%*」
をつければパラメータも扱えるようになるので
uwsのショートカットにパラメータを記述して動かせるようになる
コマンドプロンプトでもいちいちUWSC.exeを書かなくても
c:\uwsscript\nanika.uws param1 param2 param3 ...
で動かせるようになる
環境変数PATHにc:\uwsscript を追加すれば
パスを指定する必要もなくなり
nanika.uws param1 param2 param3 ...
で動作させられるようになる

**デフォルトの名無しさん** · 2022/01/15(土) 16:59:47.34

「一定時間マウス操作が無かった時に発動する命令」についての質問です

命令①を繰り返し続ける
↓
1分間クリックが行われなかった場合は
命令②を行う
↓
命令①の繰り返しに戻る

という命令文を「adbの裏マクロ」で組みたいです。
通常のマクロで上記を行う場合は「マウスカーソルの座標が移動したかどうか」
を発動条件にすればできると聞きましたが、
マウスの動かない裏マクロで上記をみたす命令文は構築できるのでしょうか
できる場合は例文やヒントを教えていただきたいです
1分間クリックが行われない状況が多岐にわたるため
「特定の画面になったら命令②を行う」はできそうにありませんでした

**デフォルトの名無しさん** · 2022/01/15(土) 17:17:26.50

マウスカーソルの座標を取得し、一分後のマウスカーソルの座標と比較

**デフォルトの名無しさん** · 2022/01/15(土) 17:38:40.10

>>63
マウスが動かないためそれが出来ず困っています
「クリックが行われたかどうか」の有無を判定する命令文があればいいのですが…

**デフォルトの名無しさん** · 2022/01/15(土) 18:11:34.39

下の想定はあってる？
ゲームを裏で自動で動かす一方で表ではPCをいろいろ使ってる
ゲーム内で1分クリックがなかった場合は命令2をする

クリックはどうやって行われるの？
命令1の中にクリックが含まれる？
気が向いた時に自分でゲーム操作してクリックする？

**デフォルトの名無しさん** · 2022/01/15(土) 19:18:49.62

THREAD checkCur() //以下の命令文を「checkCur()」で監視する

WHILE TRUE //①を繰り返す
(操作①)
WEND

PROCEDURE checkCur() //「checkCur()」の効果を下記のうように定める
t = GETTIME()
WHILE TRUE
x = G_MOUSE_X
y = G_MOUSE_Y
SLEEP(1)
IF G_MOUSE_X <> x OR G_MOUSE_Y <> y THEN t = GETTIME()
FUKIDASI(GETTIME() - t)
IF GETTIME() - t >= 60 THEN BREAK
WEND

(任意の操作②) //60秒何もなかったら②を実行
FEND

**デフォルトの名無しさん** · 2022/01/15(土) 19:38:25.22

>>65
想定としては
PCを全く触らない想定です

クリックのが実行は
特定の画像を見つけたら、定位置3か所程度をクリックするというものです
これを①の繰り返し部分につかっています。

他人の書いた命令文の見様見真似で
>>66を走らせてみたのですが
①を60秒間繰り返したのち、すぐに②が発動しちゃっていて
裏マクロのクリックはマウスの動作として認識されていないようでした

**デフォルトの名無しさん** · 2022/01/15(土) 19:46:52.14

それ画像が見つからない状態が一定時間経過したら命令2に移行するでいいんじゃないの
adbによるタップはマウスカーソル座標とか全く関係無いよ

**デフォルトの名無しさん** · 2022/01/15(土) 20:14:55.94

>>68
その方式にしたら私の知識でもうまく作れそうですね…
ただ、他のマクロにも利用できる汎用性のあるものを作りたいと考えていて
「一定時間クリックが行われなければ」をトリガーにした命令文を作りたい
と考えています

**デフォルトの名無しさん** · 2022/01/15(土) 20:43:12.28

改めて調べてみたのだけどクリック判定は難しそうです
ひとまず、画像なしを一定時間(複数回)検知したら～という方式で作ってみます
ありがとうございます

**デフォルトの名無しさん** · 2022/01/15(土) 23:18:43.08

>>66
checkCur()
は一度②を実行すると終了して
それを実行していたスレッドも終了してしまう
ループを２重にして②を実行したあとはまた最初っから
の処理を繰り返す必要があるのでは

**デフォルトの名無しさん** · 2022/01/16(日) 00:15:41.45

タップしたかどうかで判定したいならadbによるタップを関数化して
関数内でグローバル変数に最後にタップした時間をGETTIMEで入れればいい

**デフォルトの名無しさん** · 2022/01/16(日) 00:32:01.33

こんなん？
public isclicked=0
（省略）
procedure adbclick(引数省略)
isclicked=1
doscmd(引数省略)
fend

**デフォルトの名無しさん** · 2022/01/16(日) 01:24:00.18

>>71
たしかにその通りでした
>66だと②発動条件の監視は1度だけになっていました
見てわかるのがすごい。私は走らさせないとわからなかった

**デフォルトの名無しさん** · 2022/01/16(日) 01:36:07.69

>>72
>>73
言っていることは朧げに分かりますが
それを命令文化する知識が足りません。でもありがとうございます！
>>73を参考に方法を調べてみます

**デフォルトの名無しさん** · 2022/01/17(月) 13:17:30.06

これってマックで使えないの？

**デフォルトの名無しさん** · 2022/01/17(月) 13:47:39.86

>>76
Windowsが動くマックなら使えるでしょ
試してないけど

**デフォルトの名無しさん** · 2022/01/20(木) 11:03:19.87

質問します。
無料バージョンとProバージョで、単にExcel起動させるスクリプトなんですが、無料はちゃんと動くがProは工ラーが出てしまう。
Verはどちらも 5.3.0.2です。
ただ、ー部のスクリプトはProでも動きます。

使い始めて間がないので、よくわかってないところが大部分です。
よろしくお願いします。

**デフォルトの名無しさん** · 2022/01/20(木) 11:15:19.75

動くスクリプトと動かないスクリプトをそのまま貼り付けて書き込みしましょう

**デフォルトの名無しさん** · 2022/01/20(木) 14:49:50.52

ついでにどう動かないのか
エラーメッセージが何なのかも書いた方がいい

**デフォルトの名無しさん** · 2022/01/20(木) 17:35:23.20

78です。
家に帰ったら、スクリプトとエラーの表示内容をアップします。

**デフォルトの名無しさん** · 2022/01/20(木) 21:42:35.09

>>78です

EXCEL = CREATEOLEOBJ("Excel.Application")
EXCEL.visible = True
EXCEL.Workbooks.add()

**デフォルトの名無しさん** · 2022/01/20(木) 21:44:19.00

https://i.imgur.com/BGugBib.jpg

**デフォルトの名無しさん** · 2022/01/20(木) 22:41:07.67

セキュリティソフトを起動させておくと>>83のエラーが出たけど、OFFにしておくと問題ない

EXCEL = CREATEOLEOBJ("Excel.Application")
EXCEL.Workbooks.add()
EXCEL.visible = True

**デフォルトの名無しさん** · 2022/01/21(金) 07:31:53.10

>>84
検証、ありがとうごさいました。

**デフォルトの名無しさん** · 2022/01/23(日) 23:17:34.39

昨日まで問題なく使えてたChklmgXが急に画像認識しなくなったんだけど何か原因ありますか？

**デフォルトの名無しさん** · 2022/01/23(日) 23:18:11.34

>>86の環境が変わった

**デフォルトの名無しさん** · 2022/01/24(月) 17:17:53.61

原因が有りすぎて特定できん
一つずつ原因を探って行くしか無い

**デフォルトの名無しさん** · 2022/01/24(月) 18:47:54.12

たびたび認識しなくなるようなら
認識用の画像を取り込むマクロ組んだほうが早い

**デフォルトの名無しさん** · 2022/01/25(火) 08:40:44.22

>>86ですが、どんな感じでおかしくなったかというと、
例えば「OK」というボタンがあって、色々な「OK」ボタンがあるのですが、その違いはほとんどありません。
（OとKの隙間が何ミリ違うとかのレベル）
先日までは色々な「OK」ボタンを全て認識してくれていたのですが、急に認識しなくなりました。
どれぐらい認識しないかというと通常のChklmgぐらい認識してくれません。

**デフォルトの名無しさん** · 2022/01/25(火) 09:35:40.35

>>90
chkimgXは全く同じ形でも大きさが変わると認識できない
なぜ今まで認識できていたかはわからないけどそれが本来の挙動

**デフォルトの名無しさん** · 2022/01/25(火) 11:03:12.63

Windows10だとスケーリング変えるだけで動かなくなるからそこがが一番怪しいと思うけど
次の日いきなりということ他のソフトの影響や権限関係で画像キャプチャ自体を拾えなくなってる可能性もある

**デフォルトの名無しさん** · 2022/01/25(火) 12:15:52.72

OKボタンをキャプチャできないように対策された可能性も

**デフォルトの名無しさん** · 2022/01/26(水) 18:42:02.11

画像の撮り直しするしかないだろうな
自分も年2回くらいの頻度でゲームのメンテ後にそういう状況になる

**デフォルトの名無しさん** · 2022/01/26(水) 19:31:39.15

アンチエイリアスが掛かっていると
同じ画像のはずなのに僅かなドットの違いで
反応しなくなったりするみたいだな

**デフォルトの名無しさん** · 2022/01/26(水) 20:32:24.66

なんならビデオカードのドライバが変わるだけでアウトだったりするしな
ほんの僅かな違いで認識しなくなる

**デフォルトの名無しさん** · 2022/01/26(水) 22:17:32.56

OKの画像でダメならOだけの画像にするとはよくやる
ギリギリまで無駄な部分を削って誤差を少なくするのは基本

**デフォルトの名無しさん** · 2022/01/28(金) 22:55:54.34

画像認識で押さなくとも、CLKITEMで押せたりもする

**デフォルトの名無しさん** · 2022/03/27(日) 23:40:28.02

すみません教えて下さい！
①～③の写真を順番にクリックしたいんですけど①の写真がなければ②と③の動作はしないようにするには①のchkimg()のあとに=trueをつけるといいんですか？
あと①～③を順番に動作させたい場合はstepは使わないですか？step入れてみたのですが訳がわからなく使っててよく分かりません

**デフォルトの名無しさん** · 2022/03/28(月) 01:13:44.89

①の画像と②の画像同時に存在するときに動作するようにする
ifb chkimg① and chkimg②
click

**デフォルトの名無しさん** · 2022/03/28(月) 09:23:26.66

結局代替はみんな何使ってんの？

**デフォルトの名無しさん** · 2022/03/28(月) 09:44:40.37

今のところ代替の必要がない

**デフォルトの名無しさん** · 2022/03/31(木) 00:51:25.15

教えてもらえませんか？
アクティブなウィンドウで選択している文字をCTRL+Cでコピーしたいのですが
アクティブなウィンドウが取得できません
ACW(GETID(GET_ACTIVE_WIN))をやっているのですが
別のウィンドウからコピペされてしまいます
ACW(0)だとALT+F1ではコピーできますが、再生ボタンを押すと
別のウィンドウからのコピペになってしまします
どうしたらアクティブなウィンドウを指定できますか？

**103** · 2022/03/31(木) 03:24:15.22

>>103
自己解決です。
どうしても使いたい機能がある別のマクロソフトと
組み合わせることにしたので
アクティブなウィンドウの指定がいらなくなりました
お騒がせしてすいません

**デフォルトの名無しさん** · 2022/04/25(月) 01:47:22.24

こんばんは。初心者用スレではない方でも書き込んだのですが、こちらにお分かりになる方いればお教えいただきたいです。
タブレットPCを使用しているのですが、画面のタップを記録できず困っています。マウスでのクリックではなくタップを自動化したいのですが、どのようにすればよいでしょうか？

**デフォルトの名無しさん** · 2022/05/02(月) 21:43:17.59

chkimgxで教えてください。
エラーが出て動作確認の為に以下のようなコードを書きました。
if chkimgx(image file)
msgbox(“1”)
else
msgbox(“2”)
endif

if chkimgx(image file)
msgbox(“3”)
else
msgbox(“4”)
endif

これを実行すると2回目のifでエラーになります。
なぜでしょうか？

**デフォルトの名無しさん** · 2022/05/02(月) 22:32:56.47

2回目のimage fileの指定が間違ってる

**デフォルトの名無しさん** · 2022/05/03(火) 05:14:30.48

" syntax error " と
" file not foud " と
" null pointer exception " では対処が違う

**デフォルトの名無しさん** · 2022/05/03(火) 07:27:16.98

やりたいことはifじゃなくてifbじゃないの

**デフォルトの名無しさん** · 2022/05/03(火) 10:15:47.24

ご指摘ありがとうごさいます。

STARTUP_CHKIMGX()

SHUTDOWN_CHKIMGX()

使用する時この中に記述しないといけないのを見落としていました。
なんとか本来行たい事も出来ました。
すみませんでした。

**デフォルトの名無しさん** · 2022/05/03(火) 14:09:04.62

バグの原因の多くが、スペルミスか記述漏れである事は多い

どうせスペルミスだろと思って見直す事はよくある

**デフォルトの名無しさん** · 2022/05/04(水) 06:34:34.80

>>109
どっちも同じです

**デフォルトの名無しさん** · 2022/05/04(水) 18:00:54.33

やりたい事もやれない世の中はポイズン

**デフォルトの名無しさん** · 2022/05/07(土) 12:52:09.91

あいまい検索プラグインのchkimgXをDLしたいのですがどこにあるでしょうか？
ご指南お願いします。
piggy-bank.jp の DNS アドレスが見つかりませんでしたとなり、みつけられませんでした。

**デフォルトの名無しさん** · 2022/05/07(土) 12:58:40.40

無能すぎて笑ったから貼ってあげましょう
https://classicrpa.000webhostapp.com/ChkImgX-ver1.2.1.zip

**デフォルトの名無しさん** · 2022/05/07(土) 16:22:01.86

いろんなサイトに転載されてるから　chkimgX　DL　でググればDL出来るサイトは普通に見つかる

**デフォルトの名無しさん** · 2022/05/07(土) 17:25:55.09

>>115
ありがとうございます。

**デフォルトの名無しさん** · 2022/05/25(水) 06:44:52.01

最近uwscを使い始めてnoxにadbコマンドを送ってゲームの自動化をしていたのですが、キーボード入力が出来なくて困ってます。
調べたところadb shell input keyevent A でキーボードのAが入力されるみたいなのですが、実行してみたところ何も起きません。
//入力
CMD = "cd C:\Program Files (x86)\Nox\bin & nox_adb shell input keyevent A"
print CMD //CMDの内容を確認
DOSCMD(CMD) //Noxに操作を送信
sleep(1) //操作送信後1秒待機
上記実際に試したスクリプトですがどこか間違っているのでしょうか？

**デフォルトの名無しさん** · 2022/05/25(水) 07:28:30.21

>>118
一度に複数のコマンドを実行する場合は<#CR>改行でつなぐ
CMD = "cd C:\Program Files (x86)\Nox\bin<#CR>nox_adb shell input keyevent A"

**デフォルトの名無しさん** · 2022/05/25(水) 10:46:15.60

自分も>>118と同じく最近uwscとnox_adbを使い始めたのですが、
chkimgXで得られたG_IMGX_XとG_IMGX_Yをnox_adbに送るとタップ位置が（xy両方）ズレてしまいます。

ifb CHKIMGX("image1.bmp", winid, x1, y1, x2, y2, Detect_num, Threshold_delta, Target_color) THEN
BTN(LEFT,CLICK,g_imgx_x, g_imgx_y,0)//←これは正しい位置をタップする
DOSCMD(dir + "nox_adb shell input touchscreen tap " + (g_imgx_x) + " " + (g_imgx_y - windowflamesize))//←これはズレる

ソースコードはQiitaの「UWSC × Nox でゲームマクロを作成する。」をほぼそのまま使ってます。
ズレが無くなるようにするにはどう書けば良いでしょうか？

**デフォルトの名無しさん** · 2022/05/25(水) 11:34:10.69

G_IMGX_XとG_IMGX_Yを+か-して調整すれば良い

**デフォルトの名無しさん** · 2022/05/25(水) 17:11:34.18

>>121
ズレる位置が常に一定なら±するだけですが、固定値では無いんです。
何らかの法則はありそうなのですが、その計算式の求め方というか根拠が分かりません。
nox_adbのタップ位置 = G_IMGX_Y * ??? + ???

**デフォルトの名無しさん** · 2022/05/25(水) 17:59:07.24

>>119
ありがとうございます
無事出来ました

**デフォルトの名無しさん** · 2022/05/25(水) 18:14:22.88

UWSCってなんですか？

**デフォルトの名無しさん** · 2022/05/25(水) 19:39:24.22

Umiumi Windows SCript
だっけ？

**デフォルトの名無しさん** · 2022/05/31(火) 05:16:47.31

え

**デフォルトの名無しさん** · 2022/05/31(火) 06:37:44.93

Delphiで作られているらしいな
c＃等の.net系は実現出来るのだろうか

**デフォルトの名無しさん** · 2022/05/31(火) 06:45:19.87

.net系は実現できるのだろうかってどういう意味？

**デフォルトの名無しさん** · 2022/06/02(木) 20:31:26.54

見た目は今風になるだろうけどDelphiよりは確実にもっさりしたのが出来上がる

**デフォルトの名無しさん** · 2022/06/03(金) 04:53:58.22

今UWSCと同じような物を作る最適な言語はなんだ
Delphiは優秀だけど古いよな

**デフォルトの名無しさん** · 2022/06/03(金) 09:32:49.12

pythonじゃね
それかruby
ゲームのマクロ目的だからExcelを自動化みたいな考えは無い

**デフォルトの名無しさん** · 2022/06/03(金) 14:40:18.33

言語に古いも新しいもない

**デフォルトの名無しさん** · 2022/06/03(金) 15:20:14.94

あるけど古い＝悪いわけではない

**デフォルトの名無しさん** · 2022/06/03(金) 22:01:48.99

rubyはGUIが弱くってそこを補うためにuwsc使ってるからuwscの代替となるかと言われると無理な気がする

**デフォルトの名無しさん** · 2022/06/03(金) 22:40:43.65

UWSCでGUIはなくてもよさそうだけど