2017年04月 / 03月≪ 123456789101112131415161718192021222324252627282930≫05月

インフォメーション

FC2ブログで画像等を一括アップロードするソフトを地味に配布してます。
FC2ブログ用ファイルアップロードの最新版はこちら
(ベクター)FC2ブログ用ファイルアップロード

--.--.-- (--)

スポンサーサイト

上記の広告は1ヶ月以上更新のないブログに表示されています。
新しい記事を書く事で広告が消せます。


 |  --:--  |  スポンサー広告  |  Top↑

2010.04.13 (Tue)

カナンでUWSC

ハンゲのブラウザゲーム「みんなの冒険大陸カナン」をやってたけど、もっさりしてて結構飽きたのでUWSC書いてみたりしたり。

【More・・・】

ファイル(拡張子を.uwsにして使用)
mincana.txt

ソース

// ----------------------------------
// 設定
// ----------------------------------
// ウィンドウタイトル
PUBLIC WINDOW_TITLE = "S1 - みんなの冒険大陸カナン"
// ウィンドウが非アクティブの場合、自動でアクティブにするか否か
PUBLIC WINDOW_AUTOACTIVE = 1 // 0:しない 1:する
// 敵画像フォルダ
PUBLIC MOB_DIR = "mob"

// 敵判定範囲
PUBLIC MOB_CHECK_LEFTTOP_X = 5
PUBLIC MOB_CHECK_LEFTTOP_Y = 50
PUBLIC MOB_CHECK_RIGHTBOTTOM_X = 950
PUBLIC MOB_CHECK_RIGHTBOTTOM_Y = 630
// ----------------------------------
// メイン
// ----------------------------------

// ウィンドウ取得
PUBLIC ID = GETID(WINDOW_TITLE)
// アクティブにする
ACW(ID, 0, 0)
// ウィンドウを基準とする
MOUSEORG(ID)

i = 0
while true
// ウィンドウがアクティブでない場合
IFB GETID(GET_ACTIVE_WIN) <> ID
IFB WINDOW_AUTOACTIVE = 1
ACW(ID, 0, 0)
ELSE
SLEEP(2)
CONTINUE
ENDIF
ENDIF
// フォルダ内ファイル数取得
filecount = GETDIR(MOB_DIR)
// フォルダ内の全画像ファイル判断
FOR i = 0 to filecount - 1
IF CHECKMOB(GETDIR_FILES[i]) THEN BREAK
NEXT
sleep(1)
wend

// MOB判定
FUNCTION CHECKMOB(IMG_NAME)
IFB CHKIMG(MOB_DIR + "\" + IMG_NAME, 1, MOB_CHECK_LEFTTOP_X, MOB_CHECK_LEFTTOP_Y, MOB_CHECK_RIGHTBOTTOM_X, MOB_CHECK_RIGHTBOTTOM_Y)
PRINT IMG_NAME + "いた"
BTN(LEFT, DOWN, G_IMG_X + 20, G_IMG_Y + 10, 300)
BTN(LEFT, UP, G_IMG_X + 20, G_IMG_Y + 10, 300)
RESULT = true
ELSE
RESULT = false
ENDIF
FEND

使い方:
適当なフォルダにMOB画像を自分で作って入れて実行。
画像自体は各自で作成してください。

動き解説:
指定した画面範囲内を指定したフォルダ内(MOB_DIR)の画像で順次検索する。
見つけたらクリックする。
ペットとか回復とかはぜんぜんしないので、
ペットが死んでもなおこのUWSCを動かし続けてると仲良し度がどんどん下がる。
回復する動作とか入れるといいかも。

 |  04:45  |  UWSC  |  トラックバック(0)  |  コメント(0)  |  Top↑

Comment

コメントを投稿する

URL
コメント
パス  編集・削除するのに必要
非公開  管理者だけにコメントを表示
 

Trackback

この記事のトラックバックURL

この記事へのトラックバック

 | BLOGTOP | 
上記広告は1ヶ月以上更新のないブログに表示されています。新しい記事を書くことで広告を消せます。