【カス社員】777town ｴﾝﾄﾞﾚｽﾌﾞﾗｯｸ3【上等】

公式
http://www.777town.net/

まとめサイト (機種の仕様等の確認はコチラ）

http://www.geocities.jp/arakinhoku/
http://www.usamimi.info/~333town/

憎い奴を晒すスレ

【ボッタ】サミー777嫉妬怨恨デッチアゲ26【栗】
http://news21.2ch.net/test/read.cgi/slot/1177251554/

過去スレ関連==============================================
【真っ黒】777town ｴﾝﾄﾞﾚｽﾌﾞﾗｯｸ2【不滅】
http://game11.2ch.net/test/read.cgi/mmosaloon/1176375551/
DAT行き
http://game11.2ch.net/test/read.cgi/mmosaloon/1171985995/
http://game11.2ch.net/test/read.cgi/mmosaloon/1168954481/
http://game11.2ch.net/test/read.cgi/mmosaloon/1163171831/
http://game10.2ch.net/test/read.cgi/mmosaloon/1156950641/
http://game10.2ch.net/test/read.cgi/mmosaloon/1154190714/
http://game10.2ch.net/test/read.cgi/mmosaloon/1155100189/
http://game10.2ch.net/test/read.cgi/mmosaloon/1155608103/
=========================================================
チート・回避・設定看破・アプリバグ公開・スクランブルマクロ
どんどん書き込みましょう。 クレクレ君は荒れるので禁止。


スレ荒しは運営板に報告を。

2ﾀﾞyo！

乙

俺は勉強出来ないので
【出】５０００ウエンツ瑛士
【求】獣・亀頭マクロス
でおながいしまつ

マクロくれないと警察にすぐに通報するぞ。早く書き込めカス。

[壁]･m･) ﾌﾟﾌﾟﾌﾟ

うっぷしようかな

>>7
何を？
ﾏｸﾛ知らないくせに！

>>7 うっぷしようかな

くれくれ君、乙！

そんな事言うならうっぷするのやーめた（´,_ゝ｀）ﾌﾟｯ

にーらめっこしましょ
わーらうと負けよ

うっぷｐｐ

unload　you

猛獣王完成しました。欲しい人いる？
超獣王なんか仕様が変わったのか
プログラムを変更しなければ
長いから結構面倒ですか？

早くくれって以前から言ってるだろうがカス

>>13

猛獣王マクロちょーだい＾＾

猛獣補修完了

第３リールは黒判定だと取りこぼすね
というか、獣王の流用で簡単に作れます。

頑張って！！！！

>>16さん
[email protected]
にソースいただけますでしょうか？

>>16さん

よろしければ、頂けないでしょうか？
[email protected]

>>16さん
私にも是非お願いします

[email protected]

クレクレ共よ哀れだな…
猛獣くらい自分で作れよ…

>>17-19
unkokuekue

>>21
unkokure

>>21-22
おっ！　いいねぇ〜
ナイス　unkokue！！！

>>16
無事、勲章取れました
ありがとうございました

ありがとうございました。ウンコ食えとか言ってる奴はほしいくせに
強情はるクソオタ野郎だからいっさい教えないよ。

金太郎１２時間打ってストック切れってことに気づいたよ
クソサミタ

>>25
教えなくていいから
unkokue

>>26
気付くのおせーよ

ったくなんだこの流れはｗ
猛獣の清算重いなあ
自動清算再着席する時だけクロックupしたらちょっとは早くなるかな

よく考えたら再起動しなければクロックupできないじゃねーか





おれもunkokuu

金太郎でストック？

UWSCですけど、目押しを正確にするためにPEEKCOLORで
何点もポイント取るのは間違ってる？
たまに全然違うところで押してしまうのが気になる…。

正確な目押しができれば間違ってはないでしょ
処理が重くなっても動けばいいじゃん
仕事じゃないんだからね
ＰＣ環境の違いで一概には言えないけど
ほとんどの機種で目押しポイントは１点で済ませられると思う

>>31
どうもです。
ポイントを一点にし、取るポイントを変えたところかなり
正確になりました。が、目押しするのにたまに２，３周かかるように
なりました。難しいもんですね。もちょい頑張ってみます。
有り難うございました。

UWSCからVB2005に移行中のVB初心者です。
ランダムでボーナス目押し処理をしたいのですが
下記で書き方は合ってますでしょうか？
教えてくださいエロい人。

UWSC版------------------------*
SELECT RANDOM(2)
CASE 0
BIG目押し処理
CASE 1
REG目押し処理
SELEND

VB2005版-------------------*
Dim Rand As New Random( )
Dim Meosi As Integer = Rand.Next(1,1+1)

If Meosi = 1 Then
BIG目押し処理
Else
Reg目押し処理
Endif

>33
1〜2であるなら、Rand.Next(1,3)ね。

>820さん
さっそくありがとうございます。
1or2の場合はRand.Next(1,3)と書くんですね。
あと初期化を書かなくてはいけないみたいな
書き込みを見たのですが必要ですか？

>>35
初期化を書いてたのは、VB6でRandomize()ね。
VB2005の場合は、Dim Rand As New Random( ) でいいよ。
ただし、擬似乱数なので繰り返し動作の場合は、新しく作るのではなくて
動作内で何度も使用して下さい。
その辺の細かい理由が知りたい場合は、ぐぐって下さい。

>820さん
何度もありがとうございます。
細かい部分はもっとぐぐってみます。
何とか形になってきましたので
これからテストしてみます。

820さんはたぶん全機種作成されてるんですよね。
凄すぎです。私も今の超獣を乗り切って全機種を…。
また質問してもよろしいでしょうか？
本当にありがとうございました。

>>37
全機種・・・作ってませんorz
違う方向に走って、作り直してたりするわけで。
答えられる範囲であれば、どうぞ＾−＾

UWSでひたすら親父打ちしか作り切れていないんですがコインチャージ等を
回避したい場合、過去ログを参考に↓の通りしているんですが、実際に
窓が出るとMSGBOX2も出ずに止まります。（CPUがMAXに…orz）
昨日から悩んでいるんですが、何処が悪いのか教えて下さい…。

While TRUE
ACW(GETID("777タウン.net"))
MOUSEORG(GETID("777タウン.net"))
Select Status(GETID(GET_ACTIVE_WIN), St_Title)
MSGBOX("test2")
Case "コインをチャージする"
MSGBOX("test1")
Clkitem(GETID("コインをチャージする"),"はい")
Sleep(1)
Case "目押し"
Clkitem(GETID("目押し" ),"自動でドル箱を下皿へ戻す",CLK_BTN)
Clkitem(GETID("目押し" ),"コイン購入")
Clkitem(GETID("目押し"),"お願い")
Sleep(4)
Case "ドル箱を下皿に戻す"
Clkitem(GETID("ドル箱を下皿に戻す"),"はい")
Case "777タウン.net"
Sleep(0.3)
Selend

Normal_free()

Wend

ACW(GETID("777タウン.net"))
MOUSEORG(GETID("777タウン.net"))
While TRUE
に変更。
MSGBOX("test2")
Case "777タウン.net"
Sleep(0.3)
を削除。
構文を少し勉強した方が・・・。

>>40
有り難うございます。そんな盲点が…と思い修正後試してみた
のですが、やはり「Select Status(GETID(GET_ACTIVE_WIN), St_Title)」
の所で固まってしまいます（CPU使用率がMAXに…orz）

ただ、Windowを違うタスクのものと切り替えた後に戻すと
上手く動くのですが、上手くStatusを取得できていないんでしょうか…？

あれ…目押し機能は正常に動作した…。
コインだけが上手くいかないみたいです？

親父打ち連打も、ボタンが押せる状態になったら押す。みたいな感じにすると、
他の機種と同じ雛形が使えるよ。

やっとUW連打出来たのですが動作遅いです｡修正あればヒント願います
流れはこんな感じですか？
よろしくおねがいします

ACW(GETID("777タ
WHILE TRUE
B = 0
C = 0
REPEAT
B = GETID("コインをチャージする")
//IFB 0 < B
//BREAK
//ENDIF
KBD(VK_SHIFT,CLICK,0)//コイン投入
KBD(VK_UP,CLICK,300+RANDOM(300))//レバーON
KBD(VK_LEFT,CLICK,800+RANDOM(300))//左
KBD(VK_DOWN,CLICK,250+RANDOM(300))//中
KBD(VK_RIGHT,CLICK,250+RANDOM(300))//右
C = GETID("目押し")
UNTIL C > 0 OR B > 0
IFB B > 0
ACW(GETID("コインをチャ
//FOR Z=1 TO 9
// BTN(LEFT,CLICK,469,407,50)//コイン枚数UPボタン
//NEXT
BTN(LEFT,CLICK,538,414,50)//購入しますか？はいON
ELSEIF C>0
ACW(GETID("目押
BTN(LEFT,DOWN,635,214,50)//お願い押す
BTN(LEFT,UP,635,214,50)//お願い離す
ENDIF
WEND

ヒント

TOWN_ID=GETID("777タウン.net")
ACW(TOWN_ID)
MOUSEORG(TOWN_ID)
While True //ループ開始
// F12キー押下時に処理を停止させる
if GETKEYSTATE(VK_F12) then exit
// メイン処理(ウィンドウ名にて判定)
Select Status(GetID(GET_ACTIVE_WIN), St_Title)
// コインをチャージするウィンドウ表示時
Case "コインをチャージする"
Clkitem(GETID("コインをチャージする"),"はい")
Sleep(1.0) // 二重押し回避処理
// 目押しウィンドウ表示時
Case "目押し"
Clkitem(GETID("目押し" ),"自動でドル箱を下皿へ戻す",CLK_BTN)
Clkitem(GETID("目押し" ),"コイン購入")
Clkitem(GETID("目押し"),"お願い")
Sleep(1.0) // 二重押し回避処理
DEFAULT
//ACW(TOWN_ID)
// ドル箱を下皿に戻すウィンドウ表示時
Case "ドル箱を下皿に戻す"
Clkitem(GETID("ドル箱を下皿に戻す"),"はい")
//777タウンウィンドウ表示時
Case "777タウン.net"
Kishu() // 指定機種判別処理に飛ぶ (内容がわかる人は直接書き換えるのも有り)
Selend
Wend //ループ終了

過去スレに貼ってあったと思うけど
http://nullpo.vip2ch.com/upload.cgi?mode=dl&file=5366
押し順無関係ね　パス777

流石に貼るのはどうかと思うが…。

訴えますよ〜刑務所に一生入れましょうか？

押し順無関係なんかより
猛獣クレクレ

うｐしました
今から寝るので朝まで置いとくよ

どこやねん。

猛獣まだーーーーー？

超獣まだーーーーー？

押し順無関係まだーーーーー？

まだまだーーっ！


また金ﾁｬﾝ10かよ

獣王作るために私は土人になりますた

UPしてもいいが、どうせ動かせないだろｗ
少しは、脳みそ使えよ馬鹿。
大人しく、手打ちなり養分やってろｗｗ

そこの旦那
UPするなら今でっせｗ
ささ、ひっそりとUPどぞ

こっそり、lzhアップ。
動かし方は、自分で見つけれ。
場所？探してくだされ。
パス？イベント参照な。
昼終わったら、消しま〜。
がんばってね〜。

わかった　ちとまっとれ

うぷするなら、夜にしてくれよ
てか、夜にお願いします・・・

みつからないのです・・・・

いろんな所、探してな。
探せないだろうから、パス書いておく。
sami777
ま、がんばれｗｗ

ありがとうございました

>>63
ありがとうございました。
今、無事落とさせて頂きました。

だめです。みつからないのです・・・・

夜にうｐし直すからまってなyo！

わからんかった

夜までリロード繰り返しながら待ってる・・・

おお！今帰れないから夜たのんだぞ！

乞食を釣るのはおもしろいなｗｗｗ

＞おまえら必死だな！
はい、必死です。

＞乞食か？
ある意味、乞食です。

まじでUPしてたわけだが・・・
一応、アクセス数名あったよ。
落とせた人が存在してるなら、とりあえずおめでとう。

結構探したんだけどみつからない・・・

いいの。夜まで待てるから・・・

落としたのをうｐしてやろうか

うｐして欲しいけど、最初に揚げてくれた人にわるい・・・

>>77
おまいいいやつだな

>>73
おまえも偉そうにしてるけどどうせｸﾚｸﾚだろ？
人の作った物勝手にばらまくなよカス
はやくしねよ

猛獣マクロうｐしてやるけどどこがいい？　

http://nullpo.vip2ch.com/
ここでいいよ

本当にうｐしてくれるならね・・・・

>>80
ばーーーか！ｗ

うｐいらね　二度とするな

>>80
のところに猛獣うｐしてきたぞ！　passは知らん。自分で考えろ！まあこのスレ
の住人ならわかるだろ。unkoども

パスわかんねえよ！

落としたけど・・・最近の流行の言語？
これは・・・何かで変換するですか？それとも・・・・いじめ？

パス教えてよ

落としたけど、自分もpassは、知らん

VBでパチのアレジン作ってみたけど
右打ちの処理はどうやったらはいいの？
うまく動かない

自作自演して楽しむスレはここですか?

うん

>>85
wordでひらく

PASSはなんですか？

お願いします。
教えてください＞＜

破産しそうなんです・・・

>>92
破産すればいいだろ？
ここの住民はお前が死んでも誰も困らんｗ

いや、>>92が死んだら俺も死ぬ

>>94
じゃ、死ねば？

お前、条件すっ飛ばすようなマクロしか組めないだろｗ

>>92
正直、パスは、知らん。
でも、落としても良いこと無いよ。キャラクターは増えるかも？しれんが。

>>93
死んだらあなたの所に挨拶行きますね・・・・

ホントに落とせた奴いるのかみたいから↓にUPしてよ。

ttp://www.rupan.net/uploader/

だから、何度もパスは「知らん」って逝ってるでしょ

wordで開いたけど(´･ω･`)。。

pass:知らん　でエラー出るんだけど・・・

>>101
？？？TXT.UWS？？？

PASS = siran
unkokue

なにこのくだらないファイル

お前ら、ホントにおもしろいな。

猛獣王マクロマンコ猛獣王マクロマンコ猛獣王マクロマンコ猛獣王マクロマンコ

枕から直接もらえばいいのにねー

|￣￣￣￣￣￣￣￣￣|
| はい。次の方どうぞ! |
|＿＿＿＿＿＿＿＿＿|
　　　 ∧∧ ||
　　　 ( ﾟдﾟ) ||
　　　 /　づΦ

夜の帳が降りてまいりました　

（秘）
　　　　　　　　　　　　　　　　　　　　　　　　　　　　 　 Ｈ１９．４，２６
ホールオーナー各位
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　 �潟潟ａ[●・こん●ろーる

貴社益々ご清祥のこととお喜び申し上げます。平素は当社サービスをご利用頂きまして、厚く
御礼申し上げます。
さて、２３日に某テレビ局の報道により発覚してしまいました、ボナンザの遠隔報道におかれま
しては、既にご承知のことと存じます。
直後に某有名掲示板に取り上げられ、３日経過した現在も、騒ぎは一向収まる気配はない状況
であります。
ＧＷ前を目前に、貴ホールにおかれましても、大変、心苦しいことと存じます。
現状におきましては、この騒ぎを沈静化すべく、当面の間、当社システムをご利用の際、下記
の点を厳守の上、操作されますようお願いいたします。
�@「確５」の連続クリックは２回を上限とし、同時クリックは１５台に１台以下とする。
�A（「確３」＋「確１」）×２＋「確２」を標準とする。
�B「制限１２０」の連続クリックは２回のみとする。その後は「制限６０」以下とする。
�B「制限６０＋制限３０」×２ループ＋「制限１２０」を標準とする。

ボナンザ事件におきましては、当社システム利用マニュアルの不徹底から生じた不手際であります。
貴ホールにおかれましては、利用マニュアルの社内周知徹底され、二度と不祥事を起こさぬよう、何卒、よろしく
お願いいたします。 　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　敬具
【2007.4.23】日テレが遠隔操作摘発を報道 5
http://money6.2ch.net/test/read.cgi/pachi/1177831203/

お昼からずっとリロード繰り返してるんだけど・・・・
まだ暇にならないのかな・・・

猛獣で例えば
SELECT　TRUE
CASE　ボタン全部青　ナビ（赤７　緑７　ダチョ）
（赤７　緑７　ダチョ）目押し←キー
CASE　ボタン左赤　中青　ナビ（赤７　緑７　ダチョ）
（赤７　緑７　ダチョ）目押し↓キー
CASE　ボタン左中赤　右青　ナビ（赤７　緑７　ダチョ）
（赤７　緑７　ダチョ）目押し→キー
で組んだのですが
でたまにすっ飛んで左より先に中や右を押しちゃう事がある。
獣も上の構成でつくって問題なかったので猛獣でもと同じだと思ったんだが・・
ボタンの色見てるのに・・
ボタン見る前に長めのスリープ必要なんでしょうか？
消化が落ちそうなんで、ワンキーにしてみたら問題ない様子。
獣や猛獣はワンキーを使うとまずい気がしたんだけど

>>111
その時間でマクロ作れるだろｗ

>>112
獣は今でもリプレイで固まるのかな
ワンキーでもリプレイ揃った直後にsleep入れれば大丈夫よ
猛獣はいろんなところで固まるけど何が原因なのかわからん
ワンキーで問題なければいいんでね

今、猛獣マクロ作ってんだけど
猛獣の目押しの色がうまく取れないＺＯ
みんなどこで色取ってるの？

>>115
俺は各７の左隅で取ってる

>>116 即レスthx
左隅って全部黒じゃない？
色つき部分なら完全一致で色取ってる？
うーむ、なんか良いポイントないかな…

>>117
いや隅ってそこじゃなくて赤、緑、白の隅ね
完全一致ですると重くなるだけだし、アバウトでも一周で拾えるよ

>>118
そかー、まあ色々試してみるは
レスあんがとね


てか、まったく鯖に入らず試せない訳だが　orz

獣シリーズ定番のダチョウのシッポで取れるんじゃない。

>>120
なるほど！115じゃないけどそこなら間違いないね！
俺って観察力ないは・・

猛獣いる？

ちょうだい

くださいな

repeat
A=PeekColor(146,341)
右赤7目押し
B=PeekColor(146,379)
　 until ((A and $FF) > 160) and ((A and $FF00)/$100 < 35) and ((B and $FF) > 220) and ((B and $FF00)/$100 < 20)
sleep(0.03)
Kbd(VK_LEFT, DOWN,0)
Kbd(VK_LEFT, UP,50)

　 　repeat
A=PeekColor(252,341)
　 until ((A and $FF) > 170) and ((A and $FF00)/$100 < 40)
sleep(0.01)
Kbd(VK_DOWN, DOWN,0)
Kbd(VK_DOWN, UP,50)

repeat
A=PeekColor(358,341)
until ((A and $FF) > 170) and ((A and $FF00)/$100 < 40)
sleep(0.01)
Kbd(VK_RIGHT, DOWN,0)
Kbd(VK_RIGHT, UP,50)

緑7目押し
repeat
A=PeekColor(146,344)
until ((A and $FF) < 40) and ((A and $FF00)/$100 > 80)
sleep(0.01)
Kbd(VK_LEFT, DOWN,0)
Kbd(VK_LEFT, UP,50)

repeat
A=PeekColor(252,344)
until ((A and $FF) < 40) and ((A and $FF00)/$100 > 80)
sleep(0.01)
Kbd(VK_DOWN, DOWN,0)
Kbd(VK_DOWN, UP,50)

repeat
A=PeekColor(358,344)
until ((A and $FF) < 40) and ((A and $FF00)/$100 > 80)
sleep(0.01)
Kbd(VK_RIGHT, DOWN,0)
Kbd(VK_RIGHT, UP,50)

初歩的な質問かもしれませんが、教えてください。
ifb　とelseifはどういう違いがあるんですか？

ヘルプ嫁

VBで作れカス

elseってあたりでわからねえのか？

エレッセ？

黄金のナビが取れない・・・・
みなさんどこみて判断してますか？

★「777town.net交流広場」 http://777town.nusutto.jp/★　　お気軽にどうぞ！

>>134
ナビされた数字の下の方。

>>134
液晶でナビされた部分（緑ｘor赤ｏ）
他の演出で誤動作するから、左が赤で中が緑の時に左を押す・・・
のように2点で認識すると良い

>>136-137
助言ありがとうございます！
いろいろ試してみます。

旧北斗のDDTを作りたいのですが、第一停止に右ドラムのスイカを目押しするとして、
赤７の上のスイカと北斗の3個下のスイカを交互に目押ししたいのですが・・・・
スイカを限定すると北斗揃いが入ってるとき永遠に揃わないんですよね〜

>>139
ボヌス確定してから目押し処理入れれば？
それか毎回右下北斗ビタ。これで全役対応可

過去スレにあったパーツを切り貼りしながら作ってるんで、ボヌヌ確定後に、どうのこうの何て無理・・・
とりあえず、第1停止おやじ打ち仕様にしました。
時々、第1停止でスイカをこぼすけど、チェリーは確実に取れるようになった♪
ボヌヌも第1停止でフラッグ絵柄が停止したら、一発で揃う。
北斗って、チェリーこぼすと４チェか２チェか判らないから、ストレス貯まってたんだよね。

ほぼ、何となく・・・完成！！！

変則押しならﾁｮﾘこもしても２/４の判別はある程度可能

クソ下郎ども
俺様にマクロをくれないと永久的に社会に出てこれなくするぞクソ

漏れは、右から止めてるよ　
A=PeekColor(354,347)
　 until ((A and $FF) > 70) and ((A and $FF) < 85)
　　sleep(0.05)
Kbd(VK_RIGHT, DOWN,0)
Kbd(VK_RIGHT, UP,50)
sleep(0.1)

右上に７が停止すれば残りのリールも７目押し 左７目押しはチェリー付き７で

って 北斗作ったの昔だから忘れたｗ

自分も右から止める仕様にしたけど、右で狙う柄を決めると７・北斗の振り分けが出来ないから
第１停止はおやじ打ちにして、出た目によって中と右を止めるようにしたんだ。
でも、第１停止でスイカこぼすし・・・　あと、消灯演出考えてなかったから、アチャ！って言ったらおやじ打ちになる・・・

良くできた完成品のパーツ、誰か貼ってよ・・・

http://up.nm78.com/dl/13770.jpg
http://up.nm78.com/dl/13772.jpg

>>146
北斗絵柄　右下段ビタだとスイカとれなかったっけ？

ビタって言われても・・・何となく、その辺のちょっと手前くらいの目押ししか出来ないよ。
一週の周期わるコマ数だと違う所にとまるし・・・sleepを少しずつ刻んで調整してるけど
そもそも、北斗柄って右下段に止まる状態が滅多にないから、なかなか調整出来ないです。

>>149
中ｰ>右と押すと、通常は右上ベル（北斗か赤7下段）だから、
調整時だけ中押しすれば、北斗絵柄の右下段ビタの調整できると思うよ。

なるほど、ちょっと試してみます。
ちなみに、消灯演出も別に色を採ってるんですか？

ところで旧北斗って目押しの色はどの部分で取ってるの？

とりあえず、右は北斗絵柄とリプレイでとってるよ。
左ドラムは北斗と下のベルの2カ所でとってる。

正解はどこなの？

つーか 北斗ｲﾝﾃﾘ出たんでしょ？
ﾎﾞﾇｽ目押し機能追加されてないの？？

黄金神
押順ナビが全緑の時なんて
あったけ？

ハズレ引いたら緑で？だったはず

そうなんだ

ウンコ神マクロいる？
ナビとＢＢ中リプ外しまでは作ったが

>>158
もちろん、自作だろうな？

下さい

お願いします

捨てｱﾄﾞ晒してくれれば送るよ

>>162
よろしくお願いします。
[email protected]

自作？ どーゆー意味で自作？

>>162
お願いします

[email protected]

[email protected]
よろしく

[email protected]

どうぞよろしくお願いします

乞食がいっぱい。ほんとに送るわけねぇーだろ！
ばーか！！！

しゃーねぇなぁ
俺がエロイのを詰め合わせて送ってやるよｗ

俺は信じてるけどね

>>162
お願いします
[email protected]

つーかUWSだけどいいの？

動けばなんでもいいです

>>163　165　166　送りました。

>>174
確認しました。
ありがとうございました。

[email protected]お願いします

>>167　171
送りました。

>>175　ボヌス目押しも簡単だから挑戦してみてわ？

>>177
確認致しました。
どうもありがとうございました。

終了します。

>>177
頑張ってみます。

DDT部分のワンキーは簡単な謎解きでしょうかｗ

オイラにも下さい。

そこらへんは時間がなく適当な作りになってるので・・・ｗ

[email protected]

おねがいします

176=160なんですが駄目でしょうか？

fb (PeekColor(711, 492) and $FF) < 150 and _
(PeekColor(711, 492) and $FF00) / $100 > 80 then

elseif (PeekColor(714, 493) and $FF) > 150 and _
(PeekColor(714, 493) and $FF00) / $100 < 50 then

パチンコ北斗で一番よく回るポイントって、ここであってますか？
・・・・どこが一番良いか、試した人います？

fend
//俺の自演ここまで-----------------------------------------------------------

自演乙ｗｗｗ

追記 ﾌﾙｳｪｲﾄで回すので皆さん回転数には気をつけてください。

しまった(;´Д`)乗り遅れた

>>158様 もう一度送ってもらえませんか？ よろしくお願いします。(>人<)

>>177さん
ありがとうございました

そろそろ本スレから馬鹿が湧いてきますよ

[email protected]
よろしくお願いしますm(__)m

>>191
こういう馬鹿がいるから、うｐとかメール提供はやめろってなるんだよ。
クレクレ君達、わかりましたか？

マクロってサイト作ってフリーソフト感覚で配布するとサミタから警告くるかね？

もう一度、神来てくれないかなぁ

金払ってもいいからマクロほっすぃYO!!!

>>194
そういうのはやめてほしいな・・・

おまえら全員ＢＡＮするからな覚えとけ

もう一度、神来てくれないかなぁ

金払ってもいいからマクロほっすぃYO!!!

早くうｐしろよ カスどもが

今もUWSC使ってるけど、ＶＢに移行した方がいいかな？
ここの住民はどのくらいがＶＢに移行済み？
みんな教えてくれ。

早くうｐしろよ カスどもが

>>194
対策強化or損害賠償訴訟の可能性有り

>>200
VB2005使ってます。
まだ、使われてる方自体は、少数だとは思います。

[email protected]
欲しいです！もう遅いかな？

820氏さま　ありがとうございます
ＶＢ2005　Express Editionって無料なんですね。
がんばって移行してみます。

[email protected]

どうか頂けませんでしょうか？お願い致します。

節操の無い馬鹿な乞食にばら撒けば対策される可能性が
増える事も解らん馬鹿にでもマクロって作れるんだな。

あ、もしかして何か面白いカラクリでも付いてますか？ｗ

乞食どもはクレクレ言ってるうちは可愛いが、貰えなかったりすると>>191みたいなのが
本スレに貼り付けてくるからな。

無能な乞食はスルーに限る。

去年の夏頃だっけ
ソースぺたぺた貼り付けた馬鹿がいてこのスレ盛り上がってたなあ
その直後に規制入ったのがなつかしい

ここの住民は閉鎖的だよな

たががマクロでうだうだ

腐ってまつね＾＾

と無能な乞食が吠えてます

>>162
ありがとうですた＾＾

>>211

　　　　　　　　　　　　＿＿＿
　　　　　　　　　／ノ^,　　^ヽ＼
　　　　　　　　/ (○） 　（○）　ヽ
　　　　　　　/ ⌒（__人__）⌒::: ｌ
　　 ⊂￣ヽ＿|　　　|r┬-|　　　　|　
　　　　<_ノ＿ ＼ 　 `ー'´ 　 　／ ﾌﾟｷﾞｬﾌﾟｷﾞｬ━━━
　　　　　　　 ヽ　　　　　　　⌒,
　　　　　　　 /＿＿＿_,､ノ　/
　　　　　 　 /　　　　（＿_／
　　　　　　 （　　（ 　　（
　　　　　　　 ヽ__,＼＿,ヽ
　　　　　　　 (＿／(＿/

ココの本来の目的は各人で作るための情報交換じゃないのか？

無能なクレ厨に餌与えてたら、そいつらはいつまで経ってもクレ厨だｗ
そしてこのスレもいつまでも家畜の餌場だよｗｗ

貰ったのそのままじゃ動かないよ

>>215
ほら・・・始まった。
無能なヤツはおとなしくインテリ使え。

苦情を言ってるわけじゃないんだがな

３月の規制強化アナウンスでびびってた屁タレが
今になって調子に乗ってるのかな？かな？
ほどほどにしとけよ

配られたのはUWSC？VB2005？

>>219
良く嫁。

ったくよー、人のこと乞食乞食言ってるけど
マクロ作ってる奴だってフリーソフトでただで作ってるんだろ？
ケチくせえこと言わないで提供してくれよ。欲しい奴沢山いるんだからさ。
同じゲームしててマクロ使う奴と使わない奴がいるのって不公平だと思わない？

思わない

配布したの、そのまま使うと回転数が違いすぎて分かると思うよ・・・回転数落とすぐらいは各自考えてってさ

>>221
能力の差だよ。

これほどクレクレに優しいマクロスレなんて他に見たことない
普通クレクレなんてスルーだろ
クレクレ枕増殖→規制→糞アプリがさらに重く→一般人に迷惑→枕への不平不満・・・
配ってる人はそんなこと考えたりしないのかい？

しない

>>225
同意だな。

考え無しだからホイホイ配るんだろ。
そのうち、頭を使わずただ貰った奴の中から「マクロ買いませんか＾＾」とか言い出す馬鹿が出るよｗ

マクロ組めるからって得意気に話すﾈ

>>228
サミタ内で募集したらバレて垢BAN喰らうだろうから、
ヤフオクとかの外部で募集するんじゃね？
そうなったらマジで終わってるな。自分が作った訳でもないのに、それで金稼ごうとか・・・

犯罪者同士仲良くやろうぜ

このスレ優しい人多いNE☆

キモッ

マクロ組めないからって僻むﾈ

俺のは、有料版です。
そっち系なものですから、正規版です。
UWSC・VB2005Expressは、無料ですけどね。

>>221
まるで中国人のような考え方ですね。

昨日の黄金神ﾏｸﾛ凄い

楽勝万枚いけました 本当にありがとうございました。

これからは自分で組める様に勉強してみます。

第二弾いる？
盲獣ﾏｸﾛ捨てｱﾄﾞ晒してくれれば送るよ

238さんほしいです。
[email protected]までお願いします。
昨日の黄金神も出遅れたので頂けるとありがたいです。すみませんがお願い致します。

>>238
よろしくお願いします。
[email protected]

>>238
宜しくお願いします。
[email protected]

お願いします
[email protected]

>>238

>>225
>>225
>>225

>>238さん
昨日のは乗り遅れてしまいました。
[email protected]
までお願いできますでしょうか？

>>238
[email protected]
お願いします

これなら偽配布で入れ食いだなｗｗ

kojiki shine

>>238
お願いします
[email protected]

>>238
まだ間に合いましたらよろしくお願いします
[email protected]

まじでこういうのやめてくれないかなー？

ただの釣りだろうな
明らかに違う人っぽいから

乞食どもは釣ってやれば、何度でも間抜け面でメーラーのリロードを繰り返すよｗ

お願いします
[email protected]

　　　　　　　　　　　　　　　　　　　　　　 ,
　　　　　　　　　　　　　　　　　 　 　　,／ヽ
　　　　　　　　　　　　　　　　 　 　 ,／　　　ヽ
　　　　　　　　　　　 ∧＿∧　　,／　　　　　　ヽ
　　　　　　　　　　　（　´∀｀）,／　 　　　　　　　 ヽ
　　　　　　　　　　　（　　つつ@　 　　　　 　　　　　ヽ
　　　 　 　 ＿＿　 ｜ ｜　|　　　 　　　　 　　　　　　 ヽ
　　　　　　|――|　（_＿）＿）　　　　 　　 　　　　　　　　ヽ
￣￣￣￣￣￣￣￣￣￣￣￣|　　　　　　　　 　　　 　　　ヽ
／⌒＼／⌒＼／⌒＼／⌒＼|彡~ﾟ　゜~ ~。゜　~ ~　~ ~~　~ ~~　~ ~~　~~　~~
⌒＼／⌒＼／⌒＼／⌒＼／⌒＼彡　〜　〜〜　〜〜　〜〜　〜　〜

　 　∩＿＿＿∩　　 　　　　｜　　　　　　　　　　　　, '´l,
　　 | ノ＼　　　　 ヽ　 　　　　| 　　　　　　　　, -─-'- 、i
　　/　　●゛　　● |　　 　　　| 　　　　 　_, '´　／ 　　　　ヽ、
　 |　∪　　( _●_)　ミ　　　　 j 　　　　iニニ,　"●　∪ 　　　ヽ、
　彡､　　　|∪|　　 |　　 　　>>238　　iニニ、_　　　　　　　　　 ',
/　　　　 ∩ノ ⊃　 ヽ　 　　　　　　　　　　〈｀'ｰ;＝=ヽ、〈ｰ- 、 !
(　 ＼　／ ＿ノ　|　 | 　　　　　　　　　　　 ｀ｰ´　　　　ヽi｀ヽ iﾉ
.＼　“　　／＿＿|　 | 　　　　　　　　　　　　　　　　　　　　 ! /
　　＼ ／＿＿＿ ／ 　　　　　　　　　　　　　　　　　　　r'´、ヽ
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　｀´ヽノ

お願いします
[email protected]

釣りでした

>>238
確認しました
どうもありがとうございました

よろしくお願いします
[email protected]

[email protected]
よろしく

a

おまえらいい加減にしろ

>>238さん
ありがとうございました

a

確認って、乞食は悪意あるコードが入ってないかまで確認できるのか？ｗ

サラ金くれ

つSBI

【出】
�@ダブチャゴールド＆シルバー
�Aダブチャインテ
�B北斗インテ(在庫2)
�Cヒャクマントンインテ２枚セット
�Dマッハインテ４枚セット
�EハロサンMインテ２枚セット
�FニューパルFA11枚セット
�Gｴｲﾘやんインテ
�HアラAインテ
�IHbインテ(在庫3)
【求】
�@共通最高10枚
�A共通最高5枚＋設定確認
�B共通最高8枚
�C共通最高6枚＋設定確認
�D共通最高9枚
�E共通最高5枚＋設定確認
�F共通最高3枚＋設定確認
�G共通最高3枚＋設定確認
�H共通最高3枚＋設定確認
�I共通最高5枚

検索ヒントお願いします。

↑間違いました。すみません

よろしくお願いします
[email protected]

>>268
微妙に高い

a

昨日のは乗り遅れてしまいました。
[email protected]
までお願いできますでしょうか？

[email protected]
よろしくお願いします。

[email protected]
お願いします！

未だに釣れとるのか

餌持ちの良さにﾜﾛﾀ

アドレスは捨てアドでいいですが、勲章数50以上の本垢のHNもつけて申し込んでください。
白アバは不可です。

>>278
ごちゃごちゃ言わずにさっさと出せよ！

>>278
全角小文字　ｗ　で検索願います。

>>278
そのマクロはUWSCなのでしょうか？

>>279
あなたはお断り

>>281
そうですよ。

>>278
っていう事は、お前のHNも晒せよな。
どうせ本垢判明させて、マクロ使いという事でサミタに通報でもするんだろ？
卑怯なんだよ。

>>278
ぷーとで検索お願いします

>>284
嫌ならいいです。

言うと思ったよ。

なにこの流れ

クレクレウザス

マクロ使いたいなら自分で作れ
作れないなら欲しがるなカス

サミタの奴もここ見てるんだろ？
UWSC使ってるのは判断出来るんだから
UWSC使ってる奴は全員垢BANしろよ

マクロ組めない方はこちらへ
　サミタ真っ黒初心者質問スレ　その1
http://game11.2ch.net/test/read.cgi/mmosaloon/1177652183/l50

基本的なことはここで勉強してください。
Ｖisual　Basic 中学校
http://homepage1.nifty.com/rucio/main/main.htm

じゃ、オイラほんの少しマクロ組めるようになったんで↑に移動するよ。
先輩方も時々見に来てね。

いやあ、マクロって本当にいいですね

マクロ使ってる奴からみればガチャで金使ってる奴とか
もうアフォかとｗｗ

全機種対応版VBマクロうｐしといたよ
一時間後には消します
場所とパスは秘密です
わかった人だけおいしい思いして下さいｗ

>>296
確認しました
ありがとうございました

>>296
落とさせていただきました。
ありがとうございます。
でも、使い方がわかりません。

おまいら…ｗｗｗ

>>296
自分も使い方がわかりません。
これをどうすればいいんでしょうか？
PC初心者なのですいません。

>>296
お願いします。ガチャやりすぎて破産しそうなんです。
VBも勉強するつもりです。

　　　　　　　　,．-─ ─-､─-､
　　　　　　, イ)ィ　-─ ──- ､ﾐヽ
　　　 　 ノ ／,．-‐'"´ ｀ヾj ii /　 Λ
　　　 ,ｲ／／ ^ヽj(二ﾌ'"´￣｀ヾ､ﾉｲ{
　　 ノ/,／ミ三ﾆｦ´　　　　　　　 ﾞ､ﾉi!
　　{V /ミ三二,ｲ　, -─　 　 　 　 Yｿ
　　ﾚ'/三二彡ｲ　 .:ィこﾗ 　 ;:こﾗ 　j{
　　V;;;::. ;ｦヾ!V　　　 ｰ '′　i ｰ '　ｿ
　　 Vﾆﾐ( 入　､　　 　 　r　　j　　,′
　　　ヾﾐ､｀ゝ　　｀ ｰ--‐'ゞﾆ<‐-イ
　　　　　ヽ　ヽ　　　　 -''ﾆﾆ‐　 /
　 　 　 　 |　　｀､　　　　 ⌒　 ,/
　　　 　 　|　　　 ＞ ---- r‐'´
　　　　　　ヽ＿ 　 　 　 　 |
　　　　　　　　　ヽ ＿ ＿ 」

　　　　　ウプレカス [ Uprecus ]
　　（ 西暦一世紀前半 〜 没年不明 ）

ウプレカス[Uprecus]
（西暦１世紀前半〜没年不明）

ローマ帝国の思想家。（元軍人の説アリ）
当時帝国により厳重に秘匿されていたあらゆる伝統技術の開放を訴え、
ローマ市内で市民や外国人、奴隷達を煽動して暴動を起こした。
その為に帝国から疎まれ元弟子のコニウプにより毒殺（暴動の罪で処刑、
地雷で爆殺説など諸説あり）されるが、彼の名は後世まで受け継がれ、
自由を愛する文化人や思想家などに親しまれ続けた。
インターネット上でアップロードを求める際に「うｐれカス」と叫ばれるのは
ウプレカスの名前をもじったものであり「総ての文化を開放せよ」と彼の思想を
踏まえた上での発言かと思われる。(ふたば書房『ウプレカス伝』)

>>296　の釣りに騙されるな

　　　　　　､ヾ:;:::::::::::::::::::::':::::::-､
　　　　 ､ﾐ::::::';:::::::::::::::::;';:::::::::::::::::ヾ、
　　　　i':::::::::::::::::::::::::::::::::::::::::::::::::::::::ヽ
　　　 ミ:::::::::::::::::;:;;::::::r -‐'''"'ヽ::::::::::!;!
　　　　 ﾐ::;r--‐'　 ｀ヾ　　　　　ﾐ::::::::::i
　　　　 .l::!　　　　　　　　　　 ;.:ﾐ､:::;::::l,r‐､
　　　　　ヾ　　　　　　　　　_,......::::/'ヾ:::: ;.!
　　　　　　 !　　　　　　.::'r t.j;､:::/::::　::' ' !
　　　　　　　i.llir_,=:ll!,.- :l:. ::::'::',!:::::::; ...!-'!:ヽ
　　　　　　　 _! `｀´' l!　' ,`−´　.::::: ::::::::l:::::::｀:::
　　　　　　　　ヾ ‐ '´;　　,ｨ:.,　 　 .::::::::::::l:::::::::::::
　　　　　　　　　ヽ　 ,r';';":;:::";';;! ..:::::::::::/:::::::::::::
　　　　　　　,r::::::::ヽ ''-''.二-‐'"..:::::::::;:::::::::::::::::::
　　　　　　/::::::::::::::::::::ヽ、 __,...::::::::::;:::::::::::::::::::::::
　　　　　 l:::::::::::::::::::::::::!　/::::!:::::.　/::::::::::::::::::::::::
　　　　 /:::::::::::::::::::::::::l ./::::::::ヽ　/:::::::::::::::::::::::::::

　　　　　　　　　ツ・レタ [Ｔ .Reta]
　　　　　　　　　　（1940〜　ウガンダ）

酷い どこ探しても無いジャマイカ orz


ちなみに動かないのはキーボードのｾﾃｰｲが違うからｗ ｻﾐﾀ側のｾﾃｰｲを変えたら動くよｗｗ

>>296様
是非お願いします
[email protected] までお願いします_(._.)_

こっちで美味しいモノくれる人が居るって聞いて、初心者スレから帰ってきました。


早く頂戴♪

　　　　　　　 ,,ィ≦ﾃ三三テ≧ｭ- ､
　　　　　 ィ州iｉ} |!{ヾ((（ヾ（((ハ三ミミ ､
　　 　 〃/ﾉﾉﾘ　|ヽ..＿ノヽ　　　}}ミミミﾐh､
　　　 〃//〃　 |　　　　 　ヽ＝ﾉ ;'⌒ヽ}}ﾐl､
　　　,}}| 川|{ 　 ﾉ　　　　　（(⌒ ノ　　 　 }}}li
　　 /川||}!}ｉ|　　　　　　　 　 ￣　　　 　 }州
　　 ﾚ　{!州!|　　 　 ,x‐ ￣ ヽ　　 ,.z=＝〃/
　　 l!（ ﾘﾉ川　 　 　 <( ハ〉 ﾉ 　 { ,ィTヽ /
　　 ﾄｖｿﾉ}}ﾊ)､ 　 　 　 ￣ ノ　 　 ｌ ｀￣　{
　　　)）ﾄ〃 }|::ヽ　　　　　 　 　 　 i 　 　 ′
　　　 /ﾉ》州}}｝ｨ::､　　　　 ｲ　　　 l　　 ′
　 　 （(∧　 州}ｿ,ﾉ　　 ／　｀ = _ノ 　 ′
　　 　 }　 ＼　 ヾｨ　　　 ﾉｰ- __ -　 ,'
　　　 ′　　 ＼　 ｀　、　 　 -‐-　 ｲ
　 　 ′ 　 　 　 ＼ 　 ｀ 　 ＿_ ,／ l
　　 ′　　　　　 　 ＼　ヽ　　 　 　 |

　　モーネ・アホカト[Maulnen Ahoccato]
　　　　　（1666〜1738　フランス）

超獣は機種依存するから そのままでも動くマクロ組んだ人居るのか？

鳥獣、そんなに機種依存度高くないだろ
どんなクソマクロだよそれｗ

つーか、機種依存って…
自分のマシンでさえ動けばいいじゃんｗ

>>311 じゃ目押し部分一部公開してみろよ 検証するからさ

何ならこっちも出すしｗ

機種依存といえばサラ金もあるね
リールの回転速度がちがくね？

>>313

Do While i < 900
lngHdc = GetWindowDC(TownHwnd)
Sleep (1)
lngPkColor = GetPixel(lngHdc, 439, 362)
iret = ReleaseDC(TownHwnd, lngHdc)
If clrRed(lngPkColor) > 200 Then
Exit Do
End If
Sleep (1)
i = i + 1
Loop

超獣のナビ矢印がたまに消えるの直せよクソサミタ
おかげで矢印消えたら鯖処理に飛んでしまうじゃないか・・・

ついでにボタンの色も消えるから空打ちするし ＯＴＬ

http://wktk.vip2ch.com/upload.cgi?mode=dl&file=28489

パスは秘密です

うんこくえ

>>317
全機種揃っててびっくりです！
どうもありがとう！！！

>>313
この処理で３種類のＰＣで問題なく色取れてるよ
この下のステップのsleep値はあえて書かなかったけど

で、君のソースは？
ちなみにUWSCは興味ないんでVBでよろしく

>>317
無事落とせました！
これでもうガチャやらなくてすみそうです
本当にどうもありがとうございました

>>320
ウィルスバスター？

>>322　　(ﾟДﾟ)ﾊｧ?

パスワードがわかんねー　ヒントお願いします

>>322
>>322
>>322

ほんとに全部あるじゃんｗ
ありがとう！

　　　　　　　　　　　　__, --──−､_
　　　　　　　　　　 ／::_, -‐─ ‐-､_::::`‐-､
.　　　　　 　 　 　/::／　　　　　　 　`‐i:::::::ヽ
　　　　　　 　 　 |:./　　　　　　　　　 　',ﾐ::::::}
　　　　　　 　 　 }:l　　　　　 　 　 　 　lﾐ::::::l'
　　　　　　　　 _!,'_　,..-- ..、　　 _＿　!::::::::|
　　　　　　　　lヽ! `i ィｪｯ､.i'ﾞ"i';;;ｨｪｯ;,`i===,､
　　　　　　　　 ',.l　 ﾞ､ﾞﾞﾞﾞﾞ,ノ　 ヽ_"ﾞﾞ ﾞ/ ｒ;;;;;;/
　　　　　　 　　 i|　 　￣,'　 ::::ヽ `''" .,{;;;;;;/
　　　　　　 　 　 ',.　 　　ﾞ`-"゛''　　　,};;;;;;'
　　　　　　　　　　!　　 ,＿､,＿__, 　/;;;/"
　　　　 　　　　＿,` ､　　　　　　　/;;r'
　　　_,, -─ '';;;;;;;;;|　､ヽ,,_＿__,,-‐';;;;;;;;;;;＼_
　　　;;;;;;;;;;;;;;;;;;;;;;;;;;|　　＼　　　　_／/;;;;;;;;;;;;;;;`ヽ、
　　　;;;;;;;;;;;;;;;;;;;;;;;;;;|　　　r‐ｨt- '"　/;;;;;;;;;;;;;;;;;;;;;;;;;;
　　　;;;;;;;;;;;;;;;;;;;;;;;;;;|　　/,彡彡}　　,!;;;;;;;;;;;;;;;;;;;;;;;;;;;;

　　　　　　ツレマスカ　[Vladimir Tzlemazka]
　　　　　　　　（1915-1997　ロシア）

>>317
パスは「秘密」ですねｗ
まぁ「うんこくえ」ってでるだけの釣りですけどねｗｗｗ

釣りじゃない本物いくか

オイラは全機種なんて言わないから・・・猛獣と超獣と獣王だけで良いんで、お願いします｡

sleep調整だけで動くやつが希望です。

何て、言っても、もらえるはずも無いんだけど・・・

枕欲しければ
キングキャッスル�T
2Ｆ
181番
に ミニメしたら？
これは、明らかに枕だろ？

休みだし手打ちの可能性もある

マッハ級のテウチストだろ。目押し不要だし。

>>331
回転数が・・・・・
女医でも可能ですが・・・
それがなにか・・・・

>>316
俺もその症状に悩んでたんだけど、非力なノートPC(オンボードグラフィック)
で超獣起動したら、チラつきゼロ。マクロも誤作動ナシだったよ？

>>335

ください。

>>332-334
本人乙

パスのヒント、お願いします。

http://wktk.vip2ch.com/upload.cgi?mode=dl&file=29889

UWSC今日から勉強中なのですが記録させた↓を再生しても動きません
何故ですか？

ACW(GETID("777タウン.net"),384,6,806,706,0)
BTN(LEFT,DOWN,673,227,15)
MMV(673,227,15)
BTN(LEFT,UP,673,227,172)
MMV(673,227,250)
MMV(673,227,703)
MMV(673,227,297)
KBD(VK_3,CLICK,984)
KBD(VK_UP,CLICK,1594)
KBD(VK_LEFT,CLICK,1016)
KBD(VK_DOWN,CLICK,390)
KBD(VK_RIGHT,CLICK,406)
KBD(VK_3,CLICK,1141)
KBD(VK_UP,CLICK,766)
KBD(VK_LEFT,CLICK,1593)
KBD(VK_DOWN,CLICK,438)
KBD(VK_RIGHT,CLICK,344)
KBD(VK_3,CLICK,750)
KBD(VK_UP,CLICK,719)
KBD(VK_LEFT,CLICK,1062)
KBD(VK_DOWN,CLICK,344)
KBD(VK_RIGHT,CLICK,375)
MMV(649,237,984)
MMV(595,253,16)
MMV(540,257,16)

>>339
パスは何ですか？

>>340
君は才能ないから帰っていいよ

>>341
ヒントは乞食です
しばらくしたら消します

>>343
まったく解らないんですが・・・
もう一つヒントを・・・・

ぜんぜん解らない・・・・

おまえら、いい加減気付よ。
釣られてあそばれてることにさぁ〜。
そんな暇あったら、自分で作れるように努力しろよな。

釣られて遊んでるんだからほっとけ

ヒント解りずらいのですが・・・
もう少しヒントくれ

再配布しないなら俺の自作マクロあげてもいいが・・・・
新機種出てもサポートはしないけど

>>349
やめとけ！

>>349
お願いします。

オイラは絶対に再配布しません。
宜しくお願いします。
[email protected]

再配布は断固しません。
[email protected]
までお願いできますでしょうか？

再配布しないのでお願いします！
[email protected]

>>349
[email protected]
お願いします
サポート無くても平気です。

>>349
乞食に餌与えないように。
マクロスレじゃなくて乞食スレになるだろ。

再配布しないのでよろしくです

[email protected]

是非お願いします
[email protected] まで

再配布しないのでお願いします！
[email protected]

なんだよこれｗ
呆れるわ。

>>349様
必ず再配布しないと誓います。
[email protected]
までお願いいたします。

まぁ文章だけなら何とでも言えるわな

死ぬまで口外しません！
棺おけまで持って逝きます！

[email protected]

　　　　 -ーー ,,_　　　　
　 　r'"　　 　　　`ヽ,__ 　　　　　　
　　 ＼ 　　 　　 ∩／￣￣ ヽつ
　 ノ￣＼ /"ヽ/ " 　　ノ　　 ヽi 　　 　神様！
　|　 ＼＿)＼ .＼ 　　 ＞ 　＜ |＼　　
　＼ ~ ) 　 　 ＼ .＼_　　( _●_)＼_つ 　
　　 ￣ 　　 　　 ＼＿つ

消えた・・・・・・がんばってたのに・・・・

>>349
釣り宣言マダー？

[email protected]

お願いします

これほどクレクレに優しいマクロスレなんて他に見たことない
普通クレクレなんてスルーだろ
クレクレ枕増殖→規制→糞アプリがさらに重く→一般人に迷惑→枕への不平不満・・・
配ってる人はそんなこと考えたりしないのかい？

しない

>>369
おまえは作成能力がもともとないから、聞いてないよ。

この流れはやめようぜ

不正者同士仲良くやろうぜ

作成能力のないクレクレ共とは仲良くできない

本スレやBL？すれが伸びずにここだけが
伸びてるって事は、ほとんどの人間が　ここ張り付いているんだろうな。

本格的規制、漂白、BANはそろそろだろうな・・

頼むから、漂白、BANなってもスズメバチの時みたいに
暴れないでくれよ！

おとなしく引退でもしてくれよ。

>>374
このスレは少人数の自演で成り立ってます

Q＆Aスレと離別したらカスしか残ってないねw

>>315
こんなソース書いてます。
Using Class1 As New ColorSeparat
Do
MyAPI.Sleep(5)
Class1.Sethdc()
ii += 1
Loop Until Class1.GetRed(x1(botton), 350) = 0 Or Class1.GetRed(x2(botton), 350) > 160 Or ii > 200
End Using
7を探す奴ですね。

再配布しないのでお願いします！
[email protected]

>>375
確かに自演だろうね。
伸びない日はまったく伸びないよな。
一人で数個の捨てアド貼るほど必死な奴がいるんだろうなｗ

マクロ組めない方はこちらへ
　サミタ真っ黒初心者質問スレ　その1
http://game11.2ch.net/test/read.cgi/mmosaloon/1177652183/l50

基本的なことはここで勉強してください。
Ｖisual　Basic 中学校
http://homepage1.nifty.com/rucio/main/main.htm

[email protected]へ

マクロ組めない方はこちらへ
　サミタ真っ黒初心者質問スレ　その1
http://game11.2ch.net/test/read.cgi/mmosaloon/1177652183/l50

基本的なことはここで勉強してください。
Ｖisual　Basic 中学校
http://homepage1.nifty.com/rucio/main/main.htm

乞食って哀れだね

>>377
なんと820先生様じゃないですかｗ

sleep(5)のループ200で取得ミスないですか？
200までのループだと抜けちゃうような気もしますが…
まあ処理時間無視でsleep(5)ｘ200ならリール一周分にはなるけど。
ちなみに私が作る時にデバッグした時はループカウントが
350くらいでヒットする場合も割とあったりしますが、この辺は
グラフィックボードの性能差なのかな

早くウップしろや
カス!!!!!!!!!!!!!

サミタが潰れようが俺には関係ないんじゃ!!!
早くマクロヨコセや!!!!!

マクロ使いを処分出来ねぇンだからマクロ公認なんだろよ
訴えられるのがこぇーのかよｗｗｗ
早くよこせや!!パソコンオタクのニート野郎!!!!!!

お前等のパソコン監視してるのに処分出来ないのは
お抱え弁護士に相談したらパソコン監視が不味いと言われたから
処分出来ねぇんだよｗｗｗ
ビビンねぇで早く公開しやがれ!!!!

サミタの住人が全員マクロ使いに成れば
サミタだってｲﾝﾃﾘデフォにスルだろうから
お前等だって一々マクロ造らなくて良くなるだろうが!!!!!!!
早く公開しやがれ!!!!!!!!

オレのはVC++なんだが。

>>389に同意します。
みんなに教えてあげるべきだと思います

UWSC検知されて漂白された奴なんかいねぇだろ!!!!!
サミタは監視だけで漂白なんか出来ねぇんだよ!!!!!!!
法律はよくわからんが訴えられたらかなりの確率で敗訴するから漂白出来ないとみたｗｗｗ

>>384
以前は、400ぐらいにしてたんだけど
特にミスないみたいだから、保険程度にしてます。
載せた奴は、コンテキストにコピーして使用するタイプですね。
何箇所も見る場合は、こっちを使用する方が負担が少ないかな。
微々たるものなのでしょうけど。

820グダクダ小難しい話してんじゃねぇよ!!!!!!!
お前だって不正者のくせして偉そうに書き込むなやゴミ虫野郎!!!!!
全てを公開してから発言しろや!!!!!!!

だいたい、ここの人間は態度デケェんだよ!!!!
お前等だって最初は聞いたりしたんだろうが!!!!!
自分で作れる様になったら神様気分かｗｗ
過去スレみたら普通にウップしてるじゃねぇかよ!!!!!
人から貰ったマクロを出し惜しみしてんじゃねぇよ!!!!!!!!!

この、偽善者野郎!!!!!!!!!!!!!!!!!!!!!!!!!!

書き込みの殆んどが自作自演のオンパレードで
人にマクロをあげる人は皆無じゃねぇかよ
大体、ソースだけじゃど素人には使い方すら解らんぞ!!!!!!!
使い方すら解らん調べる事も出来ない奴はスルーしてもいいが
マクロ欲しい奴にはウップしてやれよ！!!!!!!!!!

過去スレ見れないのでうｐお願します
参考にして自分で作ったりもしたいので

俺コボルで作ってるよ。

過去スレ読めないコジキは問題外だろうが!!!!!!!

一年ロムれ!!!!!!!!!

俺、フォートラン

　　　　　　　　　　　　　　　　／ ⌒ヽ
　　　　　　　　　　　 　 　 ／　　　　　 ＼
　　　　　　　 　 　 　 ,.-‐''⌒ヽ　　　,.=、　 ヽー、
　 　 　 　 　 　 　 ,〃／∠彡ニ＼ （.fゃ）　　|　 j
　　　 　 　 　 　 /　　 　 　 ミ彡三ヘ｀=´　　 |　｜
　　　　　　　　 /　　　　　　 ミ彡三∧　　　 j　./
　　 　 　 　 　 ト　ャ''"　　　　ミ彡三∧. 　 /／
　　　　　　　　」i　_;''＿,　　　 ミ彡'ニミヘ、 〃
　　　　　 　 　 リ　´￣　　　　 リ´ ｆ'｀ij }/「i|
　　　　　　 　 ヽ-　　　　　　　　　'´/ソ'川||
　　　　　　　　 ヽ一　　　　　　　「彡'川ll.|||
　　　　　　　　　 T 　 ＿　　　／ ´　ｊ||.川||
　　　　　　　　 　 ｀￣了、　　　　　i! 川.川|
　　　　　　　 　 　 　 _」.　＼　　　 |　j| 川|ト、
　　　　　　　　_／￣　 ＼　 ＼ 　 '_／./川　｀
　　　　　　 ￣　　　　　　 ｀　　 ￣　　´
　　　　　　　ネゴトワ・ネティエ［Negtva Netie］
　　　　　　　（ルーマニア．１９３５〜５４）

俺はベーシックだな

俺はカスタムだな

じゃあ俺はジャバで作るよ

俺はデルファイで作ればいいかな？

俺はhtmlで作ろうかと・・・

ファミリーベーシックで作ろうと勉強中
とりあえずマリオは動いたよ

言うに事欠いてhtmlで・・・・

>>408　ﾜﾛｽ

>>408
すまん、じゃあcssでガンガってみる・・・

>>410
レベル高いなおまいｗｗ

じゃあ、俺はﾌｫﾄｼｮｯﾌﾟで作ることにするよ

>>407
ファミリーベーシック知ってるおっさんが俺以外にもいたことに
ものすごく感動しているよｗ

>>411
いやいやフォトショの方がレベル高いってｗ

といいつつMSX2起動したから、今晩中に全機種マクロ組んでやるさｗ

>>413
MSXかー。
じゃあ作ったマクロをカセットテープにセーブして俺にくれよ

俺は作ったマクロをＦＬマスクで暗号化してうｐしようかな

穴が空いた紙テープみたいなのを読み込ませるやつが昔あったよな？

>>415
大昔のパチ屋でジェットカウンターからそのテープが出てきたのは記憶にあるよｗ
そのテープを読みこませる装置はさすがに自分では見たことがない。
ちなみにフロッピーが８インチの時代から業界人だけどねｗ

>>416が40代半ば過ぎってことは理解できた。

ある意味、このスレがサミタ関連で一番マッタリしてる。

>>416
あったあったｗ
そういえばジェッカウンターからパンチされた紙テープ出てきたね

88のCDOSで作ったマクロをVANにishでうｐ

>>415
あれはね、１列９個穴が空くようになってて、１列で１Ｂｙｔｅなの。
つまり、穴１個＝１Ｂｉｔね　最初の１個はゼロフラグ。

おれは、紙テープ読めるよｗ

大昔、テキストファイルの圧縮の定番って言われてた・・・・ほとんど使った記憶は無いけど。

そんなことより、糞ファイルをうｐしたナゾナゾ大会はまだ〜

　　 　 ,r'::::::::::::::::::::::;,';:::::::::::::::ヽ
　　　/::::::::::::::::::::::::::::;;';;;::::::::::::::::ヽ
　　 /:::::::::::::::::::::::r''´　 　 ｀ヽ::::::::::i
. 　 i:::::::::::::::::::::r'　　　　 　 　 i:::::::::l
　　!::::::::::;:::::::r' __　　　　　　 __!::::::::;i
.　 l:::::;:'::::::;r' '´ _,｀_ｰ:..　 .:''ﾆ､,,!:::::::::l
　 r:'::::::;:r:!.　　"`=' `　　 ' `´'' l::::::::::!
　 i::;ィ::::::i:l　　　　　 .:. 　 :. 　　 !::::::::ﾐ
　kli::::::::::::::i.　　　 　 :.　_,　'　　 .!:::::::!
　 lili::::::::::::::i. 　 　 .: ､.＿,..ィ　 /::::::::l!
　.lli!il:::::::::::::::ヽ.、　　` −´　r'::::::::::;l
. 　ll. l:::::::::::::::::::ヽ ‐ ､ __ ,.r':::::::::::ヾ´
　　 X:r､ミ:::::::::::::::i.　 　 !::::::::::ri:::::i `
　　,r'_ヾ:::::::::::::::::::::l　　 lj::::::::::l'ilil::::i、
r'r ―‐-､ヽ:::::::::::ミi､　　!:::::::::::::ミi:::li
.　　　　　 ヽヽ::::::::::ヾ..、　゛ヾ:::::ﾐヾ::!
.　　　　　 　 ヽﾐ:::::::::::ヾヽ.　 ヾ::::::/l!

　ナガレワ･ロス　[Nagarewa Ross]
　　　　(1968〜　アメリカ)

次から次へとよくわかんねえＡＡどっから持ってくるんだかｗ

ぴゅう太を買える裕福な家庭に生まれてたら
俺はクレクレにならくて済んだのに。。。

>>418
俺んちの近くのパチ屋は、穿孔テープ内容をもとに
ｵﾊﾞﾁｬﾝが電卓叩いて精算してたよｗ

あのテープは普通に数字が打たれていたから、誰でも読めたぞｗ

>>426
その紙テープじゃないｗ

VB2005で過去ログにあった↓を貼り付けるとエラーが出るんですが
原因わかる方教えていただけないでしょうか。

'アクティブウインドウのタイトル取得 UWSCのSTATUS(GETID(GET_ACTIVE_WIN),ST_TITLE )と同じ
Private Function GetActiveWindowTitle() As String
Dim lpString As String * 255
Dim lngResult As Long
Dim AWhwnd As Long
AWhwnd = GetForegroundWindow 'アクティブウインドウハンドルを取得
lngResult = GetWindowText(AWhwnd, lpString, 255) 'アクティブウインドウのタイトルを取得
GetActiveWindowTitle = left$(lpString, InStr(lpString, vbNullChar) - 1)
End Function

エラー１：ステートメントの終わりを指定してください。
エラー２：'Public Property Left() As Integer' には引数がないため、戻り値の型をインデックス化できません。

上手くGetActiveWindowTitle 出来たらコインチャージ処理等に行きたいのですが…orz

$

失礼しました。
エラー１は「* 255」で。エラー２は「Left$」で発生しています。

>>428
それはVB2005じゃなくＶＢ６以前のですな
ＶＢ2005に直すと

'アクティブウインドウのタイトル取得 UWSCのSTATUS(GETID(GET_ACTIVE_WIN),ST_TITLE )と同じ
Private Function GetActiveWindowTitle() As String
　 Dim lpString As New VB6.FixedLengthString(255)
　 Dim lngResult As Integer
　 Dim AWhwnd As Integer
　 AWhwnd = GetForegroundWindow 'アクティブウインドウハンドルを取得
　 lngResult = GetWindowText(AWhwnd, lpString.Value, 255) 'アクティブウインドウのタイトルを取得
　 GetActiveWindowTitle = VB.Left(lpString.Value, InStr(lpString.Value, vbNullChar) - 1)
End Function

>>431
ありがとうございます。
どうやら、Imports ステートメントを追記する必要があるみたい
ですが、頭が付いてこれなくなりつつあります…orz

>>431
VB = Microsoft.VisualBasic と、Microsoft.VisualBasic.Compatibility を
Imports したら上手くいきました。ありがとうございました。

>>433
頑張れよ

>>434
お前もな

うん。

第二弾はどうした？

ぬるぽ

UWSCなのですが記録させた動作を再生しても動きません
何がいけないのでしょうか？

ご指導お願いします。

>>439
どんなエラーが出る？
わかる事なら答えるよ
ここだと諸先輩方の迷惑になるから
http://game11.2ch.net/test/read.cgi/mmosaloon/1177652183/
こっちで。

>>439
最低限度、HELP読め
指導の前に、動かし方の基本も知らない奴に何を教えるわけだ？
ビデオの配線もやってなくて、録画できねーって言う馬鹿と同類ｗｗ

>>440　わかりました

>>441　HELP見ても良くわかりませんでした・・・・

使えない新人と同じセリフ書くなｗｗ
説明書・本読んでもわかりませんでしたってか？
わからないなら、わからない部分をまとめる。
自分がわからない部分が見えてくるから、それを調べる。
それでもわからない場合に要点をまとめて尋ねる。
いい加減、このぐらいやれ。

UWSCのHELPは親切丁寧だと思うけどねえ
あれでもわからんのか…

ギブアップさじ投げましたｗ

人生のさじも投げろｗｗ

すでに投げてる

猛獣マクロ使っても万枚いかねー

俺も投げてくるかな・・・

VB2005でUWSCでいうところの↓を実現したいのですが、keybd_eventや
SendKeys.Send　、SendInput 等でやる場合のサンプルコードを頂けない
でしょうか…。

Procedure Normal()
Kbd(VK_SPACE, DOWN,50)
Kbd(VK_SPACE , UP,50)
sleep(0.1)
fend

KeyEvent(Keys.Space, Down, 50)
KeyEvent(Keys.Space, Up, 50)
KeyEventがAPI。
読めばわかると思うけど、Downup=0 Down=1 Up=2
定数で宣言して使用しない場合は、そのまま数字でOKです。
sleepは、その場合不要です。
どうしてもしたい場合は、UPの50の場所を引数にして時間調整すればいいかと。

ちょっと言葉足らず。
Sleepが要らないというわけではなく、KeyEventの最後の引数が、処理待ちだから。
SleepのAPIを導入するのであれば、そのままSleep(100)でOKです。

>>450
答えを頂いたのに理解できず心苦しいのですが、keybd_event等ではなく
KeyEventというAPIは存在するのでしょうか？HELPで探してみましたが
それらしいものは見つからなかったので…。

ごめんね。ボケてたｗ
Private Sub KeyEvent(ByVal KEY_CODE As Byte, ByVal plCondition As Integer, ByVal plSleeptime As Integer)
Call Sleep(plSleeptime)
Select Case plCondition
Case 0
Call keybd_event(KEY_CODE, 0, 0, 0)
Call keybd_event(KEY_CODE, 0, &H2, 0)
Case 1
Call keybd_event(KEY_CODE, 0, 0, 0)
Case 2
Call keybd_event(KEY_CODE, 0, &H2, 0)
End Select
End Sub

で、KeyCodeは、Keysで指定のキー。
2番目は、Downup=0 Down=1 Up=2。
3番目が、処理待ち時間ですね。
クラス化してしまってて、見もしてなかったorz

思いっきり、嘘こいてしまったので・・・
そのままの関数載せておきます。
申し訳ないm(__)m

なんて優しい人だ

そのまま試させて頂いたところ、Case 1で下記エラーが発生しました。
「PInvoke 制約: 変数を返すことはできません。」
呼び出すときはKeyEvent(Keys.Space, 1, 50)としています。

ＶＢって難しいんやね。

>>456
API関数の型不正じゃない？
VBでLong型になってる部分が、VB2005では、Integerになってますので。
一応、同様のエラーを確認できてます。
再度APIの型を確認して下さい。

丁寧に有り難う御座います。
一応気になって確認していたのですが、keyeventは上記の通りとして
keybd_eventは(ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Integer, ByVal dwExtraInfo As Integer)
としていますが、問題ありますでしょうか。

SleepもIntegerにしてますよね？
他に問題ありそうなソースでもないんだが・・。
なんだろ？？？

遅くなりました。
Sleepは以下のように宣言していますが、問題あるように気が…（汗
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Integer)

>>461
Public Declare Sub Sleep Lib "kernel32.dll" (ByVal dwMillsecounds As Integer)
単純にソースから、コピペされたのであるなら、kernel32.dllの部分のピリオド。
確認されてみて下さい。

拾い物だけど・・・

Dim DownUp As Integer = 0
Dim Down As Integer = 1
Dim Up As Integer = 2
Private Sub KBD(ByVal KEY_CODE As Byte, ByVal 状態 As Integer, ByVal ms As Integer)
Sleep(ms)
If 状態 = 1 Then
Call keybd_event(KEY_CODE, 0, 0, 0)
ElseIf 状態 = 2 Then
Call keybd_event(KEY_CODE, 0, &H2, 0)
ElseIf 状態 = 0 Then
Call keybd_event(KEY_CODE, 0, 0, 0)
Call keybd_event(KEY_CODE, 0, &H2, 0)

ではなくて、kernel32.dllですね。
宣言のミスっぽいです。
仕事しつつ、焦ってレスしたのでその辺は、ご了承くださいm(__)m

'カレントスレッドの実行を指定の時間だけ中断する
　Declare Sub Sleep Lib "kernel32.dll" _
　　(ByVal dwMillsecounds As Integer)
'キーストロークをシュミレートする
　Declare Sub keybd_event Lib "user32.dll" _
　　(ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Integer, ByVal dwExtraInfo As Integer)

>>465
最初から、素直にAPIから貼ればよかったですねorz

>>466
説明しながら貼っていったアンタが正解だと思うがな

>>466
いえいえ。お陰様で色々と調べながら到達することが出来ました。
有り難う御座います。

流石に.dllには気付かなかったと思います（汗

下手な教え方で申し訳ないm(__)m
http://www.winapi-database.com/
ここにAPI載ってるから、ブックしておくといいです。
ここなら、VB6、NETとの違いも載ってて、サンプルもあります。
使う場合は、コピペすればいけるので非常に便利です。

能書きはいいから動くのよこせよ

島唄だけど、反応しない。
ほかは大丈夫そうだけど、何かあったかな。

　　NEW_ID = GetID(GET_ACTIVE_WIN)
　　Select Status(NEW_ID, St_Title)
　　　　Case "コインをチャージする"
　　　　　　Clkitem(NEW_ID,"はい")

>>471 ダス
ユルシテヲレノバグダット

無知だから、過去ログ読みまくって、やっと超獣の低能マクロ出来たよ。。。

初めて自分で作って、ちゃんと動くから、嬉しいな。

よし、俺様が採点してやろう

>>474
リプレイはずしも、DDTもない糞マクロなので、もっとレベルが上がったら貼ります。

>>475
貼らなくていい。

>>473
不具合があっても構いませんので、譲っていただけないでしょうか？

クレクレうぜーよ
氏ね！！！！！！！

>>475
よし、俺様がリプ外しとﾎﾞﾇｽ目押しを追加してやろう

　　　　　　　　　巛ミヾヾ　　＼
　　　　　　　／　　　ﾐ　　　　　ヽ
　　　　　　 ｆ,　　　　ﾐ　　　　　　 }
　　　　 ┏v'┳_━━━ ｒ､　　　　|
　　　　　yバﾉﾞ’'￣　'''　 } }ﾞ 　 　}
　　　　 ‘ｰj`'　　　 :　　//　　　/
　　　　　　Ｌ_ヽ　　i　　Ｖ　　　/
　　　　　("　 ` !　　　　　 ＿/
　　　　　　＼　_,. -‐ '　￣　 !＿
　　　　　 ／|~　　　／　￣　　　　＼

　　　　ヒッシ・ダナー　[Hissy Danner]
　　　　　(1901〜1997　イギリス)

VB2005ですが、過去スレにあった↓

'ウインドウ内のボタンクリック　メイン処理（UWSCのClkItemと同じ）
　　Private hWnd2 As Integer
Private Sub ClkItem(ByVal hwnd As Integer, ByVal BTN As String)

Const BM_CLICK = &HF5
Const WM_ACTIVATE = &H6

hWnd2 = FindWindowEx(hwnd, 0, vbNullString, BTN)
If hWnd2 = 0 Then Exit Sub
SendMessage(hwnd, WM_ACTIVATE, 0, 0)
SendMessage(hWnd2, BM_CLICK, 0, 0)
System.Windows.Forms.Application.DoEvents()
End Sub

使い方として↓では上手く行きません。

Select Case GetActiveWindowTitle()
Case "コインをチャージする"
ClkItem(hWnd2, "はい")
Sleep(100)

どうもステップインすると hWnd2 = 0 になって Exit Subしている
ようなのですが、修正すべき点があればご教示下さい。

hWnd2にメインのハンドルが入ってないからじゃないの？
引数でちゃんと渡ってる？

てか、これくらい自分で調べろよ
何でもかんでもすぐ人に聞くなカス
それに自分で調べた方が早いだろ

　　　　　　　　,．-─ ─-､─-､
　　　　　　, イ)ィ　-─ ──- ､ﾐヽ
　　　 　 ノ ／,．-‐'"´ ｀ヾj ii /　 Λ
　　　 ,ｲ／／ ^ヽj(二ﾌ'"´￣｀ヾ､ﾉｲ{
　　 ノ/,／ミ三ﾆｦ´　　　　　　　 ﾞ､ﾉi!
　　{V /ミ三二,ｲ　, -─　 　 　 　 Yｿ
　　ﾚ'/三二彡ｲ　 .:ィこﾗ 　 ;:こﾗ 　j{
　　V;;;::. ;ｦヾ!V　　　 ｰ '′　i ｰ '　ｿ
　　 Vﾆﾐ( 入　､　　 　 　r　　j　　,′
　　　ヾﾐ､｀ゝ　　｀ ｰ--‐'ゞﾆ<‐-イ
　　　　　ヽ　ヽ　　　　 -''ﾆﾆ‐　 /
　 　 　 　 |　　｀､　　　　 ⌒　 ,/
　　　 　 　|　　　 ＞ ---- r‐'´
　　　　　　ヽ＿ 　 　 　 　 |
　　　　　　　　　ヽ ＿ ＿ 」

　　　　　ググレカス [ gugurecus ]
　　　（西暦一世紀前半〜没年不明）

４８１のプログラムってどこに入力するんですか？
メモ帳で保存してクリックしても開くだけです＞＜

>>481
100氏のVB6？で作成された関数群ですな。
アップされてた関数群はVB2005へのコンバートで問題なく動いてるよ。
さすが100氏だな。

動かないのなら呼ぶ側の問題でしょ

100氏全然出てこないけどサミタ止めたのかなぁ・・・

>>484

5点

>>４８６

少しは惜しいのですか?
.exeというのに変更するまでしらべましたがだめでした。
どこかに完成品かやり方貼り付けてくれないですか？m_ _m

>>487誘導
おまえはこっち↓
http://game11.2ch.net/test/read.cgi/mmosaloon/1177652183/

>>487
.exeというのに変更するまでしらべましたがだめでした。 　　← 20点　正解：exeをビルド
どこかに完成品かやり方貼り付けてくれないですか？m_ _m 　　　← -100点

＞＞４８８
ありがとうございます。そっちできいてみます。
＞＞４８９
変更するときに「拡張子を変更するとファイルが使えなくなる可能性が・・・」
と出るので、それがいけないんでしょうか・・まあ２０点もらえたので
もうすぐできそうです。できたらアイテムいっぱい売ってかせぎたいです^^/
ありがとうございました

確かに、PGしたこと無い人には難しいよね。。。

今から勉強しようとしている人は、まず簡単な機種から
やってみては？

基本的なの作ると、
ジャグ、パル、南国あたりは、それ一つで動くよ。
目押しや、押し順が必要な機種はそれから。

まともに質問すれば、意外にここの住人はやさしいので。
（クレクレは嫌い）

あと、UWSCのヘルプが親切なのには同意。
あれほど親切なヘルプはあまり見ない。
（VBは初心者にはムリ）

それでも、基礎は必要ですけどね。

>>490
>変更するときに「拡張子を変更するとファイルが使えなくなる可能性が・・・」
>と出るので、それがいけないんでしょうか・・まあ２０点もらえたので
↑拡張子変更＝0点

いや、どう見ても>>490は釣りだろう

むこうにいったけどだれもいませんでした＞＜

やっぱわかんないので、だれかトレードでもらえませんか？
最高設定券２こでいいですか？

>>494

　しねばいいと思うよ

サミタ飽きたんで引退することにした。
オレの心の叫びを聞いてくれ。
// 巨人3-----------------------------------------------------------------
Procedure kyojin3()
　
ifb (peekcolor(88,526) and $FF) < 200 and_
(peekcolor(423,526) and $FF) > 200 then //BET判定
　　　sleep(0.01)
Kbd(VK_3, DOWN,50)　　// MAXBETが3以外の場合は変更
Kbd(VK_3 , UP,50)　　// 上を変更時は同様にここも変更
sleep(0.3)

　elseif (peekcolor(88,526) and $FF) > 200 then
sleep(0.01)
Kbd(VK_UP, DOWN,50)　　// レバーONが↑以外の場合は変更
Kbd(VK_UP , UP,50)　　// 上を変更時は同様にここも変更
sleep(1.3)

elseif (peekcolor(328,533) and $FF0000)/$10000 > 230 and_
(peekcolor(117,516) and $FF) > 200 then
sleep(0.01)
BIG_kyojin3()//BIGですか？

else
Kbd(VK_space, DOWN,50)
Kbd(VK_space, UP,50)
sleep(0.2)
endif
fend

// BIG処理-------------------------------------------------------------------
Procedure　BIG_kyojin3()
ifb (peekcolor(273,518) AND $ff00)/$100 > 230 THEN
sleep(0.01)
JYUN_kyojin3()

ELSEIF (peekcolor(277,521) AND $ff00)/$100 > 230 AND_
(peekcolor(283,523) and $ff00)/$100 > 230 then //デジタル表示　１　０　９〜順押し
sleep(0.01)
JYUN_kyojin3()
　　　　　
　 ELSEIF (peekcolor(277,521) AND $ff00)/$100 > 230 AND_
(peekcolor(283,523) and $ff00)/$100 < 230 then　//デジタル表示　１　２　８　〜　１　１　０まで中押し処理へ飛ぶ　
sleep(0.01)
naka_kyojin3()
　　
elseif (PEEKCOLOR(88,525) and $FF) < 200 and_
(PEEKCOLOR(424,526) and $FF) > 200 then //BET判定
sleep(0.01)
Kbd(VK_3, DOWN,50)　　// MAXBETが3以外の場合は変更
Kbd(VK_3 , UP,50)　　// 上を変更時は同様にここも変更
sleep(0.1)

　　elseif (PEEKCOLOR(88,525) and $FF) > 200 then //リール回転判定　
sleep(0.01)
Kbd(VK_UP, DOWN,50)　　// レバーONが↑以外の場合は変更
Kbd(VK_UP , UP,50)　　// 上を変更時は同様にここも変更
sleep(1)
endif
fend

>>496
いいよいいよ
いっぱい聞いてあげる

//big処理------------------------------------------------------------------------------
順押し処理
Procedure JYUN_kyojin3()
　　　　　ifb (PEEKCOLOR(225,600) and $FF0000) / $10000 > 240 then //左ボタン有効判定
　　　sleep(0.01)
repeat
SLEEP(0.01)
　　 if (peekcolor(225,600) and $FF) > 240 then break
　　 a=peekcolor(145,367)　//左リール　白７　目押し位置
　　 until ((a and $ff) > 240) and_
　　　　　　((a and $ff00) /$100 > 240) and_
　　　　　 ((a and $ff0000)/$10000 > 240)
　　　　　　　　sleep(0.60)
Kbd(VK_left, DOWN,10)　　
Kbd(VK_left, UP,10)　　
sleep(0.1)

elseif (PEEKCOLOR(293,600) and $FF0000) / $10000 > 240 then //中ボタン有効判定
　　　 sleep(0.01)
　　　　　　　　Kbd(VK_down, DOWN,10)　　
Kbd(VK_down , UP,10)　　
sleep(0.1)

elseif (PEEKCOLOR(351,600) and $FF0000) / $10000 > 240 then //右ボタン有効判定
　sleep(0.01)
Kbd(VK_right, DOWN,10)　　
Kbd(VK_right, UP,10)　　
sleep(0.1)

endif
fend

超獣にしてよｗ
ボヌス目押しするやつねｗ

ここに居る奴通報したから。明日にも警察が動くみたい。懲役10年以上くらうみたい。

＞＞５０１
ぼくはまだ成功してないからやめてください。

>>496
中押し処理はまだですか？

Function　naka_kyojin3()
　If (PEEKCOLOR(288, 613) And &HFF) < 150 Then　　　　'中ボタン有効
　　　Kbd(VK_down, DOWN, 0)
　　　Kbd(VK_down, UP, 100)
　ElseIf (PEEKCOLOR(352, 613) And &HFF) < 150 Then　　'右ボタン有効
　　　Kbd(VK_right, DOWN, 0)
　　　Kbd(VK_right, UP, 100)
　ElseIf (PEEKCOLOR(223, 613) And &HFF) < 150 Then　　'左ボタン有効
　　　If (絵柄ベルか("中中") = True) And (絵柄ベルか("右中") = True) Then
　　　　　Do
　　　　　　　a = PEEKCOLOR(145,367)　　　　'白７
　　　　　　　If (PEEKCOLOR(223, 613) And &HFF) > 150 Then Exit Do
　　　　　Loop Until ((a And &HFF) > &HFA) And　((a And &HFF00) > &HFA00) And (a > &HFA0000)
　　　　　Sleep(650)
　　　End If
　　　Kbd(VK_left, DOWN, 0)
　　　Kbd(VK_left, UP, 100)
　End If
End Function

Ｕスクリプト: IFB-ENDIF:SyntaxError
96行目: ELSEIF (PEEKCOLOR(352, 613) AND &HFF) < 150 THEN '右ボタン有効

IFB-ENDIF:SyntaxError
99行目: ELSEIF (PEEKCOLOR(226, 599) AND &HFF) < 150 THEN '左ボタン有効

↑座標が弄ってある事に努力を感じたｗｗ

>>507でどうすればいいのですか？

>>482
どうもすみません。
無理にあの関数使わずに、SendMessageを使って無事に動作しました。

過去ログにあるやつじゃねーかよｗ

>>510で、どうすればいごくようになるんだ?
>>506から進まないのだが・・・・・・・・

>>504は無視して中処理を自分で作れ
過去ログを漁ったほうが簡単だけどなｗ

>>512了解しました
ありがとうございました。

自分なりに中押し処理を作ってみたんですがこれってそもそも座標違ってるの？
白7で止めてくれないです

みなきゃわからん

VB2005です。
↓の関数を使って
Private Function PEEKCOLOR(ByVal x As Integer, ByVal y As Integer) As Integer '色取得関数
Dim ret As Integer
ret = GetWindowDC(MOW)
PEEKCOLOR = GetPixel(ret, x, y)
ret = ReleaseDC(MOW, ret)
End Function

↓こう書いた場合
Dim bonus As Integer
bonus = PEEKCOLOR(420, 472)
If (bonus And &HFF > 200) Then
Normal_bonus()
End If

x=420,y=472のRが200以上の場合にNormal_bonus()となるという
考え方で間違ってないでしょうか。

鬼マクロの話って、あまり出ないね

作ってる人いるのかな？

>>517
昨年の9月くらいから95氏Ver.が出回ってる

>>518
有るんだ・・　ほしいな・・。
がんばって見るか

>>516
×If (bonus And &HFF > 200) Then
−Normal_bonus()
−End If

○If (bonus And &HFF） > 200 Then Normal_bonus()

>>520
有り難う御座いました。一応想定通りの動きをしましたが
上手くアクティブウィンドウに対する相対座標になっていなかったようです。
頑張ってみます。

VB2005なら、ColorTranslator.FromWin32(ここにPeekColor値).Rを使った方が見やすいよ。
要らぬ世話かも知れないが・・・。

>>522
VB歴4日目なので知らないものがどんどん出てきます（汗
>ColorTranslator.FromWin32(ここにPeekColor値).R
これは、ちょっと調べてみます。有り難う御座います。

恥の上塗りついでです。

アクティブなウィンドウに対する相対座標を取得したい場合
どういう手段があるのでしょうか？
上記の ret = GetWindowDC(MOW) で取得できているような気も
するのですが…。

鬼あった。
ホームデザインであらAの下にあるやつね

GetWindowDC(MOW) でアクティブじゃなくても取れるんじゃね？
MOW？にちゃんとハンドル入ってればだけど

>>523
>>525さんが言われるようにアクティブでなくてもコンテキ取得できます。
前面の〜であるなら、MOW=GetForegroundWindow()かな。
色に関しては、わからないようなら参考に関数載せても構いませんよ。

>>525
>>526
ビンゴみたいです。MOWにハンドルが入っていません…orz
広いものをペタペタ使っていたので何処でおかしくなっているのか
必死で追っかけているところです。。

というわけで、色に関してはこれが解決してから進みます（汗

820氏は親切すぎｗ

>>527
VB４日目でそこまでわかれば上出来杉
十分能力あるんだからもう少し自力で調べようよ

うん？普通に書いてるだけだから＾＾；
>>527
４日にしては、いい姿勢で取り組んでるから、進み出したら早いと思うよ。

クレクレ君は何人いるんだ？定期的に湧いて出てきやがって
ウザイから少しバラまいておとなしくしてもらおう

欲しい人は夕方までにサミタのＨＮとアドレス載っけておいてくれ
土人・白人・青人・黄人お断り
内容はサラ金・アラＡ・ダブチャレの詰め合わせ

18時までアバは脱いでおいてくれな

ノ

>>526
取りあえず、過去ログから拾って関数化されていたMOWを削除し
素直にPEEKCOLORの所でMOW = GetForegroundWindowとしクリアしました。
お陰で前面のハンドルしか取れませんが、現状実行時は前面なので
良しとします（汗

>>528
UWSに興味持ってワンキー作ってみる
↓
UWSのワンキー完成したけど、VBで同じもの作ってみたい
↓
本買って過去ログ見ながらVBのワンキー作る（←今ココ）

とういわけで、実際細かく理解していない部分も多々あります…orz

明日から仕事で忙しくなるため焦っているのもありますが
取りあえずColorTranslator.FromWin32().Rを調べてみます。

なんだ、拾い物詰め合わせかｗ

>>533
詰める事すら出来ないあなたは・・・・

すいません、５３０へのレスです。
なんか５３２へのレスと誤解するようなことしてすいませんでした。

>>532
単純に色を分解してくれるだけね。
書いてる条件で言うところの、bonus And &HFF > 200のビット移動をやらなくて済む。
ColorTranslator.FromWin32(bonus).R > 200
という形に置き換えることができる。
このまま使うと長すぎて不便だから、関数にしておくと便利ってことですね。

イヤッホー！！！！
巨人3マクロ動いたぜぇ〜〜〜〜〜！！！！！
サミタやってるより楽しいぜ！！！！！！
いい玩具ありがとうだぜ！！ベィビーｗｗｗ

>>536
このままでも十分考えなくてすむ分分かり易いですね。
GetPixelと上手いこと組み合わせた関数にすると更に使いやすそうです。
そういった考え方があると言うこと自体参考になります。
これを使ってボーナス判定等に進みたいと思います。
（参考までに関数見せて頂けると有り難いです。（汗）

といってもそろそろ娘が帰ってくるので相手しなければ…orz

順押し処理
Procedure JYUN_kyojin3()
　　　　　ifb (PEEKCOLOR(225,600) and $FF0000) / $10000 > 240 then //左ボタン有効判定
　　　sleep(0.01)
repeat
SLEEP(0.01)
　　 if (peekcolor(225,600) and $FF) > 240 then break
　　 a=peekcolor(145,367)　//左リール　白７　目押し位置
　　 until ((a and $ff) > 240) and_
　　　　　　((a and $ff00) /$100 > 240) and_
　　　　　 ((a and $ff0000)/$10000 > 240)
　　　　　　　　sleep(0.60) ←三連白７止めたければココを調整！！

腐れマクロ貼るなよ恥ずかしいでしょうが！！

なら黙って自分で組めよ無能w

>>540
以前俺が作って貼ったやつだったもんでね・・・・
作りが酷すぎるので貼ってもらいたくなかったのよ・・
恥ずかしいからね。。

PEEKCOLOR(X,Y)は画面全体の数値なんですか？それともサミタのウインドウの数値？

>>542
ヒント　相対　絶対

>>538
Private _PeekColor As Integer
Private _x As Integer
Private _y As Integer
Private Function SelectRGB(ByVal plPeekColor As Integer, ByVal clr As Integer) As Integer
Select Case clr
Case 0 : Return ColorTranslator.FromWin32(plPeekColor).R
Case 1 : Return ColorTranslator.FromWin32(plPeekColor).G
Case 2 : Return ColorTranslator.FromWin32(plPeekColor).B
End Select
End Function
'座標を入力してRedを取り出し
Private Function GetRed(ByVal x As Integer, ByVal y As Integer) As Integer
_PeekColor = PeekColor(x, y)
Return SelectRGB(_PeekColor, 0)
End Function
　　'記憶値からRedを取り出し
Private Function Red() As Integer
Return SelectRGB(_PeekColor, 0)
End Function
クラスにしてるので、ちょっと書き直してる。
後は、緑、青と追加すればかなり見やすくなるとは思う。

調べてみたけどよくわからなかったです
MOUSEORGってのを使えばよいのかな？

// 777town フルオートScript 押し順無関係機種処理

// メイン処理-----------------------------------------------------------------------------
// 相対座標対応処理
TOWN_ID=GETID("777タウン.net")
ACW(TOWN_ID)
MOUSEORG(TOWN_ID)

While True
// Enterキー押下時に処理を停止させる
if GETKEYSTATE(VK_BACK) then exit

// メイン処理(ウィンドウ名にて判定)
Select Status(GetID(GET_ACTIVE_WIN), St_Title)
Case "コインをチャージする"
Clkitem(GETID("コインをチャージする"),"はい")
Sleep(1)// 二重押し回避処理
Case "目押し"
Clkitem(GETID("目押し" ),"自動でドル箱を下皿へ戻す",CLK_BTN)
Clkitem(GETID("目押し" ),"コイン購入")
Clkitem(GETID("目押し"),"お願い")

Case "ドル箱を下皿に戻す"
Clkitem(GETID("ドル箱を下皿に戻す"),"はい")
Case "777タウン.net"
Normal()// 指定機種判別処理に飛ぶ (内容がわかる人は直接書き換えるのも有り)
Sleep(0.3)// 押し順ナビを無視する対策の待機時間(環境により調整が必要？)
Case "エラー"
// エラーウィンドウ表示時に画面全体のスクリーンショットを取る(他アプリが原因の可能性が有るため)
SAVEIMG("Error")
// Beep音にてエラーをユーザに通知する
sound("BEEP")
// これ以上の処理は無駄なので終了
break
Selend
Wend
// メイン処理ここまで---------------------------------------------------------------------


// 押し順無関係機種処理-------------------------------------------------------------------
Procedure Normal()
Kbd(VK_SPACE, DOWN,200)// ワンキーが「CTRL」の場合はVK_SPACE→VK_CTRL
Kbd(VK_SPACE , UP,200)// 上を変更時は同様にここも変更
fend
//押し順無関係機種処理ここまで------------------------------------------------------------

194 名前： aaa ◆zGkaqfmTME [sage] 投稿日： 2006/09/25(月) 22:55:08 ID:???
http://up2.viploader.net/mini/src/viploader74287.txt.html

旋風の用心棒修正しました。
BETとレバーONをワンキーから個別ボタンに変えました。
とりあえず、押し順ミスは99％ないと思います。
大旋風及び、旋風→旋風で止まることは無いと思います。
KC中の背景スクロールのせいで多少もっさり。

クレクレは別に気にしてません。
自分の使いやすいのを作りたいだけなので、人柱になってくれるなら歓迎。

↑の神様もういないのですか？
再降臨お待ちしてます。

>>494
もっと出せるのなら
ぷーとで検索
MM入れておいてください

>>548
ロダの過去ログ倉庫にある

>>544
遅くなりましたが、関数非常に使いやすくなりました。有り難う御座いました。
練習用に島唄でワンキー処理からボーナス告知が点灯したら↓の処理（ボーナス目押し）に
行くようにしてみたのですが、上手くリールが止まりません。
各ボタンの停止方法等こうしてみた方が良いという点があればご教示下さい。
'MAX BET
Do
KeyEvent(Keys.D1, down, 50)
KeyEvent(Keys.D1, up, 50)
Sleep(500)
Loop Until GetRed(385, 555) < 200 'MAX BETボタンが消灯するまで
'レバーON
Do
KeyEvent(Keys.Up, down, 50)
KeyEvent(Keys.Up, up, 50)
Sleep(1000)
Loop Until GetRed(596, 469) < 150 'STARTボタンが消灯するまで

//-続き
'第1STOPボタン
If GetRed(362, 329) > 200 Then '第1リール赤7左上狙い
KeyEvent(Keys.Left, down, 50)
KeyEvent(Keys.Left, up, 50)
End If
'第2STOPボタン
If GetRed(462, 329) > 200 Then '第2リール赤7左上狙い
KeyEvent(Keys.Down, down, 50)
KeyEvent(Keys.Down, up, 50)
End If
'第3STOPボタン
If GetRed(562, 329) > 200 Then '第3リール赤7左上狙い
KeyEvent(Keys.Right, down, 50)
KeyEvent(Keys.Right, up, 50)
End If

赤を狙ったりして止める場合は、ループ処理。
主流は、Doを使用だが、危険性もあるからあえてこっちを使って見る。
For ii As Integer = 1 to 300
If GetRed(562, 329) > 200 Then Exit For'第3リール赤7左上狙い
Sleep(5)
Next ii
KeyEvent(Keys.Left, down, 50)
KeyEvent(Keys.Left, up, 50)
これで赤狙いいけるし、座標とれなくても取りあえず押す。
後は、ボタンの色を見る条件をつければいいかな。
緑になってないと押せないからね。

失礼…。>>551-552は南国育ちです。
あと、>>544の赤以外は下記のようにして使わせて頂きました。

'座標を入力してBlueを取り出し
Private Function GetBlue(ByVal x As Integer, ByVal y As Integer) As Integer

_PeekColor = PEEKCOLOR(x, y)
Return SelectRGB(_PeekColor, 2)

End Function

使い方としては、それでいいと思いますよ。
後は、上に記載した条件に更にボタンを加えることでほぼ完成。
それがあれば、後は応用していけば、どれにでも使える物になると思います。
短い期間でそこまで、やれるならすごいかと。

>>555
有り難う御座います。5年前からソフト関係に転職したいという
願望だけがあった反響でしょうか（笑

>>551-552はやはり島唄でした。焦りすぎですね。
各停止ボタンを教えて頂いたFor〜Nextステートメントに書き換え
GetGreenを使ってIf文に各停止ボタンの色をANDで判定させてみました。

後はボーナス待ちの状態です（汗

なんかＶＢが旬みたいで・・・・オイラにはﾁﾝﾌﾟﾝｶﾝﾌﾟﾝ

VBの講釈はよそでﾔﾚよ 専用ｽﾚあるんだからよ

取りあえず、上手く目押ししてくれるようになりました。
ただ、ワンキー処理の中に入れてしまっているので
コインチャージや目押しダイアログが出るとはまってしまうことに
気がついてしまいました（汗

後は、構文を見直すこととし、今日はこの辺で失礼します。
820 ◆v/f8GAPqnI氏。長々と有り難う御座いました。

>>558
以後気をつけます。

申し訳ないm(__)m
しかしながら、プログラムのスレにはちょっと。
あそこで書くほど、勇気ありませんorz

質問スレに誰もいないようなので。
UWSCですが、アクティブじゃなくても動かすこと出来ますか？
もちろん色取得に必要な部分は露出した状態で。

うん

aaa ◆zGkaqfmTME
待ちくたびれたオッ！！！！！！！！！！！！

旋風のマクロほしい人まだいる？

>>564
下さい！お願いします！！

うん、欲しい。

昨日からマクロ作り始めたのですが、
一々開くの面倒なのでUWSCヘルプ印刷中なのですが
勉強の為になんかのソース下さい。

旋風？いらねぇよ。クソボケｗｗｗｗ

旋風はさっきできたからいいや

>>567
http://game11.2ch.net/test/read.cgi/mmosaloon/1177652183/83

>>564
勉強のためにもみてみたいので欲しいです
[email protected]

金太郎・ダブチャ・アラＡだったら、ログ読んでいくと有るです。
これだけでも、押し順ナビの取り方の参考には良いよ。

旋風うｐまだ〜

大体旋風なんて子役抜きゃあいいんだよ。
誰だってできる。
本垢のHN晒した奴に教えてやるよ。

1時オープンの店俺一人だけ並んでるｗｗｗ

誤爆した・・・

>>571
昔貼った巨人２の出目からリプ押し順正解か判別する関数みれば、
DDTや出目からのフラグ判別等も大体わかるよ。

マクロは作るのが楽しいのに・・・

でもPC1台しかないからテストは他の人にお任せだけどねｗ

　テスターに立候補します。

おらもテスターやるだ

鳥獣はまだかね？

>>572 >>577の言ってるとおりログ探せば？
それでも出来なければクレクレ言って貰っても動かせないよ。

そうは言っても過去ログDAT落ちばっかりで見れない罠…。
何処か見れる所ないですか？

【どうして？】777town.net ｴﾝﾄﾞﾚｽﾌﾞﾗｯｸ【閉じる】
892 ：ネトゲ廃人＠名無し ：2007/04/11(水) 13:27:01 ID:???
第２停止までにリプ判別する関数
戻り値　０：リプ（押し順無しor押し順正解）、−１：それ以外

Function Kyojin2_repcheck()
　　Kyojin2_stop(0)　　　　// 停止可能待ち（左）
　　Kyojin2_B7(0)　　　　// 青７目押し（左）
　　Kbd(VK_LEFT, DOWN,400)// 「←」キーを押す （リベリ待ち）
　　Kbd(VK_LEFT, UP,50)// 「←」キーを離す
　　Sleep(0.2)

　　C=PEEKCOLOR(177,401)
　　ifb ((C AND $FF00) > $8000) then　　// 左中リプorベル
　　　　ifb (C < $800000) then　　// 左中ベル
　　　　　　Kyojin2_R7(1)　　　　// 赤７目押し（中）
　　　　　　Kbd(VK_DOWN, DOWN,0)// 「↓」キーを押す
　　　　　　Kbd(VK_DOWN, UP,50)// 「↓」キーを離す
　　　　　　Sleep(0.2)

　　　　　　C=PEEKCOLOR(285,401)
　　　　　　ifb ((C AND $FF00) > $8000) AND (C < $800000) then　　// 中中ベル
　　　　　　　　result = -1
　　　　　　　　exit
　　　　　　else
　　　　　　　　Kbd(VK_RIGHT, DOWN,0)// 「→」キーを押す
　　　　　　　　Kbd(VK_RIGHT, UP,50)// 「→」キーを離す
　　　　　　endif

893 ：ネトゲ廃人＠名無し ：2007/04/11(水) 13:27:05 ID:???
　　　　else　　// 左中リプ
　　　　　　Kyojin2_B7(2)　　　　// 青７目押し（右）
　　　　　　Kbd(VK_RIGHT, DOWN,200)// 「→」キーを押す （バーリプ赤７待ち）
　　　　　　Kbd(VK_RIGHT, UP,50)// 「→」キーを離す
　　　　　　Sleep(0.2)

　　　　　　C=PEEKCOLOR(393,401)
　　　　　　ifb ((C AND $FF00) < $8000) OR (C < $800000) then　　// 右中リプ以外
　　　　　　　　result = -1
　　　　　　　　exit
　　　　　　else
　　　　　　　　Kbd(VK_DOWN, DOWN,0)// 「→」キーを押す
　　　　　　　　Kbd(VK_DOWN, UP,50)// 「→」キーを離す
　　　　　　endif
　　　　endif
　　else
　　　　result = -1
　　　　exit
　　endif

　　result = 0
　　exit
fend

894 ：ネトゲ廃人＠名無し ：2007/04/11(水) 13:42:51 ID:???
Procedure Kyojin2_stop(pos)
　　DIM P[3] = 212,276,340
　　repeat
　　　　C=peekcolor(P[pos],586)　　// 指定停止ボタン
　　until C > $D00000　　// 青になるまで
fend

Procedure Kyojin2_R7(pos)
　　DIM P[3]=137,245,353
　　repeat
　　　　sleep(0.01)
　　　　C=peekcolor(P[pos],348)
　　until (((C AND $FF) > $7) AND ((C AND $FF00) < $4000) AND (C < $400000))
fend

Procedure Kyojin2_B7(pos)
　　DIM P[3]=137,245,353
　　repeat
　　　　sleep(0.01)
　　　　C=peekcolor(P[pos],348)
　　until (((C AND $FF) < $20) AND ((C AND $FF00) < $3000) AND (C > $100000))
fend

レジから黄金ラッシュ入ったから、サービスだ。
ま、単発で終わったんだがｏｒｚ

しかし、黄金神エラーがよく出るんだが
動作をゆっくりにすれば出ないのか？

422氏
最近よくUWSCのソースはってるけど、もういいのか貼っても
俺もVBに行こうしたらか、UWSCの全機種貼っちゃうけどいいのか？

黄金までは作ったけんど

ＵＷＳＣならいんでないの？
俺はＶＢだからＶＢのが欲しいがｗ

載せてもいいことないぞ？
現在のクライアントに余計な物を組み込んで重くなる可能性大。
ただでさえ、イベントの時に席取りだるいんだから。

UWSCは構わないと思うよ
みんなVBに移行済みでしょ
それに貼ればクレクレも大人しくなるだろｗ

昔サイドラ貼ったことはあったけど、
それ以降はそのまま動く奴は貼らないようにしてる。

あくまで、パーツとなる関数群しか貼ってない。

同じく、貼るなって言われたことあるから
関数ぐらいですね。

こいつら自分のソース、褒めて欲しくてしょうがないんだなw

ソース見た方が理解も早いと思うし、
やる気のある人は遅かれ早かれいつかはたどり着く。

だから、やる気のある人には使えて
クレクレには使えないような物しか貼らないようにしてるつもり。

422氏のサイドラは時速１０００軽く超える優れものです

かなりの人、使ってそうｗ

でも、ここに貼られてるパーツもじっくり読んでいくと、すごく参考になる。
特にUWSCは言葉に近い単語が多いから、初心者にも理解しやすいし。

VBは読んでもﾁﾝﾌﾟﾝｶﾝﾌﾟﾝ。参考にもなりません・・・トホホ・・・

猛獣のマクロほしい人いますか？　獣マクロを参考にしただけなので
設定６専用で使うくらいしかできませんが・・・

>>594
きれいにまとめてる人いるからそういうのは参考になる
頭ごなしにそんなこと言うなよ

そういえば最近は、目押しの所820氏と同様
for
　　peekcolor
　　if
　　　　break
　　endif
　　sleep
next
の形にしてるな。

置き換えとけば良かったｏｒｚ

だれもいないですね・・。例のところにうｐしたんですが・・・・・。
パスワードは知りません。

探しますので消さないでね

実は・・・
一部は、Doのまま、一部は、Forだったりする。
いい加減、書き直さないとまずいとは思いつつなんですけどねorz

>>601
見つかりません・・・・

パスのヒントはありませんか？

>>600
アノ糞広告のせいで、妙なラグが発生する時が【稀にある】
半日くらい順調でも突然無限ループに入ったりするから
今はfor〜nextで逃げ道を作っておかないと目が離せないor2

>>606
私も昨日の夜回してたらDoで無限ループ入っていたので
全てFor〜Nextにしました。最高設定券が…orz

同感。Do - Loop使ってたら思わぬラグとかでループから抜けずに強制ログアウトとかｗ
俺も For - Next　に変えたので今はしあわせです。

作ったそのときは大丈夫と思ってても、やっぱり保険は大事だわ。

俺はここで教えてもらった↓で快適ｗ

　◆推奨◆
hostsファイル(WINDOWS\system32\drivers\etc\)に

0.0.0.0 sammyad.durasite.net

を追加すると、うざいアフィリ広告が非表示に成松

>>609
あまりにも容易で、かつ意外な手段ですねｗ
帰ったら早速やろうっと。

>>598
いつものとこって、どこ？

>>598=>>601=>>605
あまりの反応のなさにワロタｗ

全米がラワタ！
>>598




この後、598氏の発言
「んじゃ、UPするのや〜めた！」

>>601を見る所「んじゃ消します」だろｗ

漂白されてここで愚痴言って氏ねばいいのに・・・
お前ら・・・つまんね〜糞集団だな
何がマクロだよ・・マクロ作って・・・自己満・・
誰にも相手にされね〜〜糞共・・一生ここで語ってろ

あまりの図星っぷりに怒っているようです。

前スレで頂いた黄金神も飽きてきました。早く次のを下さい。

なんか訴訟の準備してるみたい。営業妨害等で訴えるかも。
全員あぼーんで金無し生活が始まるね。

>>617
もしかして・・・・・・・・・・

うｐしたのは、自分で作ってほしいからなんだけどね・・・

次は何がほしいですか？

ちと、細工したにならうｐしますよ

>>609 詳しく！

>>619
前スレでPS:kurekureでうｐしてくれた方ですか？　実際、すっご〜く感激しました。
でね、あれを参考にして、自分でも色々改造する程度は出来るようになったよ。
旧北斗のちょっとだけDDTとか、エイリヤンのスイカ狙いバージョンとか・・・

でも、やっぱり先輩方が書いたヤツの方が使いやすいし、安心できるんだよね・・・（汗

　 ／ ＼　　／＼　ｷﾘｯ
.　　　　　／　（ー） 　（ー）＼　　　　　　
　　　　／　　 ⌒（__人__）⌒ ＼　　　　＜ 　<<619　うｐしたのは、自分で作ってほしいからなんだけどね・・・
　　　　|　　 　　　|r┬-|　　　　| 　　　　　
　　　　 ＼　　　　 `ー'´　　 ／
　　　　ノ　　　　　　　　　　 　＼
　 ／´　　　　　　　　　　　　 　　ヽ 　 　 　 　 　 　 　
　|　　　　ｌ　　　　　　　　　　　　　　＼
　ヽ　　　 -一''''''"〜〜｀`'ー--､　　　-一'''''''ー-､. 　 　
　　ヽ ＿＿＿＿(⌒)(⌒)⌒)　)　　(⌒＿(⌒)⌒)⌒))




　 　　　　 　　　＿＿＿_
　　　　　　　 ／_ノ 　ヽ､_＼
　ﾐ　ﾐ　ﾐ　　oﾟ(（●）) (（●）)ﾟo　　　　　　ﾐ　ﾐ　ﾐ 　　　＜だっておｗｗｗ
/⌒)⌒)⌒. ::::::⌒（__人__）⌒:::＼　　　/⌒)⌒)⌒)
|　/　/　/　　　　 　|r┬-|　　　　|　(⌒)/　/ / /／　　
|　:::::::::::(⌒)　　　|　|　 |　　 ／ 　ゝ　　:::::::::::/
|　　　　　ノ　　 　　|　|　 |　 　＼　　/　　）　　/ 　
ヽ　　　　/　　　　　　`ー'´ 　 　 　ヽ /　　　　／　　　　　
　|　　　　|　　 l||l　从人 l||l 　　　　 l||l 从人 l||l　　　バ　　　
　ヽ　　　 -一''''''"〜〜｀`'ー--､　　　-一'''''''ー-､　ン
　　ヽ ＿＿＿＿(⌒)(⌒)⌒)　)　　(⌒＿(⌒)⌒)⌒)) バ
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　ン

>>622
もう、そのへんにしてやれよ！


>>619が、鮪なんか解らなくて
自作ってるのぐらい解るだろ！アフォ。

>>621 そうですよ。

でも、風当たりがよくないみたいなので控えたほうがよさそうですね・・・・

解凍パスが分からないんですって

>>619
やっぱり自分では組めそうにない鬼武者とか、獣シリーズ。

残念・・・・・です。

猛獣はもう落とせましたか？　またうｐしますね(≧∇≦)

魔法のハイビは落とせましたか？　またうｐしますね(≧∇≦)

うｐしたの？

>>628
自作、乙！




その後、628氏の発言
「解りました。もう、うｐしません」

　　　　　　 ／_ノ 　ヽ､_＼
　ﾐ　ﾐ　ﾐ　　oﾟ(（●）) (（●）)ﾟo　　　　　　ﾐ　ﾐ　ﾐ 　　　＜もう、うｐしません　だっておｗ
/⌒)⌒)⌒. ::::::⌒（__人__）⌒:::＼　　　/⌒)⌒)⌒)
|　/　/　/　　　　 　|r┬-|　　　　|　(⌒)/　/ / /／　　
|　:::::::::::(⌒)　　　|　|　 |　　 ／ 　ゝ　　:::::::::::/
|　　　　　ノ　　 　　|　|　 |　 　＼　　/　　）　　/ 　
ヽ　　　　/　　　　　　`ー'´ 　 　 　ヽ /　　　　／　　　　　
　|　　　　|　　 l||l　从人 l||l 　　　　 l||l 从人 l||l　　　バ　　　
　ヽ　　　 -一''''''"〜〜｀`'ー--､　　　-一'''''''ー-､　ン
　　ヽ ＿＿＿＿(⌒)(⌒)⌒)　)　　(⌒＿(⌒)⌒)⌒)) バ
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　ン

こんばんはー

イベ終わったから獣3点セットうｐしたよ〜

なんか訴訟の準備してるみたい。営業妨害等で訴えるかも。
全員あぼーんで金無し生活が始まるね。

>>619様
>>621ですけど、もしその気になったらメールでもお願いします｡
正式版がリリースされて、速攻で完成させて、あのレベルって事は、まさに神業だと思いました。

[email protected]

サミタの営業が下手だからって訴えられたらたまらんな
１００や３００でインテがバンバンあたれば別に作る必要ないんだし
使ってもらってナンボのアイテムでケチりすぎ　自業自得だよ　
ちょっとはハンゲを見習えよ

私にもお願いしますm(_ _)m

[email protected]

こぉんwwwこぉんwwwこぉんwwwこぉんwwwこぉんwwwこぉんwwwこぉんwwwこぉんwwwこぉんwwwこぉんwwwこぉんwwwこぉんwww
こぉんwwwこぉんwwwこぉんwwwこぉんwwwこぉんwwwこぉんwwwこぉんwwwこぉんwwwこぉんwwwこぉんwwwこぉんwww
こぉんwwwこぉんwwwこぉんwwwこぉんwwwこぉんwwwこぉんwwwこぉんwwwこぉんwwwこぉんwwwこぉんwwwこぉんwww
こぉんwwwこぉんwwwこぉんwwwこぉんwwwこぉんwwwこぉんwwwこぉんwwwこぉんwwwこぉんwwwこぉんwww
こぉんwwwこぉんwwwこぉんwwwこぉんwwwこぉんwwwこぉんwwwこぉんwwwこぉんwwwこぉんwww
こぉんwwwこぉんwwwこぉんwwwこぉんwwwこぉんwwwこぉんwwwこぉんwwwこぉんwww
こぉんwwwこぉんwwwこぉんwwwこぉんwwwこぉんwwwこぉんwwwこぉんwwwこぉんwww

>>619様
気が向いたら、メール下さい。
もう、ガチャでインテリ買う金がなくなったので
勉強してみようと思います。
宜しくお願い致します。

[email protected]

AT時のみ押し順に従い、その他おやじ打ちなマクロ（DDT無し）を
練習用に作ってみたいんですが、お勧めの機種はありますか？
ガメラのBIG時のみ押し順に従うってのも練習に良さそうな
気はしますが…。

>>640
アラA、サラ金、北斗あたりが一番簡単じゃないかな？

ﾏｸﾗｰになりたい方は、ちょんあ会の入会をオススメします。

旋風ここにはるねｗ

Procedure kaze_chance()

ifb (PEEKCOLOR(215,600) and $FF0000) / $10000 > 200 then //左ボタン有効判定
kaze_button()

elseif (PEEKCOLOR(275,600) and $FF0000) / $10000 > 200 then //中ボタン有効判定
kaze_button()

elseif (PEEKCOLOR(335,600) and $FF0000) / $10000 > 200 then //右ボタン有効判定
kaze_button()

elseif (PEEKCOLOR(99,513) and $FF) < 200 and (PEEKCOLOR(422,513) and $FF) > 200 then //BET判定
Kbd(VK_3, DOWN,50)　　// MAXBETが3以外の場合は変更
Kbd(VK_3 , UP,50)　　// 上を変更時は同様にここも変更
sleep(0.29)

elseif (PEEKCOLOR(99,513) and $FF) > 200 and (PEEKCOLOR(422,513) and $FF) > 200 then //リール回転判定　
Kbd(VK_UP, DOWN,50)　　// レバーONが↑以外の場合は変更
Kbd(VK_UP , UP,50)　　// 上を変更時は同様にここも変更
sleep(0.29)

else
sleep (0.1)

endif

次がなきゃ意味無いじゃん。

ここって意味のないのをただベタベタ貼るだけの人ばかりだね
なにかと理由をつけてはいるが単に優越感に浸りたいだけの基地外

貼るなら全部貼ればいいのに・・・・
いつまで経ってもクレクレしか湧かない

貼るなら、その前のナビ判定と、その後の目押しも貼れよ。

以上、自分では何も出来ない無能どもの愚痴をお送りしましたｗ

一応作れるよ
ワンランク上のを作りたいからいろいろ参考にしたいだけ

オレも作れるよ。
ファイブランク上でないと実用出来ないから参考にしたいだけ。

かあちゃんとのｾｸｰｽまでマクロで自動化

プライベート・レッスン〜青い体験〜に収録

分かる人には分かる。
全部貼ったら、それこそ自己満だろうｗ

>>653
分かっても仕方のない部分しか貼ってないけど、>>643部分で何が分かるの？
やっぱ、アレか？「一を聞いて十を知る」って領域？

過去スレから拾ってきてやったぞ！！

// メイン処理(ウィンドウ名にて判定)
Select Status(GetID(GET_ACTIVE_WIN), St_Title)
Case "コインをチャージする"
Clkitem(GETID("コインをチャージする"),"はい")
Sleep(1)// 二重押し回避処理
Case "目押し"
Clkitem(GETID("目押し" ),"自動でドル箱を下皿へ戻す",CLK_BTN)
Clkitem(GETID("目押し" ),"コイン購入")
Clkitem(GETID("目押し"),"お願い")

Case "ドル箱を下皿に戻す"
Clkitem(GETID("ドル箱を下皿に戻す"),"はい")
Case "777タウン.net"
Dennoh()// 指定機種判別処理に飛ぶ (内容がわかる人は直接書き換えるのも有り)
Sleep(0.3)// 押し順ナビを無視する対策の待機時間(環境により調整が必要？)
Case "エラー"
// エラーウィンドウ表示時に画面全体のスクリーンショットを取る(他アプリが原因の可能性が有るため)
SAVEIMG("Error")
// Beep音にてエラーをユーザに通知する
sound("BEEP")
// これ以上の処理は無駄なので終了
break
Selend
Wend
// メイン処理ここまで---------------------------------------------------------------------

Procedure Dennoh()
PUBLIC CL
PUBLIC CM
PUBLIC CR
CL=peekcolor(453,477)
CM=peekcolor(476,477)
CR=peekcolor(499,477)
　　// ナビあり時
　　ifb (((CL AND $FF) > 200) AND ((CM AND $FF) > 200) AND ((CR AND $FF) > 200)) then
　　　　Dennoh_navi()
　　// ナビなし時
　　else
　　　　Kbd(VK_SPACE, DOWN,200)　　// ワンキーが「CTRL」の場合はVK_SPACE→VK_CTRL
　　　　Kbd(VK_SPACE , UP,200)　　// 上を変更時は同様にここも変更
　　endif
fend

Procedure Dennoh_navi()
　　　　// 左ナビ点灯時
　　　　ifb (( (CL AND $FF00) > (100 * $100)) AND (CL < $10000) ) then
　　　　　　Kbd(VK_LEFT, DOWN,200)
　　　　　　Kbd(VK_LEFT, UP,200)
　　　　// 中ナビ点灯時
　　　　elseif (( (CM AND $FF00) > (100 * $100)) AND (CM < $10000) ) then
　　　　　　Kbd(VK_DOWN, DOWN,200)
　　　　　　Kbd(VK_DOWN, UP,200)
　　　　// 右ナビ点灯時
　　　　elseif (( (CR AND $FF00) > (100 * $100)) AND (CR < $10000) ) then
　　　　　　Kbd(VK_RIGHT, DOWN,200)
　　　　　　Kbd(VK_RIGHT, UP,200)
　　　　// 指示なし時
　　　　else
　　　　　　Kbd(VK_SPACE, DOWN,200)　　// ワンキーが「CTRL」の場合はVK_SPACE→VK_CTRL
　　　　　　Kbd(VK_SPACE , UP,200)　　// 上を変更時は同様にここも変更
　　　　endif
fend
これで君たちも立派なマクロ使いだな！！！！
後は、これ見て勉強少しだけすれば押し順のみの
マクロなら簡単に造れるようになるぞ！！！！　ガンガレ

目押し・リプハズシのパル失敗したorz

てなわけで誰かくらはい

Procedure Aladdin_A()
// 左ナビ点灯時
ifb (PEEKCOLOR(74,412) and $FF00) / $100 > 200 then
Kbd(VK_LEFT, DOWN,50) // 「←」キーを押す
Kbd(VK_LEFT, UP,50) // 「←」キーを離す

// 中ナビ点灯時
elseif (PEEKCOLOR(84,447) and $FF00) / $100 > 200 then
Kbd(VK_DOWN, DOWN,50) // 「↓」キーを押す
Kbd(VK_DOWN, UP,50) // 「↓」キーを離す

// 右ナビ点灯時
elseif (PEEKCOLOR(94,477) and $FF00) / $100 > 200 then
Kbd(VK_RIGHT, DOWN,50) // 「→」キーを押す
Kbd(VK_RIGHT, UP,50) // 「→」キーを離す

// 全ナビ消灯時
else
Kbd(VK_SPACE, DOWN,50) // ワンキーが「CTRL」の場合はVK_SPACE→VK_CTRL
Kbd(VK_SPACE , UP,50) // 上を変更時は同様にここも変更
endif

>>609のおかげでアラエボかなり軽くなったお
快適ですｗｗ

時速１０００回転の世界へようこそ

サイドラですか？

キャハッ！　ありがと、早速セットしてくる！！

今日からサイドラ満席になったらワロスｗｗｗ

UWSCなんですが、旧型のノートＰＣだと、目押し系のマクロは無理なんですかね・・・？
処理が途中で止まってしまう・・・それとも、自分のマクロがマズイんでしょうか・・・

VBの方達はUWSと比べて軽いんですか？

自分は軽くなったね。
CPU使用率がUWS時常に20%〜30%あったのがVBではほぼ0%だもん。
まぁ処理が若干違うのもあるだろうけど。

>>665
スペックは？

セレロン1.8・メモリー256+512・内蔵グラボ：RADEON IGP 340/345M・ＯＳ：WindowsXP Pro（キージェネ仕様）・ＩＥ６
一応、押し順のみは動作します。　

広告切れば多少変わるんじゃないか？

と、知ったかぶりしてみる

>668
それなら俺と同じような環境なのでマクロの問題かと
まずPrint文を各所にいれてちゃんと動作してるのか確認してみるのがいいと思う

マッハのマクロってまだ貼られたことないよね？
今夜の０時に３０分限定で例の場所にうｐするね。パスはマッハのアニメに
関係するやつにするから今のうちにヤフー動画でマッハのアニメ見ておくといいかも

キージェネ仕様って、どんな仕様やねん？

>>664
以前マクロが出回った時、空き台が出なくなって困ったが
機種が増えれば分散されて特定機種に集中しなくなるのだろうか?

>>422
だから他の機種も下さい。

>>673
ないと思うよ。
結局、人気機種に集中するだけじゃないかな？

どうせだったらインテリが無い機種をうｐしろよ。猛獣、鬼、☆�V、黄金、そてと、リプハズシ入れないと話にならないＡタイプとか。

何でそんなに偉そうな態度なんだよｗｗｗｗ

>>671
VBのなら参考にみてみたいな。
UWSCのだったらイラネ。消えろ。

>>678
UWSCにできてVBにできない事なんてないのに
なんでそんな意見が出るのかわからん。

俺はVB使いだぜ！すげーだろっ！って言いたいんだろ。

漂白されるのが怖いサミタ依存のニート君だろｗｗｗ
毎日暇なんだから自分で作れよｗｗｗ

UWSCだろうがVBだろうがサミタにすれば
外部ツールになるからどっちを使っていようが
漂白される可能性は一緒
このスレではVBなら桶と思ってるみたいだが
関係ありませんよ

サイドラマクロ、どうせ張るんなら改訂版張れよ

>>682
おまえだったら、どうやってマクロ使ってるって判断する？
サミタは神様じゃないぞ？UWSが実行中だったら警告する位は
サミタでも直ぐに出来ると思うが。

俺は手打ちでUWSは株の自動売買に使ってるんだけど
マケスピとサミタとUWS起動してたら漂白されちゃうのか？

もし、漂白されたら損得関係なしに訴えるぞ！！！

もちろん漂白です

ははｗまぁ無理ってこったなｗ

俺もサミタと他のゲームを同時に起動して、他のゲーム用に蜂起動したら勲章剥奪されました

おまけにゴールドシーサーも貰えず散々です

>>688
俺空の漂白は短時間（極端に少ないゲーム数）で勲章GETって条件が付いてたはず。
サミタに連打を使わずに勲章を取ったんだったら・・・君のヒキの強さを悔いなさい。

俺も使ってたけど、勲章は残ってるよ。

超獣のナビ判定ですが、ドットのどの部分で採れば良いでしょうか？
うまく判定してくれなくて・・・

ペイントか何かで拡大して真っ赤な所の座標取って比較してみ？
７なら底の部分だとダチョウの股下になるから区別できる。
左ナビのダチョウとヒョウはかなり被るので気合で探してｗ
俺１ドット差のところ使ってるけどちゃんと動くよ。

上にあるサイドラまともに動かないんですがみなさん動きますか？
ナビの機種判別にとんでないような気がします，Ｂｉｇ中も順押しのまま

依然晒されてたときに試したきりだが、動いたぞ
ただ、ナビ中に固まるときがあったのが、修正版で直されたはず

左のウィンドウ表示したままと予想

素人で申し訳ありません，左ウインドウというと？

>>694
右利きなら、お茶碗持つほうだよ。

画面上でいうと台の隣のアバターとか出てる所ですか？

相変わらずここはUWSC貼ってそれをコピペして
動いた動かないの世界なのか…

見直してみたらぶん回し仕様に改変されてるなｗ

順押しおやじ打ち？

質問スレのほうが、得るものが多いってのが笑える

こんなスレ必要ないな

左窓の話だった、真黒スレじゃなくって、タウン初心者スレで聞いた方が良いよ。

文句あるならこなけりゃいい

(( (CL AND $FF00) > (100 * $100)) AND (CL < $10000) )

この時の条件って、CL緑が○以上で、かつCLが○以下なんだろうけど
○はどういう条件なの？

>>704
$10000

>>704
100 * $100　以上
$10000　以下

自己レス。要は緑が100以上であれば動くんだね。
VBで書いてみたら超はえぇｗ

>>707
青が0ってのも条件だよ。
どうせだし、改訂版うｐ

Procedure Dennoh()
　　DIM C[2]
　　// ワンキーが「CTRL」の場合はVK_SPACE→VK_CTRL
　　DIM KEY[3]=VK_DOWN,VK_RIGHT,VK_SPACE

　　C[0]=peekcolor(476,477) + 1
　　C[1]=peekcolor(499,477) + 1

　　// ナビあり時
　　ifb (((C[0] AND $FF) > 200) AND ((C[1] AND $FF) > 200)) then
　　　　for i = 0 to 1
　　　　　　if (( (C[i] AND $FF00) > $6000) AND (C[i] < $10000) ) then break
　　　　next
　　// ナビなし時
　　else
　　　　i = 2
　　endif
　　Kbd(KEY[i], DOWN,50)// 指定キーを押す
　　Kbd(KEY[i], UP,50)// 指定キーを離す
fend

本当に自分のソース見て欲しくてしょうがないんだなw

>>709
>>683

だんだん短くなってくる

なにこのオナニーコード

>>708
注釈を付けてもらえませんか。是非、参考にしたいんですが、そのままだとＶＢ並みﾁﾝﾌﾟﾝｶﾝﾌﾟﾝです。
アホですいません・・・

注釈付いてるし…。
具体的に何処が分からないのか挙げてみ？
全部！なんて言わないよな。

C[0]=peekcolor(476,477) + 1 この部分の＋１の意味
for i = 0 to 1 　これはまったく
Kbd(KEY[i], 　　i = 2 　　このiって？
すいません・・・こんな感じです。

>>715
通常時リプ成立のマークの色の赤が２５５だから、
＋１して　(C[0] AND $FF) > 200の判定にかからないようにしてる。

KEY[3]=VK_DOWN,VK_RIGHT,VK_SPACE
なので、ｉ　が　０：中、１：右、２：ワンワンキー
ってことになります。

ちなみに機能設定の押し順が左第一停止の場合、
左停止とワンワンキーは区別する必要が無いので
処理から省いています。

改訂版と前の奴の違いって何？途中が違うだけで結論は一緒？
いや、前ので特に問題なかったような気がしたもんで。

>>717
特に変化無し。
例の＋１してないやつが貼られたので
一応修正しとこうかと。

もしかすると、左、中、右の３点チェックの場合は
＋１なくても大丈夫なのかな？

>>715です。　説明を頂いても、まだ全部は理解できてないですが、概ね見当はつくようになりました
有り難う御座いました。

VBにしてDown.upすべて50にして動かしてましたが、目にも留まらぬ早さで消化してましたよ。
条件は緑100以上のみで。

ところで設定って今でも目盛りのぞけばわかっちゃうの？
やり方云々じゃなく、やってる人はいるのかなって話。

>>721
漂白覚悟で試してみたら？

ん？スレタイの趣旨と違うことでも言ったか？

VBでｻｲﾄﾞﾗ作成しているのですが、
ラッシュ中って”目押し”ウィンドウ出たかどうか？
知ってる人いたら教えて？

>>724
出るよ。

>>725
422先生すいません。ありがとうございます。
メンドイので"目押し"作るのやーめた。

結局マクロ使用してるかどうかって、第三者から判断されるとしたら
回転数だけかなぁ。

>>727
私だったら、手打ち時ほとんど使用しないと思われる ３BETやレバーON が使われていたらマクロ使用と判断します。

ごめん、サミタ側から見た場合と捉えてしまいました。
第３者を他ユーザとしたら、回転数くらいでしょうね。

私は1日の回転数を見て、
バッチ勲章が少なければ枕ーってな感じで疑ってます。

>>728
俺手打ちでもMAXBETとレバー結構使うけど

手打ちの時のワンキーはJAC消化ぐらいしか使いませんが何か？

俺、リアルホールでもMAXBETとレバー結構使うけど

エレコムのjoypadマクロでワンキーにMAXBET,レバー、左右中と登録してますが何か？

俺はリアホでは手が機械的に痙攣してレバオンしてくれるよ。

俺はチンポ握ると手が機械的に痙攣してレバオンしてくれるよ。

いまから３０分限定でマクロ一式うｐします。みんなおとしてね(≧∇≦)
ＰＡＳＳは考えろ、場所は例のところだよ

>>737
確認しました
ありがとうございました

>>737
確認しました
ありがとうございました

>>737
確認しました
ありがとうございました

>>740
確認しました
ありがとうございました

どこ？

>>742

そっとしておけ

どこ？

アソコ

>>744
もう寝るからこれで最後な

例のところがわからない；；

半年ROMってろ

>>737
バジョンうｐ乙！
魔法瓶対応早かったね

乗り遅れた,ほんとにあったの？

つーか配る気あるなら｢例のところ｣ とか｢passは考えろ｣などとは言わねーｗｗｗ
クレクレ自演バロスｗ

>>737
確認しました
ありがとうございました

今ＶＢが旬って感じで自分も移行しつつあるけど、
やっぱりUWSCは危険なの？

なんだほんとにあると思ったのに自演かw

何を使おうがサミタからみれば外部ツール

猛縦だれかはってくれんかなぁ，

エイリやんのスイカ狙いバージョンが良い出来に仕上がったんで、リプレーハズシの機種を作ろうと思って
ハナハナを始めたんだけど、ハナハナってもしかして、初心者には無理？

ボーナス中判定・残りゲーム数とか、どうなってるの？

ナナセグ

>>753
漂泊されるかどうかは別としてUWSCを使ってるかどうかはサミタ側で調べればわかる。

>>758さん
７セグの動き詳しくお願いします｡　

セグを0から9まで書いてみなさい。
自ずと答えが見えます。

スーハナの７セグは他の機種よりﾏﾝﾄﾞｸｻ

旋風のﾅﾋﾞ座標だれか教えてください
まったくＫＣ引かないもんで・・・

>>763
KC引かないなら、いらないでそ？

>>764
ｸｿﾜﾛﾀ

はやく巨人３の中押しの部分を貼って下さい。

>>766
過去スレにあったのね。

北斗のナビ押しはすぐに出来たけどボーナス確定時って
何処拾えばいいですか？液晶最大にしてたからか液晶しか
思いつかなかったんですが…。

と思ったらボーナス引いたけど、別に何処のランプも点灯しないのね。
通常時DDTでもして判定するしかない…？

逆挟みで

右下段 海苔ﾋﾞﾀ

後は停止位置で

右下段 海苔停止時は全ﾘｰﾙ海苔目押し処理

右上段 ７停止時はﾁｮﾘorﾎﾞﾇｽ なんで 全ﾘｰﾙ７目押し処理

おまけでｽｲｶ成立時も全ﾘｰﾙ７目押しするようにしてるよ

>>659のはメイン処理の後に付けてもそのまま動かないですよね？
素人質問でスマソ

動かしたわけじゃないけど、動きそうな気がする・・・

そんなことより、巨人３を動かそうと思ったんだけど、２０時間の巨人３って、メッチャこんでるね。

真っ黒初心者スレの方がレベルが高い件

だって向こうはマクロを熱心に勉強しようとしてる人達が集うスレ

こっちはマクロが欲しいけど、自分で作れないから、他の人に嘆願してマクロをもらうスレ

おいおい、まるでここの住人がみんなクズみたいな言い方じゃないか
はっはっはっ

>>775
確認しました
ありがとうございました

ここは１％の神々と９７％のクレクレ君達と２％のその他の人達によって構成されたスレッドです。

クレクレ言えば、マクロは手に入るからねー
UWSCならね

レバーを叩くまでの処理を↓のようにしているのですが
他に良い方法ありますでしょうか？
目押しが上手く出来ないのですが、上手く切り分けられずにいます。
今はこうしています。VB2005です。

Private Sub スタート()
Const down = 1
Const up = 2
Do
KeyEvent(Keys.Space, down, 50)
KeyEvent(Keys.Space, up, 50)
Sleep(500)
Loop Until GetRed(447, 592) < 200 'ストップボタン有効まで
Sleep(100)
目押し処理()
End Sub

やっと、ＡＴ機だけ移行できた
ここの住民はほぼＶＢへ移行済みなんですね？

何故にUWS→VBに移行？
UWSをEXE化すればいいだけに思えるが・・・

金払うのが嫌なんでしょ

Procedure naka_kyojin3()//---------------------------------------------------------------------

ifb (PEEKCOLOR(284,600) and $FF0000) / $10000 > 240 then //中ボタン有効判定
sleep(0.01)
Kbd(VK_down, DOWN,10)　　
Kbd(VK_down , UP,10)　　
sleep(0.1)

elseif (PEEKCOLOR(351,600) and $FF0000) / $10000 > 240 then //右ボタン有効判定
sleep(0.01)
Kbd(VK_right, DOWN,10)　　
Kbd(VK_right, UP,10)　　
sleep(0.1)

elseif (PEEKCOLOR(225,600) and $FF0000) / $10000 > 240 then //左ボタン有効判定
sleep(0.01)
repeat
sleep(0.01)
　　 if (peekcolor(225,600) and $FF) > 240 then break
　　 a=peekcolor(145,367)　//左リール　白７　目押し位置
　　 until ((a and $ff) > 250) and_
　　　　　　((a and $ff00) /$100 > 250) and_
　　　　　 ((a and $ff0000)/$10000 > 250)
　　　　　　　　 sleep(0.60)
Kbd(VK_left, DOWN,50)　　
Kbd(VK_left, UP,50)　　
sleep(0.1)
endif
fend

金太郎がウゴカネ。。。

金太郎は３月に作ったのがそのまま動いてるがの
何か変わったのかい？おじいちゃんや
サイドラは動かなくなっとるのう
何か変わったのかい？おじいちゃんや

さて、退会処理完了記念に猛獣抜きでも書こうかね。

サラ金って、ＫＣ中のボーナス成立で、目押しする？

インテリならしますよ。

>>787
ｶｽがｗどうせ貼れねえんだろｗ

>>790
そうですか。では辞めておきます。
興味ある方は連絡を。
[email protected]

自分で作ったやつはしょぼいのでKC中は自然に揃うまで無駄に打ちつづけます

>>791
ミスったｗ
[email protected]

>>793
それよりもサイドラと獣王と超獣を教えてくれよ・・・
いや・・・巨人２がいいな

>>785>>793
音信不通

>>794
とりあえずまだ遊べっから調べてみるは。

>>795
お前らみたいに昼夜逆転してねーから、夜は寝るんだよｗ
勘違い君がマクロくださいって送ってきてるけど、
「サラ金あるんですか？」は？マクロ？あるよ。
そんなチンケなモンは自分で作れｗ

俺が教えてやるのは、もっとブラックな小役抜きだ。
ダチョ鯖で継続抽選時に使えば100%継続ｗ
AT1でも10万枚も夢じゃねえぞｗ

升スレになりました

>>796
別に鯖当たらなくてもいいんじゃね？

出来るが1Gずつチェックすんのメンドいぞ。
鯖なら9回は目押しだけですむからラクチンポだろｗ

じゃあとりあえず参照アド教えてよ

参照アドレス：EDF580

そんなモノよりマクロをくらさい。

内容がニワカっぽくね？

やめてくれよ・・・
せっかく68個取ったのが消されてしまう

みるきぃのまんまんどんなにおいでつか？

>>805
書いてて恥ずかしいと思わないんだろうか。
…あ、いや釣りだとしても。

サラ金下さい。

みるきぃ僕の童貞奪ってください。

>>808
過去に
「リアル見ると（ｒｙ」
という社員の書込があったわけだが・・・。

穴さえ開いてりゃ、何だっていいよ

やっぱり、ちぇりぃの方がいいでつ。

>>811
悪いこと言わないから、風俗いっとけ。
ガチャるよりよっぽどいいと思うぞ。

やはく獣王・超獣・猛獣の3点セットを貼って下さい。

>>813
俺は全部作ったが、ここに貼る理由が見つからない

>>813
UWSCなら送ってやるから捨てアド書いとけ

[email protected]
までお願いします

>>815様お願いします。
[email protected]

>>813です。宜しくお願いします。
[email protected]

と、言っても・・・・メールが来たことなんかないんだけど・・・
でも、やっぱ期待してしまうオレがいる・・・

>>815
無事動きました
本当に有り難うございました。

[email protected]よろしくお願いします

>>815さん
確認しました
ありがとうございました

>>818
俺、過去に本当に欲しがってる人には何人かにちゃんとあげたよ
しかもサポート付きでｗ
でも中には強者がいて、こっちからメールしたのに返事もよこさない…orz
欲しくないなら最初から書くなヴォケ！
アフォくさくなったのでもうサービスするのはやめますた

>>822氏に懇願殺到の予感

何人かの中に入ったことないです・・・
返信メールは送ると思うよ。ゲーム内のボッタなトレ希望メールにみ律儀に返信してますから。

[email protected]　　よろしくお願いします

>>824
じゃあ、どうしても欲しい一機種だけ教えてくれれば考える
捨てアドでいいから教えて下さい

でも、>>824の偽物のｸﾚｸﾚにはあげたくないなぁｗ

すいません・・・
>>824　＝　>>818　＝　>>813です。
[email protected]
一番欲しいのは猛獣です。

希望：猛獣王です

[email protected]

重ね重ねよろしくお願いします．

どっちが本物なんだｗｗ
てか、猛獣か…（´・ω・`）

猛獣の、目押し部分だけでよいのでお願いしたいです・・・
[email protected]　です

>>826様　3点セットよろしくお願いします
[email protected]

まあ、今日は会社休みだからサービスしてもいいかなｗ

>>827　>>828
　メールしますた

>>830
　VB6だけどいいのかな？
　てかソース汚いからｺﾞﾒｿｗ

>>831

　　断　る


　

このあいだ送った黄金神は動いてるんだろうか？

>>832
言語は何でもかまいません。
自作してるのですが、なかなかうまくいかなくて、動いてるものを参考にしたいのです。

>>826神様　超獣をよろしくお願いします

[email protected]

猛獣欲しい人いる？

>>832様　猛獣　是非、お願い致します

[email protected]

>>832様　猛獣お願いできますでしょうか？
[email protected]

よろしくお願いいたします

猛獣お願いします

[email protected]

>>832様
猛獣王　希望です　お手数ですがよろしくお願いします

[email protected]

一応自作品だし、マクロばらまくつもりはないので申し訳ないけど、
今回はもうこれ以上対応できませんのでメアド貼ってもごめんなさいです
他の人よろしくねｗ

820さん申し訳ないですが、私にも猛獣お願いします；；
[email protected]

>>832様　
猛獣をお願いします。

[email protected]

>>836様　よろしくお願いします
[email protected]

>>830
どのリールの目押し？
とりあえず左はこんな感じだが

Do While icnt < 800
lngHdc = GetWindowDC(TownHwnd)
lngPkColor = GetPixel(lngHdc, 218, 354) '上段ダチョウ基準
iret = ReleaseDC(TownHwnd, lngHdc)
If cRed(lngPkColor) > 250 Then
Exit Do
End If
Sleep (1)
icnt = icnt + 1
Loop

あとはスリープで調整してる

>>845

>あとはスリープで調整してる

　目から鱗が・・・・
　一周させるって事は思いもつかなかったですよ・・・orz
　大変参考になりました。

チンポの皮が剥けた・・・・

捨てアド全部、サミネに通報しときました。

で？

>>830
上のソースの中のsleepは色取得時のループタイミング用だから
各絵柄で目押しタイミング取るときは上のソースのループを抜けた
後にそれぞれ書いてね

って、わかってるかそれぐらいｗ

本スレでスルーだったので、ここで聞いてもいいかな？

黄金神ってラッシュ中のレジはラッシュ抽選どうなってる？
１．無し
２．ラッシュ突入時と同じ確率（ラッシュ中は高確低確の状態移行が止まるため）

どちらかだと思うんだけど・・・。
誰か知ってる？

知ってるよ

ここに書き込みした人のメアドをサミタ運営に送りました。捨てアドとか安心している人は注意しとく事だな。訴訟に
なれば裁判所からのIP及びプロバイダへの開示命令(ちなみに前例が数十件にも及ぶ。)
が出るので追跡すればすぐに身元バレるから。民事と刑事両方での裁判お願いしたから。

ふーん

アホかｗ

ちなみに今頃焦って捨てアド登録解除しても無駄だから。IPやログは法律で保存しとかないと
いけないので無駄だから。知らないと思うから教えてあげるけど裁判は忘れた頃にやってくるから。
出廷は仕事や学校を欠勤してまで行かないといけないから困るよ。けど、残念でした。もう遅いから。

[email protected]
[email protected]
[email protected]
[email protected]
[email protected]
[email protected]
[email protected]
[email protected]
[email protected]
[email protected]
[email protected]
[email protected]
[email protected]
[email protected]

訴えられる理由、要素、要件・・・どれも無い。
しかも刑事と来たか・・・このスレのどの書き込みが構成要件に該当してるんだ？

>>853
素直になれよ
何度も釣られて頭おかしくなったかｗｗ

アホの理屈なら２ｃｈでいいだろｗ
何で捨てアドｗ

>>856
確認しました
ありがとうございました

>>856
めちゃくちゃだな。
ま、そういうスレって事か。

顔真赤にしてなにやってんだかｗ
腹抱えてワロタｗｗ

>>853
通報乙ｗ

マクロ作れる様になったらなったでサミタやる気無くなった

ここでマクロ配布するのはやめろ！
知識のない奴らに煽てられて、マクロをばら撒くほど哀れなことはない。
努力している奴にヒント教えるのはいいと思うが、安易に捨てアドを平気で書き込む奴はスルーしろよ。
ここで何回も注意されてることは守るべきだと思う。

今までのログ見てだいたいは理解できるはず。

マクロ組めない方はこちらへ
　サミタ真っ黒初心者質問スレ　その1
http://game11.2ch.net/test/read.cgi/mmosaloon/1177652183/l50

基本的なことはここで勉強してください。
Ｖisual　Basic 中学校
http://homepage1.nifty.com/rucio/main/main.htm

マクロ配布してしてるやつは何も考えてないんだよ

　
　　　　 　　 ／ ＼　　／＼　ｷﾘｯ
　　　　　／　（ー） 　（ー）＼　　　　　　
　　　　／　　 ⌒（__人__）⌒ ＼　　　　>>856 ちなみに今頃焦って捨てアド登録解除しても無駄だから。
　　　　|　　 　　　|r┬-|　　　　| 　　　　　 ・・・・・・・・けど、残念でした。もう遅いから。
　　　　 ＼　　　　 `ー'´　　 ／
　　　　ノ　　　　　　　　　　 　＼
　 ／´　　　　　　　　　　　　 　　ヽ 　 　 　 　 　 　 　
　|　　　　ｌ　　　　　　　　　　　　　　＼
　ヽ　　　 -一''''''"〜〜｀`'ー--､　　　-一'''''''ー-､. 　 　
　　ヽ ＿＿＿＿(⌒)(⌒)⌒)　)　　(⌒＿(⌒)⌒)⌒))



　 　　　　 　　　＿＿＿_
　　　　　　　 ／_ノ 　ヽ､_＼
　ﾐ　ﾐ　ﾐ　　oﾟ(（●）) (（●）)ﾟo　　　　　　ﾐ　ﾐ　ﾐ 　　　＜だっておｗｗｗ
/⌒)⌒)⌒. ::::::⌒（__人__）⌒:::＼　　　/⌒)⌒)⌒)
|　/　/　/　　　　 　|r┬-|　　　　|　(⌒)/　/ / /／　　
|　:::::::::::(⌒)　　　|　|　 |　　 ／ 　ゝ　　:::::::::::/
|　　　　　ノ　　 　　|　|　 |　 　＼　　/　　）　　/ 　
ヽ　　　　/　　　　　　`ー'´ 　 　 　ヽ /　　　　／　　　　　
　|　　　　|　　 l||l　从人 l||l 　　　　 l||l 从人 l||l　　　バ　　　
　ヽ　　　 -一''''''"〜〜｀`'ー--､　　　-一'''''''ー-､　ン
　　ヽ ＿＿＿＿(⌒)(⌒)⌒)　)　　(⌒＿(⌒)⌒)⌒)) バ
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　ン

配布が駄目なら此所に貼るかｗ

>>856
童貞乙！

ちょっと訴えるとか言われたらヒビリあがってる小物たちのスレはここですか?

過去からすべて調べ上げて通報したから。調子に乗って顔真っ赤で煽っているやつは名誉毀損で
訴えて拘置所に入れて社会的に抹殺するから。もう媚びて謝っても無駄だから。

自首します

〜から。〜だから。ってからからうるせーぞ。
からはおまえの頭だろ！

さて貼るよ？

はんさ、だらんないがけ〜

８７２の人気に・・・・嫉妬しなかったｗ

http://live25.2ch.net/test/read.cgi/mmonews/1178877566/

>>872
死ねクソボケ。

つまり>>872は自分もマクロ欲しくて仕方がないのに
なんか他の奴が貰えてるっぽくて逆ｷﾞﾚしてる、でFA？

>>880
乞食に逆切れするかよ

>>872はどう見ても乞食の中の乞食でフリーオート

マクロ欲しくて必死な奴が集うスレはココですか？

マクロ組めない方はこちらへ

　サミタ真っ黒初心者質問スレ　その1
http://game11.2ch.net/test/read.cgi/mmosaloon/1177652183/l50

童貞はみるきぃやちぇりぃにストーカする恐れがあるから警察に通報しとくよう
メールしとくから。童貞は特に厳しくしないと危険だから一生刑務所暮らしに
なるよう訴えるから。もう女も出来ないし、人生終わりだから。

そんなに言われても住所も本名も知らないのでストーカーする
とか出来ないですけど。不可能な事いわないでください。

マクロ組めない方はこちらへ

　サミタ真っ黒初心者質問スレ　その1
http://game11.2ch.net/test/read.cgi/mmosaloon/1177652183/l50

>>872よマクロより
最近出回っている出会い系への誘導メールのほうが問題じゃない？

突然MMすいません。。HN kokoro0409って言います☆彡
私はまだ登録したばかりなんですけど
もしよかったら仲良くしてください♪

アイテム交換とかいつかしたいので
頑張って集めますね♪
そんなことをいいつつまだ使い方すら全然
把握できていませんけどね（笑）

ココでもスロ仲間？的な意味ではそうですけど
普通にお友達も出来たらいいなぁって思ってるので
もしよかったらMMじゃなくて普通にメールもしませんか？
基本的にココにいるときはスロに集中しちゃったり
なかなかすぐ返事が出来ないかもしれないし。
それにいつも使いなれているメールの方が楽なので♪
なのでこっちにメールをもらうより直接くれた方が
返事をしやすいです♪
情報交換だったり、スロとは全く関係ない話だったり出来たらいいな♪

[email protected]

私は仕事中でも全然メールはいつでも出来るので
ヒマなときにでもメールしてくださいね☆彡

♪絵理香でした♪

こんなんきたぜｗ怪しさ爆発

>>872早く訴えてｗ

>>888
あ！全く同じのきたぞ！
あぶないあぶないｗ

>>885
風俗いったか?

http://www.din-or.com/bbs

>>872↑　ウイルス
下らんことするなよな

おいら昨日のクレクレ君だけど、とってもすご〜い極上品を貰えたよ♪
このスレの人達ってホント、優しい人がおおいよね。
貰ったのはUWSCじゃないけど、UWSC覚える途中だったんで、これからもくだらない質問するかもしれないけど、先生方よろしくね♪
最終的にはVBに辿り着きたいと願ってます。

とりあえず、なんちゃってマクラーの仲間入りをしたクレクレ君でした。

なんだこの流れ。
クレクレ君の自演か？

>>894
サミタ真っ黒初心者質問スレ　その1
http://game11.2ch.net/test/read.cgi/mmosaloon/1177652183/l50

なぁ、HBのマクロは需要があるのか？
どうもいまいち作る気になれんのだが

もうつくるのHB以外に無いんだよ、でもHB作る気になれん

>>897
あまり人気ないですね
インテリもだんだん　価値落ちてきてるし

ハズシとDDT仕込めばそれなりにやり甲斐はあるよ

作るかなじゃあ、HBのDDT&ハズシ入りマクロ
多分使わないと思うが。

>>888
8日にそのメールが来て、うっかり返信したら
14日になって返事が来ました。

もうサミタやめたって書いてあったけど、
その間も勧誘メール出してたんだね。

>>900
Hbは作ってて楽しかったよ
猛獣や巨人2も作り甲斐があった

私の南国と島唄５Ｇに一回くらい一度に２Ｇ増えて
回転数が他の人より１．５倍くらいになるんですがバグかな・・・

３枚掛けしたと思ったらもう一回３枚掛け・・・
でもＪＡＣ中はしっかり２８枚増えてるし
どうなってるんでしょうか
連打ツールなんか目じゃないくらいの高速回しなんですけど

>>899
>>900じゃないけど、今更ながらHB組んだよ。

次はマッハに行く予定なんだが、過去ログに液晶を直で見ればいいってあったけど、それが一番苦労しそう。

>>904
液晶内ターゲットを取りづらい旋風やマッハの場合、
リールの明暗（明るいベルが流れてきた時）を判定して押し順を知る方法もありますよ。

>>905
ヒントありがとうございます。色々試してみます。

マッハはどうしてもクリアしたいっす。

マッハはサイドラと黄金神と同じ仕組みで作れるよ。
ビジ中処理とGoビタの処理が加わるけどAT部分の作りは流用できるはず

消灯時はリールとリールの間が暗くなるから、その時だけナビ判定処理に飛ぶといいよ。

猛獣もハズレを引きやすい、一定の周期があるような気がする。


気のせいかな？

>>909

ぷーとくん見れば分かるでしょ？
それを言ったらだめYO！

>>910
ですよね。
いろいろな枕ーが猛獣突いてるけど、出てるのはあの方だけですもんね・・

周期、いろいろ試してみるかな。

この時期、猛獣一日張り付いてると枕認定されちゃうな

人それぞれ楽しみ方があると思うけどみんなは神になってるのか？
俺はアラエボと☆３が取れないorzアラエボは６じゃだめかな？
○千枚勲章使って神になったやつにマクラーとしての意地を見せたいのだがむりぽ

>>913
う〜ん・・・神なんか全然だけど＾＾；
正直、運頼みだと思う。
回数こなすしかないんじゃない？

エボは開店待ちとかに300ぐらい回す。
高確SL引けなければヤメ。
GETまで期間は掛かるが、これが一番精神的にラク。

>>914
やはり回数こなすしかないですな…

>>915
その打ち方は設定不問？…だよね？

ん〜毎回設定券使ってたら養分だよな
養分になりたくないからマクロ組んだのにorz

わからないけど、ロングにでも入ったら使えばいいんじゃ？
設定券は、使わないと使い道がなくて、最近困ってるが・・・

SLは設定不問。
一撃必殺にかけたほうがいい。
あんなツマラン台は出来る限り回したくない。

185

アラエボは設定５にして連打マクロで2回目かな？
星３は1回で取れてしまってから触ってないなー。

>>896
お前自分が立てたスレが伸びないので必死に宣伝するなよカス。
このスレで充分なんだよ。

>>921
日本語変。

>>922
添削してみまつ
>>896
お前、自分が立てたスレが伸びないからって必死に宣伝するなよカス。
このスレで充分なんだよ。

>>923
変。

>>924
じゃ俺が添削するよ


>>896
自分を勃てたツレが脱がないからって必死にセンズリするなよカス。
そのヅラが嫌なんだよ

>>907-908さん
遅くなりましたが、レスありがとうございます。

参考にさせてもらいます。

>>925
おｋ。

>>925
誰がうまいこと言えt(ry

あれだな
マクロ作成で何が一番難しいって特定役を引く事だよな
ボーナスもＡＴも全然来ねええええ

どなたか優しい方、真黒のやり方等丁寧に教えてください。
[email protected]

誰かおしえてあげろよ

断る！
HELP読め。丁寧に書いてあるから。
それすら出来ないなら、やめておいた方がいいよｗｗｗ
クレクレ言っておきなｗ

教えてやるから、まず俺に教えろ

正直マクロなんてものは作れません
大好きな旋風・鬼武者・☆２をください
お願いします

嫌です

役立たずしかいねーのかよ

クレクレしか残ってねーよw

最近はこっちより初心者スレのほうが
役に立ってるね

>>932さま
HELPってなんのHELPですか？

神様HELP

>>940
30代半ば乙

>>940
チェッカルズ乙

HELP

次スレ
【社員敗北】777town ｴﾝﾄﾞﾚｽﾌﾞﾗｯｸ4【ﾏｸﾗｰ勝利
http://game11.2ch.net/test/read.cgi/mmosaloon/1179496302/

>>944
早い！
と言うか・・・イランだろ。
マクロスレ乱立させやがって

>>945
マクロ本スレはここだが？

過疎ってるな

訴えるとか言っていた小僧が粘着していたから尻尾巻いて逃げたみたいだな。

じゃぁ　梅