自動化ツールuwsc使いよ集まれ5

1 名前：名無しさん＠お腹いっぱい。 [2009/12/09(水) 05:27:33 ID:J1DL1P1U0] Windowsを自動化させるツールUWSC。 www.uwsc.info/ uwsc使いのみなさま、ﾏﾀｰﾘ己のスクリプトを晒しましょ。 446 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/05/16(日) 06:56:22 ID:xeTkbS2L0] >>445 ラーメンタイマー程度で見た目も精度もいらないんなら簡単に記述できるんですけど、 やっぱ画面とかあったほうがいいだろうし、そうすると有償版使うかHTMLのスクリプト使うか、 もしくはHSPなどを使ったほうがいいかもしれません。 sleep()を使った３分タイマーを作ってみました。 まあ、正確な時間を刻まないと生理的に受け付けないとは思いますが・・・単純なSleep()のループよりは正確です。 利点は・・・スクリプトなのにCPU負荷が小さいこと、なのに（多分）正確なタイマー。 欠点は・・・３分でもカウント（表示）が数秒ずれる。負荷を１００％で動かすと表示が１０秒単位でずれてしまう。 　　　　　　カウントのスリープ時間を自分で微調整する必要があり、結果がまちまちなこと。 　　　　　　ま、Gettime()のループにすれば正確になるんですが。・・・やっぱそっちでやった方がシンプルで分かりやすいかな？ // ３分タイマー TIME = 60*3　// タイマーの時間 PUBLIC start_t = gettime() print "start" thread count(TIME) sleep(TIME) print "sleeptime:" + (gettime() - start_t) msgbox("3分経ちました") //およその残り時間を表示（表示のみ） Procedure count(times) 　for i = 1 to times 　　fukidasi(times - i) 　　// sleep(0.966) // +５秒 　　// sleep(0.9)　// -3秒 　　sleep(0.93) 　next 　 print "counttime:" + (gettime() - start_t) Fend 447 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/05/16(日) 07:55:08 ID:QQZQPNYAP] >>446 ありがとうございました。 使わせていただきます。時間は適当でいいです。CPU負荷が小さいほうが 利点あります。 sleepの時間ってずれるんですね。はじめてしった。 いままで単純なsleep(1)で通してたんですが。 見てもわからないところばかりですが、このコードみて調べます。 ありがとうございました。 448 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/05/16(日) 10:42:58 ID:ieNwpaRT0] >>444 > TOPMOSTにしてないやつはなってないはずなので、 > 自分でどっちに制御したかを変数で持ってればいいんじゃね？ いや単にウィンドウの状態を変えるだけのスクリプトなんで、 TOPMOSTにした後は終了したいんですよ。 INIでも作ればいいのかもしれないですが、もっと直接的に取得する方法って無いもんかと。 ついでに言えば、ウィンドウのZ順？も取得・変更できたら嬉しい。 449 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/05/16(日) 10:46:32 ID:WMf1B8jLP] sleepがズレるわけじゃなくてsleep以外の処理でズレるんだよ for文に使われる比較処理だってCPU使うし、もちろんsleepをコールする処理自身もCPU使う だからCPUの負荷だけではなくクロック数やバス幅に影響してしまう 450 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/05/16(日) 10:57:04 ID:WMf1B8jLP] >>448 uwsc自体ではZオーダー提供していないんだから 自分でAPIを呼び出すしかないんじゃね？ 451 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/05/17(月) 01:50:05 ID:i4pMt12q0] >>439 もう見てないかもしれんけど マド作るなら今よりロビー等の変更が来てからの方がいいよ 画像の用意とか二度手間になる。 まじでやりたいなら教えてやるよ。 452 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/05/17(月) 02:14:59 ID:nvgS/jkJ0] >>451 マド死ねよ。 453 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/05/23(日) 15:52:15 ID:O7k5xAup0] uwscって意外と時間指定してボタンを押せとか やるの難しいと思った 知り合いの家に行く間に、何回か録画ボタンを押して欲しかったんだが プログラム書こうとして、全く歯が立たなかった タイマー機能があるのを思い出して、事なきを得たが1時間半くらい悩んだんだよなｗ と、思って今やったら、案外簡単に時間って取得出来るのね あとはこれを上手い具合に変数に格納して、設定した時間と比較して同じになったら 〜しろって風にすれば、タイマー一丁上がりか 変数に155958みたいに格納出来れば楽そうなんだが あー、A=15*10000+59*100+58でいいのか、簡単じゃん（＾＾； 俺アホス 454 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/05/23(日) 18:51:26 ID:yypYUx/y0] >>453 そのやり方もまだまだ。 なんとヘルプファイルにもっと良い時間の取得の方法が書いてあるんだぜｗ …まぁ、変数をどういう使い方にするか、にもよるんだがな。 455 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/05/24(月) 09:22:00 ID:cYdOlD8C0] uwscがスクリプトを現在実行中かどうか確かめる命令はありませんか？ 456 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/05/24(月) 18:34:15 ID:30r1mvWj0] >>453 数値を文字列として連結したければ a=123 b=456 c=""+a+b みたいにやればよし。c=a+""+bでもいい > あー、A=15*10000+59*100+58でいいのか、簡単じゃん（＾＾； これだったらA=""+15+59+58 457 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/05/25(火) 19:52:53 ID:Hp1Js47E0] テキストエディタでスクリプト書こうかなと思って先ほどフリー版uwscを導入したのですが 保存するときの文字コードや改行コードについてヘルプに書いてないのですが特に制限は無いですか？ 458 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/05/25(火) 21:12:54 ID:HDkoFkpY0] >>457 書いてなくて安全策をとるなら普通Windows版アプリではShift-JIS+CRLFにしない？ 459 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/05/25(火) 22:29:28 ID:Hp1Js47E0] windowsだからShift-JIS+CRLFとは限らないのにｗ 460 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/05/25(火) 22:46:22 ID:BuCIUw3E0] やってみればわかることを聞く人には向いてませんよ。 461 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/05/25(火) 23:23:24 ID:Hp1Js47E0] >>460 その程度の知識がないならわざわざレスしなくて結構・・・とだけレスしとく 462 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/05/25(火) 23:24:48 ID:Hp1Js47E0] あ、そうそう一言伝えますね winだからsjisと決め付けてかかるのはやめたほうがいいですよ 463 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/05/25(火) 23:42:12 ID:PWagYqdo0] sleep(2) sleep(2) と sleep(4) は同じことですか？ 464 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/05/26(水) 00:45:15 ID:tqM7XX7P0] >>455 タスクマネージャにuwsc.exeがあれば実行中かも。 メイン画面も１件としてリストに出てくるけど、見た目で実行中か分かるし。 コマンドはqprocess >>457-462 試してみたけど、スクリプトの保存形式はunicodeでも動くけど、コードの扱いはシフトJISだね。 DEF_DLL MessageBoxA(HWND,pchar, pchar, DWORD): Long: user32.DLL DEF_DLL MessageBoxW(HWND,pchar, pchar, DWORD): Long: user32.DLL MessageBoxAなら保存形式に関係なくテキストが表示できるけど、 MessageBoxWだと文字化け。 >>463 微妙に違う。 sleep(2)×２の方がCPUを消費するし、時間もかかる。 465 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/05/26(水) 01:15:34 ID:HAnL27G70] なんで教えを乞う立場の者が煽れるんだろう。 基本的に人間ができてないな。 466 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/05/26(水) 04:40:14 ID:7RyXzF0VP] 人間的云々言う場所じゃないだろ 嫌ならレスするなカス 467 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/05/26(水) 07:11:30 ID:L/ZmdYFd0] レスしているのは人工知能だよ 468 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/05/26(水) 09:36:14 ID:bXusYbn00] じゃあ俺も人口知能！ 469 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/05/26(水) 15:21:35 ID:Ce2KrQJg0] このスレの人口分布 回答者・・・・・・・・・・・・・・・・・・・ 1% 質問者・・・・・・・・・・・・・・・・・・・10% 態度がでかい自称回答者・・・89% 470 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/05/26(水) 18:00:04 ID:DoB0DBXA0] なぜ態度のでかい質問者がないんだろう 471 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/05/26(水) 18:03:02 ID:Y3WtWtht0] 実際はレベルの低い回答者が原因で荒れるからだろ 472 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/05/26(水) 22:45:02 ID:HAnL27G70] >>466 悔しそうだなｗカスｗ 473 名前：名無しさん＠お腹いっぱい。 [2010/05/28(金) 06:10:20 ID:6og4XoNt0] ついでに書いておくと、Pythonの場合は保存形式の文字コードがスクリプトにも反映される。 だから大変。 Pythonでも新しめのバージョンでは、リテラル文字指定でユニコードに指定できたりする。 それよりこれ。 for i = 1 to 33000 　navigate(url) 　sleep(1) next この程度のスクリプトで逮捕ですよ。 【社会】 図書館ＨＰにアクセス３万３千回で、会社社長逮捕。１秒に１回アクセス繰り返すプログラム作る…愛知 ttp://tsushima.2ch.net/test/read.cgi/newsplus/1274928007/ 474 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/05/28(金) 11:11:33 ID:kipVwqRc0] それは手動でやってても同じだわな。 問題なのはスクリプトじゃなくて意図。 475 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/05/28(金) 12:08:01 ID:XdAWpU3T0] ＞図書館のホームページに集中的にアクセスし、閲覧しにくくしたとして、 逮捕・・・ １秒間に３万３千回アクセスかと思ったら、１秒間に１回かよ？ 逆に１秒間に１回のアクセスで重くなるＨＰなんて、どうやったら作れるんだよ？ 476 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/05/28(金) 12:10:35 ID:N8m5GgbM0] >>473 お前素人だろ 477 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/05/28(金) 13:27:01 ID:kipVwqRc0] >>475 日本のお役所仕事を舐めちゃいけない 478 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/05/28(金) 18:03:34 ID:a1h0S9px0] >>475 きっと鯖が初代PC98のまま更新できなかったりするとそうなるんじゃね？ 479 名前：名無しさん＠お腹いっぱい。 [2010/06/01(火) 04:12:46 ID:6RwPsnvD0] 343 名前：名無しさん＠十周年[sage] 投稿日：2010/06/01(火) 01:25:49 ID:SDO0GhkS0 　楽天プライズでUWSCのｽｸﾘﾌﾟﾄで24時間ｽﾛｯﾄ廻し続けてたら対策された。 　何時間も遊んでたら「遊びすぎじゃ、休憩せい」って弾かれる様になったのは 　俺のせい。 楽天ｸﾞｯｽﾞとかｼｮﾎﾞｲ景品が途中で出るようになったのも俺のせいかも。 　ちなみに、ｺﾞｰﾙﾄﾞは長時間遊ぶほどに出玉が悪くなる仕様だと統計とれた。 480 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/01(火) 09:26:32 ID:OoGhQHoP0] 20年以上動いてる鯖があるってのか 481 名前：名無しさん＠お腹いっぱい。 [2010/06/01(火) 09:43:30 ID:6RwPsnvD0] ３０年前のだって現役です 【大分】 「『ょ』入力できぬ」代わりに「き『よ』う子」と入力した健康保険証や年金手帳などを発行　年金事務所が謝罪 ttp://tsushima.2ch.net/test/read.cgi/newsplus/1275304190/ > 　同事務所が調べたところ、使用しているシステム（国が１９８０年に導入）は通常のパソコンとは違い、 > 「ょ」「っ」などは特殊な入力方法のため、職員が知らなかったらしい。 482 名前：家電.com [2010/06/01(火) 09:47:46 ID:Cz2396tn0] 家電.com ＨＰ Kadencom.chochouo.com 483 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/04(金) 23:40:40 ID:iS3gjDV40] 2chなどでリンクを踏んだら直接リンク先に行くのではなく リンク確認の画面に一度飛ばされるのですが、 その画面になったらすぐに次のリンクをクリックする スクリプトを書きたいのです。 UWSCの誘惑にクリップボードのURLをブラウザに渡すスクリプトあるけど、 そうじゃない形で常に監視しておく形で次々にリンクを踏む形を 取りたいのです。 だれか書いてくださいませんか？　お願いします。 初心者ながら書いているのですが エラーがでてしまいます。 484 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/05(土) 00:04:07 ID:iS3gjDV40] こんなんじゃ、まだまだ遠いですか？ エラーでてとまっちゃいます ctrlwin(getid("","TAppication"),activate) STOPFORM(TRUE) // ストップボタン表示 ACW(0, 1150, 850) IE = CREATEOLEOBJ("InternetExplorer.Application") IE.visible = true X=0 repeat IEid　=　GETID("Internet Explorer") wks　=　GETSTR(IEid,　0,　STR_STATIC )　　//　タイトルをGET IFB POS("リンク確認", wks) > 0 THEN MsgBox("発見") sleep(0.5) UNTIL !IE.busy AND IE.readystate = 4 ret = IELINK(IE,"上記のページにジャンプしようとしています。問題ない場合はクリックしてください") x=x+1 ELSE 　sleep(1) ENDIF until x <> 30 485 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/05(土) 01:01:23 ID:7xrzyNYi0] 敢えて言おう。専ブラ使え。 486 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/05(土) 01:32:53 ID:sSGL2jFW0] 初歩的な質問ですみません。 for i= 1 to 100 で回している間、実行したくない　i　に対して if i=5 or i=10 or i=32 or i=56 then ・・・ の様に書いているのですが、　i=　が多くなると書くのが面倒くさいのでもう少しまとめて 書く方法はあるのでしょうか？例えば i=(5,10,32,56) みたいに・・。これではダメだとは思うのですが、他の書き方で。 どなたかお願いします。 487 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/05(土) 03:01:33 ID:7xrzyNYi0] 実行したくない数に法則性があるならそれを式にする。 単なるリストならそれを置換して作ってしまえば。 置換したくない番号の配列作っておいて、iをそれを比較するとか。 for i=0 to 10 if isNG(i) then print "NG:"+i next function isNG(num) dim ng[]=5,10,32,56 for i=0 to resize(ng)-1 ifb num=ng[i] result = 1 exit endif next result = 0 fend 488 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/05(土) 05:19:02 ID:XHbnzUaJ0] >>486 基本的にない。 C言語ならこう書けるけど switch{ 　case 5: 　case 10: 　case 32: 　case 56: 　　コード; 　　break; 　default: } でも、ORoperation()っていう関数を作ればそういう書き方は可能。 if ORoperation( i, 5, 10, 32, 56 ) then って感じで。 まあ、数値の奴は配列に入れて渡した方がいいんだけど。 if ORoperation( i, Array ) then function ORoperation( a, x1=0, x2=0, x3=0, x4=0, x5=0, x6=0 ) 　dim Array[] = x1, x2, x3, x4, x5, x6, 0 //　0はループ脱出条件 　result = true 　i = 0 　while Array[i] 　　if i = Array[i] then exit 　　i = i + 1 　wend 　result = false fend 動くかどうかは知らない。 489 名前：名無しさん＠お腹いっぱい。 [2010/06/05(土) 05:37:27 ID:XHbnzUaJ0] >>486 全ての場合にそういう共通処理が考えられるのなら、配列パラメタを使うべきかも dim Pattern[101] // ="a","x","b","x","c"・・って感じで並べてもいい Pattern[5] = "a" // 数値の方が扱いやすいが、とりあえず文字の方が分かりやすいかと。 Pattern[10] = Pattern[5] // 都度代入は変更がめんどいので Pattern[32] = Pattern[5] Pattern[56] = Pattern[5] if "a" = Pattern[i] then もしくは select Pattern[i] 　case "a" 　　コード 　case "b" 　case "c" 　default 　　print "パターンなし" selend 490 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/05(土) 08:54:06 ID:BLq+NU9U0] 初歩的かもしれませんが自分ではちょっとできないので質問させていただきます。 Aという画像が始めない場合はそのままで、もし見つかったら次に画像Aが消えたときに各処理をしていくというものとして下のようなものを書きました。 while true 　ifb chkimg(A)　　　　　　　・・・1 　　　while true 　　　　　ifb chkimg（A）　　・・・2 　　　else 　　　　　処理 　　　endif 　　　wend 　else 　　　sleep(1) 　endif wend 実際に動かしてみたことろ処理が終わった状態でもずっと2のifbを続けます そこでこのスクリプトに「特定のキーを押した場合1のループに戻る」といった機能をつけようと思ったのですが、 どこにどのような命令を挿し込めばいいでしょうか。 一応2のifbのあとにif GETKEYSTATE(VK_ESC) then exitを入れてみたのですがどうにも反応していないようです。 稚拙な文にてわからづらいところ多々あるかと思いますがよろしくお願いします。 491 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/05(土) 13:14:44 ID:hXFmkiOc0] >>490 処理が終わったらループから抜けるのを忘れてるんじゃない? 2 の IFB ブロックの『処理』で最後に BREAK すれば一つ上のループに戻るよ 492 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/05(土) 15:14:33 ID:XHbnzUaJ0] >>490 elseの処理に数秒以上かかるようなら、キー入力を拾えてないかも。 キーをクリックしてから１秒以上経過してからGETKEYSTATEを動かしても、 キー情報は消えてるっぽいから、押されてないことになってるんだよ。 ESCを連打していればそのうち抜けると思うけど。 493 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/05(土) 18:08:16 ID:7xrzyNYi0] >>490 　while true 　　ifb chkimg（A）　　・・・2 　　else 　　　処理 　　endif 　wend 2の結果にかかわらずずっとwhileループの中。 画像Aが無くなった後ずっと「処理」を続ける。 その間2はずっとfalseなんでifの直後つまりifがtrueの時実行される場所に getkeystateを置いても実行されない。 入れるなら「処理」の直前。 while true 　ifb chkimg(A) 　　while chkimg(A) 　　wend 　　処理 　endif wend ていうかこんなんでいいんじゃないの？ sleep無いけど。 494 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/08(火) 20:48:06 ID:/dGW5DYk0] 斧戦争ツール作れよカスども 495 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/10(木) 23:23:04 ID:t9RcVFEr0] スクリプトを指定した時間だけ動かすという方法はあるのでしょうか？ 例えばスクリプトを走らせてから30分間とかです。 496 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/11(金) 00:39:39 ID:aLuYGiLxP] これはひどい 497 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/11(金) 04:58:24 ID:l1wBl/570] >>495 UWSCはメインが終了したら、他のスレッドが動いていても終了します。 だから、こんな感じでやれば３０分きっかりで終了できますが、当然処理は無条件に中断します。 -- sample.uws ここから-- thread func() sleep(30*60) exitexit // 不要だが、ここで終了と明示する意味で。 proceduer func() 　// 基本的にこちらですべて処理する 　while true 　　sleep(1) 　wend fend -- sample.uws ここまで-- 中途半端に終了したくない場合、sleep(30*60)の代わりにGettimeのループで 今はダメっていうフラグを監視すればいい f = false // 処理中フラグ。処理中はtrueがセットされる t = GetTime() while GetTime < t + 30*60 　repeat 　　sleep(1) 　until ! f wend ちなみに、この場合はrepeatじゃないといけない。 そうしないとsleep()してる間にフラグがセットされる可能性が高いから。 もっと確実にやるなら終了するぞっていうフラグも立てるべきかな。 498 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/12(土) 13:07:37 ID:1g6XM8MfP] あるウィンドウの子ウィンドウにドラッグドロップしたいんですが、子ウィンドウのIDはどうやって取得すればいいんでしょうか？ 499 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/12(土) 13:34:30 ID:e7naQunBP] //　指定ウィンドウの ID を返す 戻値 = GETID( タイトル,　[クラス名,　待ち時間秒,　MDI子タイトル] ) 引数 　タイトル： 識別したいウィンドウのタイトル （タイトルの一部分だけでもOK） 　クラス名： 区別に必要でなければ省略して構いません （前方一致でのみ部分指定可） 　待ち時間秒： 確認できるまで指定された秒数待ちます （0.01〜） 　　　　　　　　 0： 0.1〜10秒まで状況や負荷により自動判断 （デフォルト） 　　　　　　　　-1： 無期限待ち 　MDI子タイトル： MDIウィンドウ中の子ウィンドウタイトル 500 名前：498 mailto:sage [2010/06/12(土) 16:28:35 ID:1g6XM8MfP] そうではなくて、子ウィンドウのタイトルが分からない場合はどうすれば・・・ 501 名前：横レス mailto:sage [2010/06/12(土) 17:52:51 ID:o26Fnx3o0] >>500 ＞タイトルの一部分だけでもOK これでだめならGETALLWINで存在する全ウインドウのIDとってから消去法 またはなんらかのWIN32API（知らないけど探せばあるんじゃね？）でハンドル取得してHNDTOID 502 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/12(土) 18:45:49 ID:5Y2bRnnp0] 参考になるか分からんが、ぴたすちおを使えば子ウィンドウ情報がみえる 503 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/12(土) 20:19:26 ID:e7naQunBP] //こういう事？ def_dll GetWindow(hWnd,long):long:user32.dll GW_HWNDNEXT = 2 GW_CHILD = 5 uCmd = GW_CHILD p_id = getid("親") while true 　　c_h = GetWindow(idtohnd(p_id), uCmd) 　　if c_h = 0 then break 　　 　　p_id = hndtoid(c_h) 　　uCmd = GW_HWNDNEXT 　　 　　msgbox( status(p_id, ST_TITLE) ) wend 504 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/13(日) 08:48:23 ID:c9kd9eBN0] >>486 うんこ発見装置を授けよう うんこ ="1 5 10 18 25 37 56 58 68 74 81 97 99" for i = 1 to 100 if pos(i,うんこ) > 0 then print i+"に うんこ発見" next 505 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/13(日) 09:55:53 ID:fmHGMG6r0] >>504 それ、致命的に駄目だろｗ 506 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/13(日) 11:23:05 ID:c9kd9eBN0] >>505 =0 に変更すれば処理したくないiの条件になるが何がダメなんだ？ 理由を書いてくれ 507 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/13(日) 11:47:08 ID:o9NSeFNt0] >>506 自分で書いたのにためしに動作させてないのか？ 一回動作させて、プリントログよく見てみろよ。1〜9まで全部条件に引っかかってるだろ。 508 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/13(日) 12:05:28 ID:86pvNGkL0] 簡単な方法として、正規表現使えるようにすればいけるな 509 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/13(日) 12:07:17 ID:86pvNGkL0] ほかには、文字の前後にゴミつけて区切りをはっきりさせればいける 510 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/13(日) 15:49:17 ID:c9kd9eBN0] そうだったすっかりわすれてた悪いな これでいけるだろ うんこ =" 1 5 10 18 25 37 56 58 68 74 81 97 99 " for i = 1 to 100 if pos(" "+i+" ",うんこ) > 0 then print i+"に うんこ発見" next 511 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/13(日) 16:31:53 ID:lV2bpcq40] TOKEN() と連想配列でやってみた DIM うんこ = "1 5 10 18 25 37 56 58 68 74 81 97 99" HASHTBL hash DIM str = うんこ WHILE LENGTH(str)   hash[TOKEN(" ", str, TRUE)] = TRUE WEND DIM i FOR i=1 TO 100   IF hash[i] THEN PRINT i+"に うんこ発見" NEXT 512 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/13(日) 18:09:26 ID:Q8xDlz5x0] なるほど。 ハッシュテーブルならパターンが２次元配列で大量にあったとしてもすぐに発見できるね。 513 名前：名無しさん＠お腹いっぱい。 [2010/06/13(日) 18:28:57 ID:M6ZVIcE70] UWSCを使っていて、パスが通っていないのが使いにくい。 CALL文や、ライブラリファイルを別フォルダにした場合、等。 ディレクトリ検索と、よく使うファイルのパスを登録したファイルとそれを使うスクリプトを作って、 CALLやいくつかの変数(プログラムファイル名等)はそれを経由するようにするとか 出来ないことはないけど(CALLとか作る)、 シンプルとはいえ、結構素人が作っていいのか本格的な感じになる。 みなさんはどうしているの? ひょっとしてどなたかが作ったのがありますか? 514 名前：513 [2010/06/13(日) 18:31:58 ID:M6ZVIcE70] >>513 すいません。誤記。 × (CALLとか作る) ○ (CALL2とか作る) CALL2みたいな新しいprocedureを作ってそこからCALLを呼ぶ、という意味にしたかった。。。 515 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/13(日) 21:06:35 ID:E/dbXkmj0] >>511 変数strの参照部全部変数うんこだろw 516 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/13(日) 21:48:07 ID:lV2bpcq40] >>515 参照部とは? TOKEN() は第二引数を破壊するので うんこに配慮して、うんこの値をコピーした str を渡しました 517 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/13(日) 21:53:05 ID:E/dbXkmj0] >>516 ああごめん。ちっと勘違いしてたわ。 518 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/14(月) 16:34:31 ID:A4WmwryV0] ifb iegetdata(ie, true, "yes", "はい") > 0 iesetdata(ie, true, "yes", "はい") sleep(0.5) else break endif iesetdata(ie, true, "yes", "確認") これ、もう少し纏まりませんか。主に1.2行目・・・ アンケサイトで「はい/いいえ」で確認ボタン出るまで押すって奴なんですが 519 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/14(月) 17:02:01 ID:A4WmwryV0] While iegetdata(ie, true, "yes", "はい") > 0 iesetdata(ie, true, "yes", "はい") sleep(0.5) wend iesetdata(ie, true, "yes", "確認") あれ、こうか・・・？ 520 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/14(月) 17:32:38 ID:jt+/tNC/0] そんなアンケートに価値はない 521 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/14(月) 20:43:35 ID:aNbH09Ww0] ifb CHKIMG(IMG , -1 ) BTN(LEFT,DOWN,102,715,579) BTN(LEFT,UP,180,411,641) else （ifbの所に戻りたい） endif この処理を作りたいのですがelseをどう書けば良いんでしょうか。 イメージ画像が発現するまで待機する様な文が書きたいです。 if以外でも良いのです。 522 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/14(月) 20:51:53 ID:aNbH09Ww0] コンティニュー見つけました。 初心者ですみません。 523 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/15(火) 22:23:39 ID:Y3W88cOuP] 短髪の女の子？がセックスをしながら世界一周を目指すという成人誌を見たことがあるのですが、分かる人いますか？ たしか3年ぐらい前の漫画だったと思います 524 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/16(水) 01:11:20 ID:jeyh3hPj0] どんな誤爆だよｗ 525 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/16(水) 13:04:10 ID:yLa0pynz0] これは大胆な確信犯だな。 面白そうだから探してくるわｗ 526 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/16(水) 21:29:45 ID:Z1Itnvke0] peekcolorを使ってB値だけを判定する方法を教えてください 527 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/16(水) 22:16:46 ID:nX9kgu9QP] 結果をmsgboxで表示すれば目視で判定できます それとも「どのように」判定したいのか指定があるんですかね 528 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/16(水) 23:16:32 ID:6Hb0U1Mg0] 「記録」を使って、 作業に使うアプリをまとめて立ち上げたり、 新しいフォルダを生成したりする程度のヘタレた使用をしています ヘルプを読んで起動オプションがあるのはわかりましたが スクリプト実行、実行後はUWSC本体を起動したままにする場合 UWSC.exe　/K　スクリプト名 　 　↑ この構文をどのように使えばいいのかがわかりません 例えば、こんな感じだと動きません GETTIME() HIDUKE = G_TIME_YY4 + G_TIME_MM2 + G_TIME_DD2 EXEC("NOTEPAD") SENDSTR(GETID("無題"), HIDUKE + "<#CR>") UWSC.exe /K 日時出力.UWS おそらく単純すぎて目の前に答えがあるのに、答えが近すぎて逆に自分の視界に入ってない状態だと思います ヒントだけでも教えていただければ・・・・orz 529 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/17(木) 03:11:51 ID:sncjYoBq0] >>526 BってBGRのB？ (peekcolor(x,y) and $FF0000)/$10000 とか？ 530 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/17(木) 06:51:29 ID:k9E1g4kJ0] >>528 exec 531 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/17(木) 08:09:29 ID:RfIdECVBP] >>528 ヘルプにある「その他項目」は文法の話じゃないよ スクランブルのほうには書いてあるけど コマンドプロンプトで起動する場合とかにパラメータを付ける話 532 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/17(木) 18:34:42 ID:Ff+fGhbK0] ご教授願います。 以下のスクリプトを作ったのですが、再生すると 行目のIFBに対しENDIFが閉じられていないと出ます。 どこがダメなのか教えてください WHILE TRUE ifb GETID(GET_ACTIVE_WIN) = GETID("paper man") then Ifb　PeekColor(512,384) = $FFFF00 then BTN(LEFT,CLICK) Endif Endif sleep(0.02) WEND 533 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/17(木) 18:47:12 ID:+CCij1w00] >>532見た感じで適当なカキコすると 2行目のGETID条件の相方が変数or定数じゃないのが気に食わないんじゃね？ 534 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/17(木) 18:48:19 ID:k9E1g4kJ0] >>532 それで動いたのでどこが悪いか判りません。 …正直、ゲームチートっぽいのは歓迎したくないなぁ。 535 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/17(木) 18:50:44 ID:x399c/MH0] チートじゃないだろ カスが！発言に気をつけろ 次はないと思え 536 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/17(木) 18:56:59 ID:pUIHTkvJ0] まぁ､チートでは無いわな。 ちなみにuwscは､ゲームで使ってこそ価値のある物だと思うｗ 537 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/17(木) 19:19:52 ID:qd5QGDw6i] 単純にゲームに対する不正だなw 538 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/17(木) 19:29:39 ID:sncjYoBq0] ゲームに対する不正のどこがチートじゃないのかkwsk 539 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/17(木) 19:40:04 ID:ydiblUFW0] チートの定義はクライアント内部からでしょ。 UWSCってローカルな情報で動くし。 よくわからん、やってる事は同じだなｗ 540 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/17(木) 20:44:42 ID:sncjYoBq0] 定義も何もチートはcheatでそのまんま「不正行為」って意味だろうに。 内部も外部も関係ないだろ。 541 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/17(木) 20:47:52 ID:pUIHTkvJ0] 直訳とゲーム用語だと少し違うんだよね。 542 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/17(木) 20:50:44 ID:k9E1g4kJ0] >>541 チートを「不正」以外の言葉で使っている場面を見たことが無い。 どんな独自の用語なんだよｗ 543 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/17(木) 20:54:53 ID:pUIHTkvJ0] めんどくさいなー。 同じ不正でも、"チート"と"操作の自動化"は違うのだ。 後は自分で調べてね。 544 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/17(木) 20:57:16 ID:l8wchoUV0] 操作の本来実装されている以外の方法での自動化が認められたゲームなんかあるのか？ 俺ルールでこんくらいはおｋって思ってるだけだろ 545 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/17(木) 20:57:56 ID:k9E1g4kJ0] >>543 ま、結局不正なのは変わりないからなぁ… 546 名前：名無しさん＠お腹いっぱい。 mailto:sage [2010/06/17(木) 21:40:09 ID:RfIdECVBP] 不正行為の総称・・・チート 自分を正当化するための魔法の言葉・・・操作の自動化 確かに違うね

---

---

[ 続きを読む ] / [ 携帯版 ]

read.cgi ver5.27 [feat.BBS2 +1.6] / e.0.2 (02/09/03) / eucaly.net products.
担当:undef