関数

土日祝日も連日大学に通っております。大学の先生に休みなのに毎日来てもらって申し訳ないけど。

論文をLatexできれいに書こうと格闘中です。


関数について

関数の便利な点は処理がまとめられるところです。

ボタンを押す　KBD(VK_K,CLICK,450)　のようなものが関数にあたります。

UWSCに組み込まれている関数以外でも自分で関数を作ることが出来ます。

関数は２種類あって、戻り値なしと戻り値ありがあります。

ボタンを押すマクロなので基本的に戻り値はありません。

よって、戻り値なしの場合だけ覚えればいいです。

PROCEDURE 関数名( 引数,　Var 引数,　引数[],　Var 引数[][],　引数=定数, .... )
　　　　処理
FEND

　Var 宣言を付けると引数を変更可能とする　（参照引数）
　配列変数には次元数分 []を付ける　（２次元配列の場合 引数[][] ）
　= 定数 にてデフォルトパラメータを指定できる（デフォルトパラメータ以降に通常引数を書く事はNG）

難しそうに書いてありますが

PROCEDURE　関数名(使う引数)
処理
FEND

とすればいいです。


例:
PROCEDURE エクス(q)
For p = 1 to q
KBD(VK_END,DOWN,900)
KBD(VK_END,UP,1000)
Next
FEND

PROCEDURE ヒール()
KBD(VK_INSERT,CLICK,450)
KBD(VK_INSERT,CLICK,450)
Sleep(1)
FEND

この様に関数にしておけば、エクス(3)とすれば3回繰り返し出来たり
ヒールの処理も3行掛かるところが1行で掛けてしまいます。
ヒールがなぜ2回書いてあるかというと2回書いておけばKBしたときにもほぼヒールが出るからです。
ディレイの関係で2回連続では出ません。

このページのトップへ

制御文

久しぶりにHTMLをかまいました。
タグを忘れてしまっててあたふたしてました。
やっぱり使わないと忘れちゃいます(ﾟｰﾟ;

制御文について

最低限覚えないといけない物
IF 文　・　For　Next 文

プログラミング言語が分からない人にはちょっと辛い部分です。
最低限覚えないといけないのは２つなので覚えてしまいましょう。


＜制御文＞
　//　１行の IF 文
　IF　式　THEN　真　[ELSE　偽]
　　「式」の部分に条件を書きます。「真」の部分にその条件がTRUE（満たされている）の時の処理を書きます。
　　　例
　　　　IF　x=3　THEN　KBD(VK_X,CLICK,1000) //x=3のときにキーxをクリックする
　　　　条件には好きなことが書けます。

　//　IF　のブロック文　IFB　ENDIF
　IFB　式　[THEN]
　　　真
　[ELSEIF　式　[THEN]]
　　　:
　[ELSE]
　　　偽
　ENDIF

　//　For　Next 文
　FOR　変数　=　初期値　TO　終了値　[STEP　刻み値]　
　　　処理
　NEXT　　　　　　　//　NEXTの後に変数を書いてはダメ
　　変数はアルファベットで何でもいいです(予約語以外）
　　初期値は0なり1なり数字を設定してください。終了値は同様に数字を設定してください。
　　処理にはループ中に繰り返す処理を書きます。
　　当たり前のことなので書かれていませんがループが始まると「変数」に「初期値」が設定されます。
　　書かれている処理が終わりNextまで進むと変数が+1されます。変数が終了値を越えるまで繰り返すことになります。
　　刻み値の設定は必要ないので無視します。
　　
　　例
　　FOR　x　=　1　TO　3
　　　KBD(VK_RIGHT,DOWN,200)
　　　KBD(VK_RIGHT,UP,800)
　　　KBD(VK_X,CLICK,1000)
　　NEXT
　　xは1からスタートです。書かれている処理が行われます。Nextに到達するとxが1増えます。つまりx=2になります。まだ終了値を越えていないので、また処理が行われます。同様にx=3になり処理が行われNextに到達したときにx=4となり処理を終了します。

　//　While　Wend 文
　WHILE　式　　　　　　　　//　式が　True　の間実行
　　　処理
　WEND

　//　Repeat　Until 文
　REPEAT
　　　処理
　UNTIL　式　　　　　　　　//　式が　False　の間実行

　//　Select　Selend 文
　SELECT　式
　　CASE 式　　　　　　　//　数値でも文字でも変数でもＯＫ
　　　　処理
　　[CASE　式]
　　　　処理
　　[DEFAULT]　　　　　　//　デフォルト
　　　　処理
　SELEND

　//　FOR,　WHILE,　REPEAT　のループを中断
　BREAK　[定数]　　　

　多重ループ中にて定数が指定された場合に、その定数分ループをBREAKする （デフォルト 定数=1）

　//　FOR,　WHILE,　REPEAT　のループの先頭へ
　CONTINUE　[定数]　　　

　多重ループ中にて定数が指定された場合に、その定数分ループをCONTINUEする （デフォルト 定数=1）

　//　関数を抜ける
　EXIT
　　　　　　
　//　直ちにプログラムを終了　　
　EXITEXIT　[終了コード]


簡単なループを作ってみることで覚えられるはずです。

関数を説明してそこからはサンプルのスクリプトを公開します。

画像認識コメントより
画像認識の取り込む範囲ですが、私のPCでも少し大きめにしないと認識してくれません。
おそらく解像度が違う為だと思います。CPU性能がよければ大きく設定しても問題ないと思います。

>ミニマップの事なんですが、アイテムイベントリなどを下にしてからミニマップを上にすると背景はアイテムイベントリなので、マップ自体の背景が変わっても大丈夫だと思います。

それは気づきませんでした。素晴らしい発想です。その手があったかと驚きました。ありがとうございます。

>�“屬離襦璽廚両魴錣貌�れて移動が完了するまでループする。
とありますが式の最後とかにNEXTとか入れないと次に進めないんですか？

Repeat　Until 文を用います。「NEXT」は次に進むという意味ではありません。For　Next 文の一部のNextです。

このページのトップへ

画像認識

先に画像認識から行きましょう。

//　指定画像が画面上にあるかチェック、あればその情報を返す
戻値 = CHKIMG( 画像名,　[透過色/色無視,　x1,　y1,　x2,　y2,　番号,　色幅] )
引数
　画像名： 画像ファイル名 （BMP形式のみ）
　透過色/色無視： 0： 指定なし （デフォルト）
　　　　　　　　 1： 左上、2:右上、3:左下、4:右下　の１ピクセルの色を透過色として処理
　　　　　　　　 -1： 色を無視して形でチェックする
　x1,　y1,　x2,　y2： サーチ範囲
　番号： 複数ある場合に順番を指定 （左上から）
　　　　 -1：　-1が指定された場合はヒットした数を戻値として返し、座標情報は ALL_IMG_X[], ALL_IMG_Y[] に格納
　　　　　　　（G_IMG_X、 G_IMG_Y には最後にヒットした位置が入る）
　色幅：　チェックに色幅を持たせる （色無視指定時もしくは 16bitカラー以下の場合は無効）
　　　　　IMG_MSK_BGR1：　各色(BGR)に対し 2/256の色幅を許す
　　　　　IMG_MSK_BGR2：　各色(BGR)に対し 4/256の色幅を許す
　　　　　IMG_MSK_BGR3：　各色(BGR)に対し 8/256の色幅を許す
　　　　　IMG_MSK_BGR4 ：　各色(BGR)に対し 16/256の色幅を許す
　　　　　IMG_MSK_B1, 2, 3, 4 ：　青に対し 2/256, 4/256, 8/256, 16/256の色幅を許す
　　　　　IMG_MSK_G1, 2, 3, 4 ：　緑に対し 2/256, 4/256, 8/256, 16/256の色幅を許す
　　　　　IMG_MSK_R1, 2, 3, 4 ：　赤に対し 2/256, 4/256, 8/256, 16/256の色幅を許す
　　　　　 ※ 演算可　例：IMG_MSK_B1 or IMG_MSK_R3（青に対し 2/256の色幅を許す + 赤に対し 8/256の色幅を許す）
戻値
　有ればTRUE、無ければFALSE
　TRUE の場合は見つかった座標を特殊変数　G_IMG_X、 G_IMG_Y に格納　　
　番号にて -1指定時はヒットした数を返し、座標情報は配列変数 ALL_IMG_X[], ALL_IMG_Y[] に格納（配列はゼロから）

CHKIMG( 画像名,　[透過色/色無視,　x1,　y1,　x2,　y2,　番号,　色幅] )

[　]の中に書かれている引数は任意です。


街に戻されたり等マップが変わったときや、ワープやハシゴ等で目的地に移動できたか確認する、ピラミッドのゲージ監視

これくらいしか思いつかないですが・・・


画像の準備について

画像はプリントスクリーンを利用します。クライアント側のスクリーンショットは使い物にならない。

プリントスクリーンで画像を取得しペイントなどにCtrl + Vで欲しい部分を抜き出して保存してください。

保存は、ファイルの種類で24ビットビットマップを選択し、UWSCのスクリプトがあるフォルダに保存してください。

画像の抜き出しにはコツがあります。ミニマップを抜き出す場合ミニマップの黒い部分を抜き出すのは避けたほうがいいです。ミニマップの黒い部分には背景が写っています。完全に同じ場所でなければ背景がずれて違う画像になってしまいます。ミニマップではキャラクターの黄色い部分、青い部分茶色い部分しか使えない気がします。



具体例
�．襦璽廚両魴錣貌�れて移動が完了するまでループする。
��街に戻されたときにプログラムを終了する。街に戻されたときにシャットダウンする。


��
REPEAT
(移動の処理）
UNTIL CHKIMG("test.bmp",1,0,0,500,500,1,IMG_MSK_BGR4) //test.bmpは移動先の画像

��
毎回同じような場所で動かない物の画像が用意できれば狩場の背景でも出来るかもしれません。
狩場のマップにハシゴがあり、街にハシゴが無い場合などはマップの青い部分の画像を指定すればいいと思います。
狩場にあって街にないものを設定するといいと思います。
If (CHKIMG("test.bmp",1,0,0,500,500,1,IMG_MSK_BGR4)=FALSE) then POFF(P_SHUTDOWN)
これは画像がなければシャットダウンします。

ループを抜けて放置するだけであれば
If (CHKIMG("test.bmp",1,0,0,500,500,1,IMG_MSK_BGR4)=FALSE) then EXITEXIT



取り込む範囲について
x1,　y1,　x2,　y2
これがよくわからないのですが、私のパソコンではうまく設定することが出来ません。

クライアント側の解像度とディスクトップの解像度が違う為でしょうか？

指定範囲内に画像があるにもかかわらず、反応しません。

なんともいえませんが、私のパソコンでは大きく設定すれば大丈夫でした。


ピラミッドではゲージが赤くなったら変化する画像を設定し2,3秒に1回程度確認して、必殺を出す処理を書き加えればいいと思います。


ミニダンジョンのミニマップがなくなってるじゃないですか・・・ちょっと残念です。

また何かあればコメントお願いします。

このページのトップへ

お久しぶりです

そろそろ、みなさんに「もう逃げたか？」と思われたころでしょうか

年末年明けはとても忙しかったです。

出張の休みすら取れない状態で１５連勤くらいでしょうか・・・よく覚えてないですが。

労働時間は超絶ブラック会社です。

もらえる給与は大手とは比較にならないほど多いですが。

そして、年末をもって今年度の新入社員３人全員が退社しました。

最後の１人は生き残れそうかな？と期待していましたが残念でした。

過去３年で１１人中９人が退社しました(〃￣ω￣〃ゞ

一人当たりの逸失損益はどの程度になるのか気になります。

PM１年生としての価値が問われますね。


明日の金曜日から１１連休です。軽い冬休みですね。

今年２回目の博士論文挑戦です。

大学の先生に会いに行かないといけないです。

あんまりやる気が出ないので、マクロ作りましょう！


街に飛ばされて攻撃スキル出してるようなマクロじゃ、この先生き残れませんよ！！

とりあえず、今後の流れとして

制御分
関数の説明
画像認識の説明

この順に説明していこうかと思います。

この３つが理解出来れば自分でマクロを作成することに大きく近づけます。

ピラミッドの方は、画像認識を用いたピラミッド＋宝箱回収＋宝箱開封を作ってみようかと思ってます。

公開するかどうかは分かりませんが。

狩りについても、過疎マップやミニダンジョン（制限時間２時間）について考察しようと思います。

このページのトップへ

キー入力

キー入力の方法

KBD(VK_K,CLICK,450)

これは450ms(1000ms=1秒)経ってからキーkをクリックする。要はkを一瞬押すという意味になります。

KBD(VK_RIGHT,DOWN,200)
KBD(VK_RIGHT,UP,800)

では、これはどうでしょうか？

200ms経って→を押したままにします。
800ms経って→を離します。

つまりどうなってますか？

→のキーを800ms押しっぱなしにした状態にするという意味になることが分かるでしょうか

基本の操作はボタンの組み合わせであらわすことが出来ると思います。


例：→に移動して攻撃する
KBD(VK_RIGHT,DOWN,200)
KBD(VK_RIGHT,UP,800)
KBD(VK_X,CLICK,1000)

例：→を押しながら攻撃する
KBD(VK_RIGHT,DOWN,200)
KBD(VK_X,CLICK,1000)
KBD(VK_RIGHT,UP,800)

このページのトップへ
ホーム  次のページ »
このページのトップへ
プロフィール

ぽんまくろ

Author:ぽんまくろ
週１で更新できるようにがんばる
(´･ω･`)

簡単なプログラムで自動化できるのでがんばりましょう

HS回避......

最新記事
最新コメント
FC2カウンター
月別アーカイブ
カテゴリ
スポンサー