自動化ツールUWSC使いよ集まれ21at SOFTWARE自動化ツールUWSC使いよ集まれ21 - 暇つぶし2ch■コピペモード□スレを通常表示□オプションモード□このスレッドのURL■項目テキスト456:名無しさん@お腹いっぱい。 18/10/15 02:39:30.50 xoZP11HR0.net FUNCTION MOVE_BALOON(x, y, direction) RESULT=FALSE DIM idBaloon = GETID(GET_BALLOON_WIN) IFB -1 < idBaloon THEN DIM xBaloon = STATUS( idBaloon, ST_CLX ); DIM yBaloon = STATUS( idBaloon, ST_CLY ) DIM wBaloon = STATUS( idBaloon, ST_CLWIDTH );DIM hBaloon = STATUS( idBaloon, ST_CLHEIGHT ) DIM widthTrim = -1 IFB 1=direction THEN SAVEIMG("", idBaloon, 0, 1, wBaloon, 1, TRUE ) ELSEIF 2=direction THEN SAVEIMG("", idBaloon, 0, hBaloon-1, wBaloon, 1, TRUE ) ENDIF IFB 1=direction OR 2=direction THEN DIM xSearch = 0 WHILE (xSearch<wBaloon) IFB 0 = PEEKCOLOR( xSearch, 0, 0, TRUE) THEN widthTrim = xSearch; BREAK ENDIF xSearch = xSearch + 1 WEND ENDIF IFB 1=direction THEN RESULT=TRUE; ACW( idBaloon, x-(widthTrim), y) ELSEIF 2=direction THEN RESULT=TRUE; ACW( idBaloon, x-(widthTrim), y-hBaloon) ELSEIF 3=direction THEN RESULT=TRUE; ACW( idBaloon, x, y-(hBaloon/3)) ELSEIF 4=direction THEN RESULT=TRUE; ACW( idBaloon, x-wBaloon, y-(hBaloon/3)) ENDIF ENDIF FEND 次ページ最新レス表示レスジャンプ類似スレ一覧スレッドの検索話題のニュースおまかせリストオプションしおりを挟むスレッドに書込スレッドの一覧暇つぶし2ch