perl2exe forRO
レス数が1000を超えています。これ以上書き込みはできません。
0002デフォルトの名無しさん
NGNGbeta2botrはコンパイル済みなので不可。
・教えてばかりではなく、自分も情報提供しましょう
・koreのセットアップの仕方などは聞かない、答えない
0003デフォルトの名無しさん
NGNG【常時sage進行】
0004デフォルトの名無しさん
NGNG0005デフォルトの名無しさん
NGNG>【特徴】範囲索敵で周りの敵を攻撃。
->その際攻撃は一発ずつしていく。
>【特徴】おなじみ珍ワープBOT・wis無視
>vit馬鹿溜め込み剣士を目指しているような惨状
>赤ミス連発与ダメほとんど武器に依存
>避けれず被ダメオール１
->珍即剣設定になっているが珍速が発動せず超鈍速剣になっている
矢印の所がkore特有の問題
・攻撃間隔が長すぎる
・アーチャーとマジシャンには向かない
＊マジシャンは、事実上不可能
＊アーチャーは、接近戦になってしまう
・反撃モードが無い
＊アクティブがいる所 不可
＊リンクするモンスターも不可
両方とも死んでしまう
0006デフォルトの名無しさん
NGNG【常時放置進行】
0007デフォルトの名無しさん
NGNG・攻撃時の鈍足剣。→→part4にて解決済み。ソース提示有り。tankとの両立は無理。
・アイテムを売ってくれなくなる。
理由：アイテムテーブルがリセットされないから。
アイテムの番号をリセットすればいいらしい。
・出力ログファイルに書き出し
・キャラの位置、敵の位置を取得？それを表示。もしくは外部プログラムにて点で表示
・未解析ﾊﾟｹが多い。例 剣士のHP回復ｽｷﾙ マナーポイント
・たまにステータスがバグる。いろいろリセットする機能希望。アイテム売り問題と同系
0008デフォルトの名無しさん
NGNGperlをがんばって理解するより普通にプレイした方が楽だって
0009デフォルトの名無しさん
NGNG0010デフォルトの名無しさん
NGNG0011デフォルトの名無しさん
NGNG常時リセットじゃなくて、50％になったらリセット、もしくはコマンドでリセットするとか。
0012デフォルトの名無しさん
NGNGDat化待ちだし全然わからん。
0013デフォルトの名無しさん
NGNG0014デフォルトの名無しさん
NGNG0015デフォルトの名無しさん
NGNGstand命令を外して、敵に攻撃する時になったら立つという動作を入れてみようと思うのですが
発見時などに入れるとかなり比較する処理をすると思うのですがどうでしょう？
001615
NGNG0017デフォルトの名無しさん
NGNGBOTで狩りするとき、どこがオススメ？
漏れは
Lv10～20 バッタ海岸 or ﾓﾛｸ↑
Lv20～40 下水地下２階
なんだが。
ってか改造の話だからこういう話題は駄目なんかね？
0018デフォルトの名無しさん
NGNGそういう話をするとそこにBOT集中するからダメと思われ。
ただでさえ
695 名前： 名も無き冒険者 投稿日：02/09/05 09:21 ID:4sygIVXE sage
irisクワガタ峠見ないうちBOT増えまくりでつか
そうでつか．・゜・(ノД｀)・゜・．
ってなってるからな
0019デフォルトの名無しさん
NGNGｽﾚ違い云々じゃなく
その質問＝BOTerが集まる場所は？
ちなみに某所は独特の動きする奴が多いｗ
つうか、このｽﾚ盛り上がらないなｗ
＃一時的に攻撃ストップ atでストップ at kで再会
} elsif ($switch eq "at") {
($arg1) = $input =~ /^.*? (\w+)/;
if ($arg1 eq "") {
configModify("attackAuto", 0);
} elsif ($arg1 eq "k") {
configModify("attackAuto", 1);
}
0020デフォルトの名無しさん
NGNG17に質問なのだが(17以外が応えてもOK)
下水だとファーミリアが居るよな？
まあファーミリアに限らずなのだが
アクティブ＆リンクモンスはどうしているのか？
自分の場合、怖いからアクティブの居るMAPには行かない。
リンクは攻撃しない。としてるのだが
もう皆さんは解決済みなのですか？(;´Д｀)
それとも気にせずLet's Bot!なのか・・・？
かまわず掛るとリンクに何気に殺られるからどうしてるかおせーて。
漏れの場合、狩場は手動の場合とほぼ同じだが
アクティブ＆リンクモンスを殺れないから効率悪げ。
っていうかやっぱりPerlは理解必須ですか・・・そうですか……(´･ω･`)
0021デフォルトの名無しさん
NGNG折れもそれ気になる。下水でβ1のときみたいに
コウモリでないところがあればいいんだけど(下水β2で逝ったことない)
折れはこんくらいレベルだがフィールド使ってる。
0022デフォルトの名無しさん
NGNGファミリアの攻撃がゴミになるまで行くな。
つうか狩場とかそういうのはやめろって。
β2開始直後クワガタうまいって書き込みのせいで
その夜からクワガタ混みまくりーになったの覚えてないのか？
0023デフォルトの名無しさん
NGNG発言だけlogに取ろうと思うのですが場所が見当も付きません。
0024デフォルトの名無しさん
NGNGhttp://skycgi.zero.ad.jp/~zbm78265/up/u_file120020905032628.zip
これってどうなんでしょ リンク切れてるけど…
0025デフォルトの名無しさん
NGNG0026デフォルトの名無しさん
NGNGリンクが切れてて全く意味が分かりません。
0027デフォルトの名無しさん
NGNG内容はBor2とproxy
Bor2はK-BOTをβ２デ使えるようにしたもの
proxyはパケtoolですただし…が必要
002827
NGNG0029デフォルトの名無しさん
NGNG0030デフォルトの名無しさん
NGNGマジシャン使えますよ～
手抜きだけど…
・どのモンスターに対しても使う魔法レベル固定
・通常攻撃不可
＋αで、ＳＰ１０％以下になったら座ってＳＰ９０％になったら立つ＜ＨＰも可能
ＨＰ５０％設定だとして
ＨＰ５０％以下になったら座って５０％超えるとモンスター攻撃
また座って５０％まで回復…の繰り返し
0031デフォルトの名無しさん
NGNG- my $msg = pack("C*", 0x89, 0x00) . $monID . pack("C*", $flag);
+ my $msg = pack("C*", 0x13, 0x01, 0x04, 0x00, 0x13, 0x00).$monID;
ファイヤーボルトレベル４攻撃の場合
指定した％までＨＰ回復
-|| ($ai_saveHash{'attackAuto_sit_reason'} eq "hp" && percent_hp(\%{$chars[$config{'char'}]}) >= $config{'attackAuto_sit'})
+|| ($ai_saveHash{'attackAuto_sit_reason'} eq "hp" && percent_hp(\%{$chars[$config{'char'}]}) >= $config{'attackAuto_sit_end'})
指定した％までＳＰ回復
-|| ($ai_saveHash{'attackAuto_sit_reason'} eq "sp" && percent_sp(\%{$chars[$config{'char'}]}) >= $config{'sitAuto_sp'})) {
+|| ($ai_saveHash{'attackAuto_sit_reason'} eq "sp" && percent_sp(\%{$chars[$config{'char'}]}) >= $config{'sitAuto_sp_end'})) {
config.txtに
attackAuto_sit_endとsitAuto_sp_endを追加
0032デフォルトの名無しさん
NGNG使えるならあっちのほうがいいんだが…
なぜかkoreはずっと放置しとくと止まってくれちゃってることがあるらね…
0033デフォルトの名無しさん
NGNG0034デフォルトの名無しさん
NGNG選択式闇ポタの作り方キボンヌ。
闇ポタのやり方まではわかったんだが、
座標をプレイヤーにあわせるやり方がいまいち。
0035デフォルトの名無しさん
NGNGキャラの座標の取得方分かったら教えてやるよ。
0036デフォルトの名無しさん
NGNG安易な思い付きだが、PLで回りに居る奴を見つけて、
[SP (ポタの番号) (PLで見つけたプレイヤーの番号)]
でPLで見つけたプレイヤーにポタ発動とか出来んのかな？
今ちょっと試せないからできるかわからんのだけど。
あと質問で、PTMのHPがx%以下になったらヒール！
ってBOTは可能なのか？
PTMのHPを感知できるかが不明だからこれも無理かにゃぁ・・・
せめて、BOTに[h]と発言するだけで発言したキャラにヒールを掛ける。
とかが欲しい。毎回コンソールコマンドでやるのはつらいもじゃ・・・
0037デフォルトの名無しさん
NGNGhelp読めない？
003927
NGNGwww.revemu.com
ここはつぶれた？であろうサイトタイ語
www.se-ed.net/wooth2000
0040デフォルトの名無しさん
NGNG・アイテムリストのリセット方法（売らなくなる問題）
・他のPCの発言をログに書き出す
・未解析ﾊﾟｹが多すぎる（unparsed packet error）
かな？
0041デフォルトの名無しさん
NGNGで、誰かわかる？
} elsif ($switch eq "00A1") {
$ID = substr($msg, 2, 4);
if (%{$items{$ID}}) {
print "Item Disappeared: $items{$ID}{'name'} ($items{$ID}{'binID'})\n" if $config{'debug'};
%{$items_old{$ID}} = %{$items{$ID}};
$items_old{$ID}{'disappeared'} = 1;
$items_old{$ID}{'gone_time'} = time;
undef %{$items{$ID}};
removeBin(\@itemsID, $ID);
の最後から2劣目のと最後の行のを所持アイテムのに変えればいけると思うんだけど、
最初の00A1が何なのか2劣目のもわからない(;´Д｀)
0042デフォルトの名無しさん
NGNGカートアイテム
} elsif ($switch eq "0121") {
$msg_size = 14;
・・・
中身のログは飛びました（謎
004327
NGNG板違いだが人の少ないこっちにうｐ
PASSは神のかたの現在のHPタイトルをコピペ
wpeproalphaより使いやすい？
wpeproalphaを多機能にした感じ
004417
NGNGVIT上げまくれば無問題。被ﾀﾞﾒ1とかだYO。
まあ持ち物50%以上になって死んでるときもあるけどなー（;´ー｀）
というわけで狩場話題は
糸冬 了
0045デフォルトの名無しさん
NGNG今後の予定
1 コマンドで今のPC座標＋モンス座標を別ファイルに書き込み
2 そのファイルを別のCGIで文字なりあらかじめ用意した画像に置き換える。
3 それを表示してウマー
こんな感じ
├─┼─┼─┼─┼─┼─┼─┼─┼─┤
│ │ │Ⅱ│ │ │①│ │ ｜ │
├─┼─┼─┼─┼─┼─┼─┼─┼─┤
│ │③│ │ │★│ │ │Ⅰ｜ │
├─┼─┼─┼─┼─┼─┼─┼─┼─┤
│ │ │④│ │Ⅲ│ │②│ ｜ │
├─┼─┼─┼─┼─┼─┼─┼─┼─┤
でも俺には無理だｗ
004627
NGNGこれなんだろう？
0047デフォルトの名無しさん
NGNGあう・・・漏れがアフォでした・・・
[heal (回復量)]
で全然いけましたねヽ(´ー｀)ﾉ
そして時間差WIS＆ヒールで結局死んでる罠・・・
>>44
なるほど。了解。。。
結局BOTはランク下の狩場でないと無理ってことか(;´Д`)
そしてVIT1のボク。
糸冬 了
0048デフォルトの名無しさん
NGNG#/usr/bin/perl
# Simple DoS Script
# Config for only Ragnarok Server
# Created by Jansee
# Copyright 2002 (c) Jansee - XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
おいおい
0049デフォルトの名無しさん
NGNGＤｏＳ宣言ですか？
凄いですね。
0050デフォルトの名無しさん
NGNGprint "(From: $privMsgUser) : $privMsg\n";
pmprint($privMsgUser,$privMsg) ; ＜＝追加
} elsif ($switch eq "0098") {
=====
以下をsub dumpData の上あたりに追加
sub pmprint {
my $privMsgUser = shift;
my $privMsg = shift;
my $dump;
$dump = "(From: $privMsgUser) : $privMsg\n";
open DUMP, ">> pm.txt";
print DUMP $dump;
close DUMP;
}
0051デフォルトの名無しさん
NGNG使えないvit型でBOTするくらいなら自分でプレイするけどな（ｗ
0052デフォルトの名無しさん
NGNG・他のPCの発言をログに書き出す
>>50 に追加
print "$chat\n";
openchatprint($chat) ;＜＝追加
} elsif ($switch eq "008E" && length($msg) >= unpack("S1", substr($msg, 2, 2))) {
====
これも追加
sub openchatprint {
my $chat = shift;
my $dump;
$dump = "$chat\n";
open DUMP, ">> chat.txt";
print DUMP $dump;
close DUMP;
}
時間が残らない
日付ではなく時間を入れたいのだが…
0053デフォルトの名無しさん
NGNG>>52
神
0054某板の73
NGNG自分の改造したものからヤバい機能を削ったもの。
最初からBOTとして使うつもりは無いので戦闘関係の処理は弄ってないに等しいです。
あと、コードが稚拙なのは仕様です。動けばいいや程度ですので。
改造点の解説はしませんので、わかる人だけどうぞ。
簡易チャットソフトくらいにはなります(´･ω･`)
0055デフォルトの名無しさん
NGNGfollow対象のHPが％以下になったら、botが自動でhealをするように
試行錯誤しているんだけどfollow対象の現在HPって取得してるんかいな・・・
難しいね、改造は
0056デフォルトの名無しさん
NGNGprint "(From: $privMsgUser) : $privMsg\n";
pmprint($privMsgUser,$privMsg) ; ＜＝追加
} elsif ($switch eq "0098") {
print "$chat\n";
openchatprint($chat) ;＜＝追加
} elsif ($switch eq "008E" && length($msg) >= unpack("S1", substr($msg, 2, 2))) {
====
以下をsub dumpData の上あたりに追加
sub pmprint {
my $privMsgUser = shift;
my $privMsg = shift;
my $dump;
$dump = "(From: $privMsgUser) : $privMsg\n";
open DUMP, ">> pm.txt";
print DUMP $dump;
close DUMP;
}
sub openchatprint {
my $chat = shift;
my $dump;
$dump = "$chat\n";
open DUMP, ">> chat.txt";
print DUMP $dump;
close DUMP;
}
これでokでしょうか？
0058デフォルトの名無しさん
NGNG0060デフォルトの名無しさん
NGNGはやすぎて鯖飛んじゃうし
0061デフォルトの名無しさん
NGNGBOT飛ばしはﾏﾅｰ厨の言うところのﾉｰﾏﾅｰじゃなかったのか？（藁
マジでポタルｳｻﾞｲ
0062デフォルトの名無しさん
NGNG0063デフォルトの名無しさん
NGNGパーティが攻撃した時だけＢＯＴも攻撃
0064デフォルトの名無しさん
NGNGｱﾋｬﾋｬﾋｬhyﾊﾔﾋｬｱﾊﾔﾋｬｯﾋｬﾊ
0065デフォルトの名無しさん
NGNG0066デフォルトの名無しさん
NGNG0067デフォルトの名無しさん
NGNG0069デフォルトの名無しさん
NGNG007031=50=52
NGNG} elsif ($switch eq "013E") {
$msg_size = 24;
# 3E 01 ** ** 02 00 F3 C9 00 00 00 00 00 00 13 00 03 00 00 00 93 0A 00 00
ずれてるだろうから…
for Turbo pascal形式
switch : word ; {013E}
char_id : longint;
mons_id : longint;
dummy : longint;
skill_id : word;
skill_lvl : word; {実際のスキルレベル４だとここは３になる}
dummy2 : word;
hatena : longint;
それにしてもＭＭＯ板の制限きつくなってきてるね～
長いが書き込めないよ
0071デフォルトの名無しさん
NGNG0072デフォルトの名無しさん
NGNG糞スレたてんなヴォケ
>>71
通報しますた。
007331=50=52
NGNGポタル回避
} elsif ($switch eq "011F") {
$coords{'x'} = unpack("S1",substr($msg, 10, 2));
$coords{'y'} = unpack("S1",substr($msg, 12, 2));
print "Portal opened at $coords{'x'}, $coords{'y'}\n";
sendTeleport(\$remote_socket, "Random") if $config{'PortalAvoid'}; ＜＝追加
$msg_size = 16;
で、config.txtにPortalAvoid追加
0074デフォルトの名無しさん
NGNG>31のKoreでﾏｼﾞが使えるとは感謝です。
でも敵が死んだ時のパケット？が上手く受信できない時に
表示上は死んで居てもKoreで認識されてなくて死体に連続で魔法撃つのって止められないのかな。
要は1発殴ってターゲット変更って感じにすれば良いと思うんだけど、わからな・・い
ｵｵ・・・
これで画面見たらﾋﾟｯｷ狩ってたときの悲しさを回避できます
007631=50=52
NGNG# スキル攻撃withダメージ表示
} elsif ($switch eq "0114") {
$msg_size = 31;
ダメージ与えた時のダメージ値はこれなのだが…
どのテーブルにどう入れればいいのか不明 ＜＝なんとなくは分かってる
死んでも魔法唱えてるのはしょうがないかも
wizに転職したよ…
>>75
画面移動じゃないよ
ＰＣのワープポータル回避だよ
0077デフォルトの名無しさん
NGNGPCがﾎﾟﾀﾙ詠唱したらteleするんだよね
ｔｈｘ！
007831=50=52
NGNG私の場合ポタル出した人の名前をファイルに落としてるけどね
で、ここだけの話
ＰＴの公平分配が無効になるときがある
公平分配した人同士が別マップに移動すると解除されるらしい ＜＝ ポタルに入ったからかもしれん
面倒だから今度からTPascalのコテハンで、書き込もう
0079デフォルトの名無しさん
NGNGもちろんLvは公平分配が可能なLv差
リーダーはKoreBOT
・メンバーが再ログイン （BOTがrelog
・誰かが別MAP移動した場合
・誰かが同じMAPに戻ってきた場合
・リーダーがrelog
キャラは４体で全部おれが管理してるからLv差がありすぎたってことはない。
こんな感じ
0081蟻の巣掃除人
NGNGまず、pmprint, openchatprintを次のようにする。
sub pmprint {
my $privMsgUser = shift;
my $privMsg = shift;
my $dump;
&get_time;
$dump = "$date | (From: $privMsgUser) : $privMsg\n";
open DUMP, ">> pm.txt";
print DUMP $dump;
close DUMP;
}
sub openchatprint {
my $chat = shift;
my $dump;
&get_time;
$dump = "$date | $chat\n";
open DUMP, ">> chat.txt";
print DUMP $dump;
close DUMP;
}
0082蟻の巣掃除人
NGNGsub get_time {
$ENV{'TZ'} = "JST-9";
($sec,$min,$hour,$mday,$mon,$year,$wday) = localtime(time);
$year = 1900 + $year;
$mon++;
if ($mon < 10) { $mon = "0$mon"; }
if ($mday < 10) { $mday = "0$mday"; }
if ($hour < 10) { $hour = "0$hour"; }
if ($min < 10) { $min = "0$min"; }
if ($sec < 10) { $sec = "0$sec"; }
$week = ('Sun','Mon','Tue','Wed','Thu','Fri','Sat') [$wday];
$date = "$year\/$mon\/$mday\($week\) $hour\:$min\:$sec";
}
日付いらんとか言う人は適当に改造してくれい。
$date = "$hour\:$min\:$sec";
にすりゃ時間だけになるはず。
0083デフォルトの名無しさん
NGNG一回だけ質問させていただけますか？
sendTeleport(\$remote_socket, "Random") if $config{'PortalAvoid'};
は最初にkoreが使えるようにするために起動した本家kore-0.68.08のフォルダの中にある
kore.plに書き加えるだけでいいでしょうか？（メモ帳で）
でconfig.txtのPortalAvoidはどの列に書いてもいいんでしょうか？一番下とかですか？
0084デフォルトの名無しさん
NGNG0085デフォルトの名無しさん
NGNGKore.plを走らせると、１行目でエラー
１行目をコメントアウトすると７０行目でエラー
７０行目をコメントアウトするとログイン出来ない
みたいな感じなんですが、どなたか解決法を教えていただけないでしょうか？
どうかよろしくお願いします。
>>83
後者だけ
どこでもいいです。
0086デフォルトの名無しさん
NGNGどうしても「command not found」って出ちまう。
XPの場合、フォルダ指定は cd Kore-0.68.08 じゃなくて
cd c:/Kore-0.68.08 だしな。もしやLinux関係じゃないと無理？！
perlは初めてなんで厨書き込みスマソ。
0087蟻の巣掃除人
NGNGよくはわからんけど、Time-HiResがきちんと入ってないせいだと思われ。
俺も最初それで１行目ではじかれたし。
あとは、Activeperlがちゃんと入ってないとか。
デストローイことＲＡＧＣＨＥＡＴに書いてある>>698さんＴＸＴをもう一度見てみれ。
0089デフォルトの名無しさん
NGNGマウスだけでできたけどなぁ
0090デフォルトの名無しさん
NGNG698のTXT
>D:\Perl\arch\autoの中にTimeフォルダを貼り付ける。
ここが間違ってない？
0091デフォルトの名無しさん
NGNGarchってのとautoってフォルダを作るってことでしょうか？
plってので読むようにしてから書き換えればポタル避けとかができるようになるんでしょうか？（必死
0092デフォルトの名無しさん
NGNG微妙に違うフォルダにTimeフォルダ貼り付けたら
、なんかうごいたような・・。
0093デフォルトの名無しさん
NGNG0094デフォルトの名無しさん
NGNG0096デフォルトの名無しさん
NGNG普通にやった時より遙かに早い・・・鬱
0097デフォルトの名無しさん
NGNG一瞬窓がでて閉じてしまう
神様いたらポタル避けのついたkore.plうｐおながいします…
ttp://dtsi.dyndns.info/~uploader/2ch-ro/index.cgi
0098デフォルトの名無しさん
NGNG色々と妙な事が起きるかもね。
0099デフォルトの名無しさん
NGNG0100デフォルトの名無しさん
NGNGこれをｷｬﾗ名とかに変えたいのですが、出来ないのでしょうか？
kore.plの名前を『ｷｬﾗ名.pl』とかに変えても「PERL」と表示されます（つД｀）
0101デフォルトの名無しさん
NGNG0102デフォルトの名無しさん
NGNG何が変わるのか分からんのなら当てるなよ
ついでに100ｹﾞﾄｰ
0103デフォルトの名無しさん
NGNGぬるいわッ
0104デフォルトの名無しさん
NGNG>>83-101 （一部除く）
素直にデフォルトのKore使っとけ。
010527
NGNGみなさんがんばっているのでプレゼント
PASSは27です
0106デフォルトの名無しさん
NGNG>} elsif ($switch eq "008E" && length($msg) >= unpack("S1", substr($msg, 2, 2))) {
こいつのせいでｴﾗｰが出るんだが…なんでここ変えてるんでしょうか？
便利だ。ありがたい
010927
NGNGモンスターリスト入れ忘れたのでうｐ
ファイル名をmonsters.txtにしてくださいただし英語です
0110デフォルトの名無しさん
NGNGActivePerlでplを実行しないとだめぽ？
0111デフォルトの名無しさん
NGNGだめぽ。ってかダメッ。
0112デフォルトの名無しさん
NGNGありが㌧(・∀・)!!
0114デフォルトの名無しさん
NGNG0115デフォルトの名無しさん
NGNGai_teleport_portal x は移動ポイントを見つけた時にx秒後にワープ
ai_teleport_hp x は
hpがconfig.txtのattackAuto_teleport_hp x で設定された値まで落ち込むとx秒後にワープ
で合ってる？
0116TPascal
NGNG==========ここから
} elsif ($cmd{'msg'} =~ /\bcwhere\b/i) {
($map_string) = $map_name =~ /(.*)\.gat/;
sendMessage(\$remote_socket, $cmd{'type'}, "($map_string) $chars[$config{'char'}]{'pos_to'}{'x'}, $chars[$config{'char'}]{'pos_to'}{'y'}\n", $cmd{'user'}) if $config{'verbose'};
return;
==========ここまでを
} elsif ($cmd{'msg'} =~ /\bconf\b/i) {
=======これの上あたりに追加
wisで、cwhereと入れれば、表示しまふ
0117デフォルトの名無しさん
NGNG今は適当なフォルダにpatch.exeとpatchesフォルダとKore-0.068.08フォルダをおいてpatch.exeを起動
cd Kore-0.68.08
patch < patches\patch-aa.diff
をペーストしてエンター押してるんですが、まったく反応ありません、、
パッチの当て方おしえていただけませんか？
ｸﾞｸﾞｯﾃ見たんですが、見た限りこれでいけるとおもうんですが、、、
0118TPascal
NGNGＢＯＴ数体をバラバラに設置してる香具師は分かってるとおもうが 数分止まるラグの原因が判明した
Loki鯖を取ると(各鯖の役割)
61.215.212.53～62
クライアントとのコネクション
ＮＰＣ（モンスター含む）の動作
オープンチャット
61.215.212.52
キャラクターセレクト＆キャラクターＤＢ
61.215.212.51 ＜＝これが問題
耳打ちチャット
ＰＴ＆ギルド関係全て ＜＝ＤＢもここにある
ログインしてるかの確認
51の鯖が過負荷になると耳打ち等の遅延などが発生する
ＢＯＴをchaosとirisで、やってるのだが…
片方の鯖で、動かしてる全てのＢＯＴがキャラセレ以降接続できなくなってる時がある
この時に別な鯖は問題ない
で、接続出来なくなった数分後に入れるようになるが その時はwisの遅延が無い
0119デフォルトの名無しさん
NGNGpatchコマンド diff
で、ぐぐっても分からなかったら諦めな
0120117
NGNG相当バカでした。
DOS窓の扱い方さえ知りませんでした。
0121名無しさん＠Ｅｍａｃｓ
NGNG> 61.215.212.51 ＜＝これが問題
> 耳打ちチャット
> ＰＴ＆ギルド関係全て ＜＝ＤＢもここにある
> ログインしてるかの確認
>
> 51の鯖が過負荷になると耳打ち等の遅延などが発生する
負荷は人数 n の2乗に比例してしまうと考えていいのかな。
012227
NGNG210.153.114.238/img-box/img20020907212122.zip
PASSなしです
210.153.114.238/img-box/img20020907212326.jpg
↑はこんな感じになります
mapがほしい場合はてきとうにカキコしてください
動かし方は神の方のページを参照のこと結構いいできです
使い方もある程度答えられると思います
0123デフォルトの名無しさん
NGNGMeでも動かせないかのぅ
0124デフォルトの名無しさん
NGNGProblem with login server, waiting...
どうあがいても使い方がわかりませんヽ(`Д´)ﾉｳﾜｧｧﾝ!!
0125デフォルトの名無しさん
NGNGｳｲﾙｽか・・・？
0126デフォルトの名無しさん
NGNGマジ最新版っぽいがログイン鯖落ちてて試すに試せない罠
とりあえずthx
0127デフォルトの名無しさん
NGNG*パッチの当てかた
等の初歩的な事には答えないでください。
また、そういうレスがあっても脳内であぼーんして野次レスもしないようお願いします。
012827
NGNG動かし方
OSは9x系はダメ。MEももちろんダメ。
MSWINSCK.OCXがないというエラーがでる場合は検索でもしてsystemフォルダにぶちこめ。
2000かXPの場合なら地域と言語の設定で海外製BOTが動くようになる。
■2000の場合
設定＞コンパネ＞地域のオプション＞システムの言語設定
西ヨーロッパと米国にチェックを入れる。カーソルを合わせて規定値に設定ボタンを押す。
システムロケールの選択が出るから英語（US）を選択。
OKおしていくと、再起動のウインドウが出るから再起動。
ROのクライアント起動して、日本語が文字化けしてたら英語化完了。
■XPの場合
コンパネ＞地域と言語のオプション＞標準と形式＞英語（米国）にする。
3つ目のタブに移りunicode対応でないプログラムの言語という項目も英語（米国）にする。
で、再起動すればいい。
0129デフォルトの名無しさん
NGNGMAPｷﾎﾞﾝ
013027
NGNGwww.hoops.ne.jp/~next-drop/u_file120020907223608.zip.html
mapです
bor2のフォルダーの中にmapというフォルダー作ってください
そしてそのまま入れてあげてください
>>125
ウイルスですｗ
0131デフォルトの名無しさん
NGNG俺はperl2しか使ったこと無いんだが、bor2とどっちの方が使い安い？
やるのが面倒そうだったからひとつも触ってないのだが…（；´Д｀）
0133デフォルトの名無しさん
NGNG0135デフォルトの名無しさん
NGNG0136デフォルトの名無しさん
NGNGKoreだと敵を倒した後にテレポか立ち止まるしかないからかなり不自然
0137デフォルトの名無しさん
NGNGあと、日本語含んだフォルダーから全部起動しなくなった（USにかえたから
BORいろいろいじるにはどうすればいいん？
0138デフォルトの名無しさん
NGNGフォルダ名、ファイル名に日本語を使わない
0139デフォルトの名無しさん
NGNGちゃんと書き換えて起動したけど、日本語名のフォルダー他にもたくさんあるから
めんどい・・・・っていうか、かちゅ～しゃでスレ表示すると文字化け
常用不可能っぽい・・・BOR2と・・・
014027
NGNGそこが問題なんですな日本語表示ができない
しかし、Attack.txtをいじると特定の敵を攻撃しなくなる（確か
数字の前に/を入れる
/1002 Poring
こんな感じ（試してないのでわからんな
0141デフォルトの名無しさん
NGNG重いマップで槍騎士を動かしてみたら、koreだとうまくこうげきできるのに
bor2だと近づく→離れるの無限ループでなかなかうまくいかなかった
0142デフォルトの名無しさん
NGNG主要プログラムは別HDDのRootにそれぞれフォルダ作っとくとか
マシン２台用意して片方BOR2用で、片方かちゅ～しゃ用にするとか
0143デフォルトの名無しさん
NGNGこれは、『ただ』起動しているだけなのか（；´Д｀）？
一向に、ログインできる様子無し。
0144デフォルトの名無しさん
NGNGAUTOMOVEだけであやすい・・・・
あと、敵をたたくとき敵が動くと敵が動く前の場所に行ってまた敵が動いて・・・
ってなってこれまたあやすぃ
0145デフォルトの名無しさん
NGNG当然二重ログインエラーでふたつともログインできないはずなんだが
あるタイミングで両方同時にはいれて、それぞれ別のログが進むのよ
片方はsend attackしてるのに、その間かたほうはアイテム拾ってたり座ってたり。
これって実際どうなってるんだろう・・・
where座標も違った
公式クライアントでそこまで見に行こうと思ったが鯖缶・・・
0146デフォルトの名無しさん
NGNGそれ漏れも思った。
なんかモンスの行動先読みしてる感じで・・・
014727
NGNGなんだかんだでソースセット
適当にご利用ください少しは役に立つ？でしょう
PASSは27です
0148デフォルトの名無しさん
NGNGあと環境だけど日本語でも起動まで逝くけどログイン不可。
英語でやっとログインできるみたい。でc:\あたりに置くのが無難。
mapの地図がねーよと蹴られてあまり研究してないけどね。
これって経験値効率はkore系とbor2とどっちがいいんだろうね？
誰か試した人いたら簡単でいいからレスきぼん。
014927
NGNG132でも少し書いたのだが
たぶんkoreのほうが効率がよいと思われる
koreのほうが処理が早い？
bor2はなんかタイミングが遅れてる
ってことで
何も考えないほったらかしはkore
すこしいじりたいチャットとかは使いやすいbor2
なのです
0150のび
NGNG英語モードに変更、ログインまでいけました。
町の中にいるのでそれからどうしたらいいのかわからんのですが。
チャットやキャラウィンドウが文字化けしてしまいますし、Windows全体の動作的にも不便な点が多い…
日本語を文字化けなしで表示させるにはどうしたらいいのでしょうか？
0151デフォルトの名無しさん
NGNG日本語モードに戻してragnarok.EXE起動
0152デフォルトの名無しさん
NGNG0153デフォルトの名無しさん
NGNG貴方は垢BANされました。
・・・ってか単純に人が多いだけ・・・と思いたい(ぉ
0155デフォルトの名無しさん
NGNG正規クライアントでは普通に入れるのに・・・・(´･ω･`)
重いだけかもしれんから明日の朝まで待つか
0156デフォルトの名無しさん
NGNG改善案
・攻撃時の鈍足剣。→→part4にて解決済み。ソース提示有り。tankとの両立は無理。
って前のほうにのってたんだがpart4がdat墜ちで見れない・・・
誰か教えてくださいな
0157デフォルトの名無しさん
NGNGsenｔatackの時にキーボードのctrl押しておけばok。
常に押した状態でも可能
0158デフォルトの名無しさん
NGNG単純に攻撃するところの末尾パケットを07にしてるだけ。
tankとの両立は無理じゃない。それは書き換えるところが大雑把なだけ。
0159デフォルトの名無しさん
NGNGそれちげぇだろ(´￢｀）
>>156
どっかの0を7に変更だったかと
ただしTankModeは使えなくなる
0160デフォルトの名無しさん
NGNGそうですかぁ。やっぱkoreがベターなんですねぇ。
確かにkoreはplでいじりやすいから異論なクローンできそう。
>垢
入れないだけみたいです、こちらでは確認済みです。
ただあんまやりすぎると本当にBANされるらしい････
あとpart4だけど手元にあるよ。誰かあぷろだ家紋。
0161デフォルトの名無しさん
NGNGttp://yami.plala.jp/upldr/
0162デフォルトの名無しさん
NGNGttp://dtsi.dyndns.info/~uploader/2ch-ro/
0163デフォルトの名無しさん
NGNG仕方ないので本スレのとこ借りました。htmlに変換でヨロ。
tp://nekomimi.ws/~asanagi/cgi-bin/ragnarok/source/20020908010530-rag4.tar
0165デフォルトの名無しさん
NGNG( ﾟДﾟ)ｺﾞﾙｧ!!と言われまくり。どーすりゃいいのよ･･･。
0166デフォルトの名無しさん
NGNGたぶんこっちがFAだったんだろう。
0167デフォルトの名無しさん
NGNG(教えてクンでゴメン)
0168デフォルトの名無しさん
NGNGのマップが消えてる…
誰か再うｐお願いできませんか？
0169デフォルトの名無しさん
NGNG日本語アイテム名導入して、それ用にAutoSell書いたらいままで売ってくれなかったのを売ってくれるようになったよ
thx!
英語名だと名前にスペース入るのは後のほうがパラメータ(?)と見られてしまっていて売れなかった気がする
0170デフォルトの名無しさん
NGNGたまに横殴りすんなｺﾞﾙｧってwis届いてて、そいつがﾏｼﾞかWizだったら「魔法陣はまだ攻撃したことになりませんよ」みたいに言いたいんですが…。
wis送って来た奴だけのを記録するのはたぶん無理っぽいので、片っ端から記録しとけば可能かなと。
0171デフォルトの名無しさん
NGNG出来るよ。
0173デフォルトの名無しさん
NGNG（ ´,_ゝ`）
0174デフォルトの名無しさん
NGNG概要は
・移動しない
・周りに来た敵を攻撃（又は攻撃された敵を攻撃）
・落ちたアイテムを拾ったら元の場所付近に待機。
これはどこら辺を改造したら出来ますか？
0175デフォルトの名無しさん
NGNGkoreのアクティブ対応化がなかなか難しい(;´Д｀)
非改造では横殴りしまくりで、BOTだとバレバレ。
first attack判定に dmgToYou>0 の条件を追加すれば一応反応してくれるのだが、
アチャスケのように遠くのモンスターに反応しないし、当然、非アクティブも叩かない。
0176のび
NGNGアイテムを自動的に拾ってくれていないようで…
清掃員の名折れになってしまうので、どうしたらいいのでしょうか？
神様のHPから落としものに、27さんの>>105を上書きしただけです。
017727
NGNGさいうｐしたよ３回失敗したけど
rose.zero.ad.jp/~zbm90840/download/u_file120020908173401.zip
>>169
27は全部わたしですｗ
>>175
config.txtやmon_control.txtをいじってみては結構変わります
チート交換所(Ragnarok) part6
http://yasai.2ch.net/test/read.cgi/mmo/1031424691/
はかなりの盛り上がりを見せてるようですが…
↓これを役に立ててください
www4.lib.net/~red/upload/u_file120020908165110.zip
あくまでもパケ解析にチートではなく
PASSは27です
0178某板の73
NGNG出来ること→露店アイテム購入、ギルドチャット、自動会話(ループ可)など
lzh→Pass付GCA（パスは某板(http://***2.*****.net/04/ragnacheat/)のアドレス）
http://dtsi.dyndns.info/~uploader/2ch-ro/file/20020908181010.lzh
0179デフォルトの名無しさん
NGNGプログラム板に立てた人に感謝だな。
0180某板の73
NGNG誤：undef %{$venderLists{$ID});
正：undef %{$venderLists{$ID}};
３箇所くらい手動で直してください(´･ω･`)
018127
NGNG新しいbor2です韓国サーバーの追加みたいです
0182デフォルトの名無しさん
NGNGまぁ、こっちは升よりも、いかにプログラムを組むかが主題だからね
>>1に感謝ヽ(´ー`)ノ
0183デフォルトの名無しさん
NGNG某板ってあそこだったのね
試してみるよ thx
0185某板の73
NGNG対した事はやってないのであまり大きな期待はしないで下さい。
Perlなんて掲示板スクリプトの改造程度しかしたことないからソースも汚いし、
個人的なデバッグ用設定が残ったままなのでやたらテキスト保存しまくりますし。
0186デフォルトの名無しさん
NGNGありがと（・∀・）ﾉｼ
これで150zずつ増やせます…
0187某板の73
NGNGﾎﾝﾄはそういう用途で使って欲しくなかったんですよ(´･ω･`)
だから>54ではそれ関連の機能を削っていたんですが、もうどーでもいいや
ってことで残したままUPしました。
アクティブ反撃(これも>54では削っていた)は修練場にBOT3体置いてカード出るか
試していた時の名残です。その後、カードが出たのでアイテムを１キャラに集約して
例のNPCまで行ったらZenyが増殖。これがZenyDupe発見までの経緯です。
Win2Kにしてから「ドキッ!?逆毛だらけのＲＯ」とか出来なくなって鬱です…
（画面内プレイヤーを見た目だけ♂逆毛にする受信パケ改竄チート）
私は今でもバランスを崩す升は嫌いです。
0188デフォルトの名無しさん
NGNG0189蟻の巣掃除人
NGNGどうもエラーが出るね。どうやら
Switch:0188
っていうコードを受け取ってるみたいなんだけど、これがkore側で未実装みたいね。
でも、ＷＰＥで見てる限り、０１８８なんて来てないんだけどなぁ。０１３Ａとかはきてるけど
0190某板の73
NGNGそういう人、大好きです(藁)
けど、ここはプログラムに関する板なのでやり方とかは書きません。
どのパケが怪しいかはKoreのｿｰｽ見たり改造したりすればわかると思いますし。
0191某板の73
NGNG0188は精錬の成否です。
88 01 ** ** xx xx yy 00
xx xxはアイテムのID
yyは精錬結果(0は失敗、1以上はそのまま+の値)
そのあたり>179で実装してあるんで、パス解いて参考にしてください。
0192某板の73
NGNG0193デフォルトの名無しさん
NGNGええ、自分で解析するのは楽しいですしいいですよ
受信ﾊﾟｹのキャラ情報で髪型の部分を変えるんでしょう
いろいろ試してみます
0194デフォルトの名無しさん
NGNG0195デフォルトの名無しさん
NGNGこいつ逆毛に萌えてるよ（＾∀＾）ｹﾞﾗｹﾞﾗ、とかも可能？
うわぁい…（*´д｀*）ﾀﾉｼｲｾｶｲｶﾞﾐｴﾙﾖ
0197蟻の巣掃除人
NGNG実は、装備の状態とか、ホールグレンのしゃべった回数とかで判別してますた（汗
0198デフォルトの名無しさん
NGNGできるのであれば全力を注ぎ込みたいのですが･･･
返答ｷﾎﾞﾝ
0199デフォルトの名無しさん
NGNG自動精錬 (ﾟ∀ﾟ)ｲｲ
首都で試すのは迷惑なので、地方で実験してまつ
しばらく回したけど、＋７が精一杯。＋１０の道のりは遠い
クほほほほホホッ!!!
0200デフォルトの名無しさん
NGNG懐かしいところが出てきたものだ…
0201デフォルトの名無しさん
NGNG『talk NPCの番号』でOK?
一回話し掛ければあとは全自動なのですか？
0202デフォルトの名無しさん
NGNG某板？って
0203名無しさん＠Ｅｍａｃｓ
NGNGkore-patch-af
しょぼいですが、ハエの使いすぎで他のマップに行ったときに戻るようにしてみました。作ったばかりなのと、今ほとんど入れなくなってしまったのでテスト不足ですが。
attackAuto_map xxx.gat
attackAuto_map_north yy.gat
attackAuto_map_south zzzz.gat
attackAuto_map_east www.gat
attackAuto_map_west vvvvv.gat
などと書いておくと、Portal Exists が出た時に attackauto_map と違うマップに居ると3 block 帰宅します。
0205デフォルトの名無しさん
NGNG試したいのにﾛｸﾞｲﾝできない…
0206デフォルトの名無しさん
NGNG今日、たくさん売れるのでとても嬉しかったそうです｡
けど、何が起きたのかを知ったとき、その商人さんは
「イタイ、イタイ、胸がイタイ」
といって、露天を閉じました｡
そして直後キャラを消したそうです｡
彼は毎日がんばっていました｡買う人、一人一人を全員覚えようと思っていました。
Potが1つ売れただけでも彼は喜んでいました｡いつもお客さんに「まいど～」と声をかけていました｡
儲けが少ないのでなかなか自分の好きなアイテムを手に入れることが出来ませんでした。
もうすぐ花のカチューシャが買えそうだと、私に話してくれました｡
花のカチューシャは、いつも町でみかける辻ヒールアコさんにプレゼントしようと思っていたそうです｡
今日、いつもの何倍もの売上がありました。花のカチューシャが今日の売上だけで買える金額になってしまいました｡
彼は「こんな汚れたお金じゃ、アコさんはよろこばないだろう」
と、言いました。
私は何もしてあげられませんでした｡
0207デフォルトの名無しさん
NGNGbor用のmapファイルががまた消えてるぅ
適当なjpgに名前つけてつっこむだけでも一応動いてくれるって話だったけど
なんて名前にリネームしとけばいいんでしょうか？
0208デフォルトの名無しさん
NGNGツッコミ悪いけど、直後といっても10秒以上かかるはずだよｗ
あと、そのお金はサーバーから受け取った物。
そのチーターから受け取った物ではない。
ゲームで、お金に汚いも何もない。
0209デフォルトの名無しさん
NGNGううヒントおねがしすます
021027
NGNGrose.zero.ad.jp/~zbm90840/download/u_file120020908215559.zip
説明するのめんどくさいからまたあげた
次ぎなくなったら知りません
dtsi.dyndns.info/~uploader/2ch-ro/file/20020908143436.zip
↑これうｐしたひといたらすぐ消されたし
0211某板の73
NGNGいくらなんでもそれはdata.grfいぢらないと無理だと思うが…
>>199
自動ループでプラコンorエンベルタコン大量購入→正規のパケットで自動精錬だったら
いいんですけどねぇ…（あくまでバランスにこだわる）
>>201
talk <nlで出てくるNPC番号>
>178(+>180)の奴なら talk force <NPCのID(10進数)>でも可。
伊豆のカプラたんならtalk force 51075とか。
>>204
TPascalって、Turbo Pascalから取ってますか？(元Turbo Pascal愛用者)
それはさておき、ROEのソースは持ってないのですよ…探せばすぐ見つかるだろけど。
>>194 >>202 >>209
悪用は歓迎してないので、パスを晒す気はありません。
ネトゲ板(だったと思う)の過去ログでも漁って下さい。
前はぐぐれば出てきてた気がするんですが…
0212デフォルトの名無しさん
NGNGサンクス！
なるほどねぇ、コメントにするのもアリだね。
勉強になりますた！
0213デフォルトの名無しさん
NGNG何がいかんのだろ 特に重いプログラムなんて起動してないんだけどなぁ
0214デフォルトの名無しさん
NGNG実際に画面が見れないので、どういう動きしてるかわかんないんですけど
テレポの設定も切ってるし、謎です。なんででしょう？
0217デフォルトの名無しさん
NGNGヒントを参考にぐぐって不足部分を足してやればたどりつけるよ。
0218デフォルトの名無しさん
NGNGだめだー、過去ログ検索かけたけど
ragcheatでひっかからないｗ。
ひょっとして、検索かける単語まちがってる？
0219デフォルトの名無しさん
NGNG0220デフォルトの名無しさん
NGNGって今も繋がります？
0221デフォルトの名無しさん
NGNG0222TPascal
NGNG>>147 にＲＯＥのソース入ってるよ
TurboPascal からです
表記がPascalなので…
ex)# スキル with 魔方陣
} elsif ($switch eq "013E") {
$msg_size = 24;
# 3E 01 ?? ?? 02 00 F3 C9 00 00 00 00 00 00 13 00 03 00 00 00 93 0A 00 00
これの説明で…
switch : word;
UseID : longint;
monsID : longint;
…っと
Ｃ＋＋とかだと変数の長さが違うでしょ
Longintは４バイトの長さだけど 最近では４バイトではなくなってる
0223デフォルトの名無しさん
NGNG0224デフォルトの名無しさん
NGNGそして兄貴森の復活を（*´д｀*）ﾊｧﾊｧ…
0225某板の73
NGNG問題のｽﾚが立ったのはたしか'01/12/30です。これ以上は勘弁してください。
>>220
繋がります。
/08/ragnarok/ のほうは消えたようですが。
>>222
thx。あとで見てみます。
0226デフォルトの名無しさん
NGNGこれはぐぐったらわかるんだけどgcaが…
面倒臭いけど入れるかなぁ
0227デフォルトの名無しさん
NGNG初心者です。
0229デフォルトの名無しさん
NGNGtalk NPCの番号
とやっても
『Syntax Error in function 'talk' (Talk to NPC)
Usage: talk<NPC # | cont | resp>[<responce #>]』
と表示されて会話が出来ないﾓﾖﾘ…
修練所の結果発表NPC（55056）は出来ないのかなあ（つД｀;）
npcs.txtに書き加えてみてもﾀﾞﾒﾎﾟ…
恥をしのんでご教授願いたい…
0230デフォルトの名無しさん
NGNGサンクス！
おかげで起動できますた！
でも、中に入れない。
おとなしくテスト勉強しまふ・・・。
0231デフォルトの名無しさん
NGNG恥と思え！（ｗ
NPC番号 = nl ででた番号
nlすると
NPC番号 キャラ名 ID
デフォだとこの３つが出る
ここの NPC番号
0233デフォルトの名無しさん
NGNGすごいやばいことに気づいた。
下のやつ、今すぐパスかえろ！！！
どうなってもしらんぞ・・・。
0235デフォルトの名無しさん
NGNGずーーーーっと55056がNPC番号だと勘違い･･･
でもってﾃﾞｷﾀｰ（゜∀゜）!!!
ｱﾌｫウですみません･･･本当ごめんなさい･･･
逆毛ｷｬﾗでびっくりするほど（略 で逝ってきます･･･
0236デフォルトの名無しさん
NGNGの*の部分梅田のがpassですよね？
GCA解凍できない・・・
destroy.GCA 71,198 バイト
であってますか？
0237デフォルトの名無しさん
NGNG0238デフォルトの名無しさん
NGNGPsss聞いてたらなんのたねのPassかわかんないじゃん
ぐぐって出るって言ってる人もいるんだから自分で探すように
0239デフォルトの名無しさん
NGNGPerlで書かれたBOT
0241デフォルトの名無しさん
NGNGならいいじゃない
自力で解きなさい
0242デフォルトの名無しさん
NGNG0243デフォルトの名無しさん
NGNG又はPassを入れてない・間違っている
自動化できたのなら>>54ので十分だね
0244236
NGNG0245デフォルトの名無しさん
NGNG過去ログを検索しなさいな…
0246デフォルトの名無しさん
NGNG0247デフォルトの名無しさん
NGNGhttp://www2.ezbbs.net/04/ragnacheat/
0248デフォルトの名無しさん
NGNG0249デフォルトの名無しさん
NGNG0250某板の73
NGNG基本的にはそんな感じかな。ｱﾌｫなﾐｽの修正もしてますが。
>>247
しょぼいのは仕様(´･ω･`)
>>248 >>249
あっちは荒れてるから貼らないで欲しい。お願いだから。
0251デフォルトの名無しさん
NGNGはらねぇからさっさと消せｳﾞｫｹ
0253某板の73
NGNG埋められないね…(´･ω･`)
0254デフォルトの名無しさん
NGNG製錬場内で行うと、なぜか外のポータルに向かって歩いてしまいます。
設定はデフォです。
一応報告だけ・・・・
0256デフォルトの名無しさん
NGNGそれ自分で考えてすぐ解決策わからん？
>>某板の73
漏れも同じ掲示板CGIいじったことあるぐらいのPerl知識なのに、藻前様の方が全然ｿｰｽが綺麗…(´･ω･`)
0257デフォルトの名無しさん
NGNG恥ずかしながら、全然わかんないっす。
というか、そもそもＰＯＴって敵とかがいないと歩く仕様になってないのでは……
0258デフォルトの名無しさん
NGNGだれかうｐおながいします、、、
0259デフォルトの名無しさん
NGNG0260デフォルトの名無しさん
NGNG魔方陣でるんですか？
もしでてなかったらマズー？
026127
NGNGそういうわけではないのだがうｐローダーが流れるのが速い
サイズがでかいのでうｐローダーが限定される
病み上がりにあげようとしてもあがらない（鬱
誰かこの板専用のうｐローダー作ってくれればうｐしますが
ほかのとこに迷惑かけたくないので…
0262デフォルトの名無しさん
NGNG0263デフォルトの名無しさん
NGNG漏れもいままでずっとなやんでた、
かなりのVerも試して気が付いた・・
****がパスじゃない。
0264デフォルトの名無しさん
NGNGとりあえず、ＢＯＴがある状態になれば動かなくなるわけで
こちょこちょっとアレをいじってあげれば・・・。
アフォな俺でもわかりましたｗ
ほんと、単純なんことです。たたかわないんですから・・・。
0265デフォルトの名無しさん
NGNG0266デフォルトの名無しさん
NGNG0267デフォルトの名無しさん
NGNG0268デフォルトの名無しさん
NGNG0269デフォルトの名無しさん
NGNG0270某板の73 ◆5otivffc
NGNGつーかそのままじゃ動かないけどさ…
とりあえずトリップつけてみるテスト。
>>262 >>264
あ、もしかしてattackCounterが悪さしてました？（´Д｀；）
0271デフォルトの名無しさん
NGNGやっぱ1Mぐらいで止めて新しい垢にした方がいいのかな
0272デフォルトの名無しさん
NGNG純正Kore.plは動作するんですがどうなってるんだろ･･･
0273デフォルトの名無しさん
NGNG消して良いよ。
またパス変えて揚げてもいいし。
もう揚げなくてもいいし。
これ以上精錬厨増やしたらアカン。
0274デフォルトの名無しさん
NGNG改善策ありますかい？
0275デフォルトの名無しさん
NGNG0276デフォルトの名無しさん
NGNG消えてる？
0278デフォルトの名無しさん
NGNGキャラ表示されなくなってLoginできなくなったんだけど一体何が！((((;ﾟдﾟ)))
0279デフォルトの名無しさん
NGNGリネの鯖はカノ当たりに誤爆って言って、
このすれだとhttp://pc3.2ch.net/test/read.cgi/tech/1031227918/を
http://pc3.2ch.net/test/read.cgi/tech/103122791/8
最後の人文字を/のあとに出す。
まぁ俺がスレ建てられなかったら与濾紙湖。
0280デフォルトの名無しさん
NGNG0281デフォルトの名無しさん
NGNGKoreってなんで、alive送るのにignoreパケット使ってるのか?
約12秒毎にsyncメッセージを送るべきじゃないのか
と書きたかったんだが。
028227
NGNGまったりした話はこちらでよろ
徐々に増やしていくよ
0283デフォルトの名無しさん
NGNGそれ何の意味が…？
0285名無しさん＠Ｅｍａｃｓ
NGNGkore-patch-ag
休憩している時にアクティブモンスタに攻撃されると反撃するようにしました。
attackAuto_map xxxx.gat に設定した地域から外れた場合、戻るようにしました。
# ピラミッドで数分しかテストしていないので安定度は不明です。
0286名無しさん＠Ｅｍａｃｓ
NGNG> Koreってなんで、alive送るのにignoreパケット使ってるのか?
> 約12秒毎にsyncメッセージを送るべきじゃないのか
詳しく説明して。
0287デフォルトの名無しさん
NGNG別垢で一応監視しながらみてるのですが、魔法陣無視で殴りまくりでみててはらはら。
眠れないっす
0288某板の73 ◆5otivffc
NGNG出てるね。２つ。
>>273
だから消せないんだってば（つД｀）
>>275
コールサイン使ってリモート操作されてるとか？
>>279
どーせならSLOｽﾚに誤爆して下さい。
0289デフォルトの名無しさん
NGNG単純にwin用のでコメントアウトされてる
#sendSync(\$remote_socket, Win32::GetTickCount());
の部分。
その1行前にあるsendIgnoreは/ex ～ とかをしない限り流れないパケットなので。
最初kore動かした時のパケットダンプ見て、ignoreパケットを
読めるように作ってなかったので、
なに送ってるんだこいつはと思ったりした。
0290名無しさん＠Ｅｍａｃｓ
NGNG> >>286
> 単純にwin用のでコメントアウトされてる
> #sendSync(\$remote_socket, Win32::GetTickCount());
> の部分。
あれ。それはまた何故。
0291デフォルトの名無しさん
NGNGそれは、俺の方が聞きたい。
まあ、という事で普通のクライアントであれば、
12秒越える毎に007e <1ms単位の時間>.l を送って、
そのackとして、007f <鯖側の1ms単位の時間>.l
が返ってくるはずと。
ignoreパケットは/ex /inの時のみ送信なんで、
それをしつこく定期的に送るクライアントなんて
Koreぐらいだろうし
log取られてたら、即消されるよなー (ぉ
0292名無しさん＠Ｅｍａｃｓ
NGNG> まあ、という事で普通のクライアントであれば、
> 12秒越える毎に007e <1ms単位の時間>.l を送って、
> そのackとして、007f <鯖側の1ms単位の時間>.l
> が返ってくるはずと。
現在は、[control/timeout.txt] ai_keepalive 20 となっているから変更が必要だね。
> log取られてたら、即消されるよなー (ぉ
アカウント1つしか持ってないからそれは困るな。
0293デフォルトの名無しさん
NGNGhttp://www.kde.gr.jp/patch/patch.html
このやり方でできるんでしょうか？
0294デフォルトの名無しさん
NGNG鯖落ち等で長時間放置しておくことが出来ません。
で、koreでやればよいのでは？ということでいじってるのですが・・・。
必要なのはログインとリログと座る&立つのパケだけなはず
でも・・・うまくいかない。
どうやって書けばちゃんと動いてくれるん？
0295デフォルトの名無しさん
NGNGどこにあるんでしょう、、、
0296デフォルトの名無しさん
NGNGお願いします
0297デフォルトの名無しさん
NGNG0299デフォルトの名無しさん
NGNG自分で探してるんですけどね・・・
0300デフォルトの名無しさん
NGNGＶＢのしょぼさに激しく萎え
0301某板の73 ◆5otivffc
NGNGここはﾊﾟｹｯﾄの解析や下位互換ｸﾗｲｱﾝﾄ(あえてBOTとは言わない)の
改良をするｽﾚです。初心者ｽﾚとも交換所でも無い。（･∀･）ｶｴﾚ!
0302デフォルトの名無しさん
NGNGこれってもともと反撃するような仕様じゃなかったっけ？
以前のパッチ当てると反撃しなくなってたのかな、、
0303名無しさん＠Ｅｍａｃｓ
NGNG> #sendSync(\$remote_socket, Win32::GetTickCount());
こりゃだめだ。Out of Sync で弾かれる。
0304デフォルトの名無しさん
NGNGああ、sendMapLoginのpack("L",time)ってなってる所も
1ms単位の時計にしないと、即切られるかと
0305デフォルトの名無しさん
NGNG俺は、tcpdump -s 1500 -w log port 5001で保存したログ相手に
ragexe.exeの逆アセも読みつつ規則性からパケットの中身を調べる毎日なんだが。
0306TPascal
NGNGsub sendSync {
my $r_socket = shift;
my $time = shift;
my $msg = pack("C*", 0x7E, 0x00) . pack("L1", $time);
$$r_socket->send($msg) if $$r_socket && $$r_socket->connected();
print "Sent Sync: $time\n" if ($config{'debug'} >= 2);
}
こうなってるよ
0309TPascal
NGNGsub sendMapLogin {
～
my $sessionID = shift;
my $time = shift; ＜＝追加
my $sex = shift;
my $msg = pack("C*", 0x72,0) . $accountID . $charID . $sessionID . pack("L", $time) . pack("C*",$sex);
$$r_socket->send($msg) if $$r_socket && $$r_socket->connected();
こうか？
0310デフォルトの名無しさん
NGNGなんか反応して無い気がするんだけど・・・。
031127
NGNGguestbook.spaceports.com/galileo.spaceports.com/rewqty
↑は多分匿名管理できないから（削除以外
とりあえず保険としてとっておいてください
ここがなくなったときの連絡にでも使ってね
そのうち公開します
0313デフォルトの名無しさん
NGNG日付が向こうの時刻なのね（ｗ
0315デフォルトの名無しさん
NGNG0316デフォルトの名無しさん
NGNG0317デフォルトの名無しさん
NGNGすげ！
あり！
0318デフォルトの名無しさん
NGNGうまくいかない・・・。
たまに歩くし飛ぶしうまくスクワットしないし。
どうしたらよいんだか、助言お願いします。
0319デフォルトの名無しさん
NGNG0320319
NGNG0321デフォルトの名無しさん
NGNGそれ書いたらログインできなくなったぽ
0322319
NGNGとりあえずkore終了してねまつ
0323TPascal
NGNG>>309の一部追加（かき方を変更）
-my $msg = pack("C*", 0x72,0) . $accountID . $charID . $sessionID . pack("L", time) . pack("C*",$sex);
+my $msg = pack("C*", 0x72,0) . $accountID . $charID . $sessionID . pack("L", $time) . pack("C*",$sex);
#Check Connectionにある
-sendMapLogin(\$remote_socket, $accountID, $charID, $sessionID, $accountSex2);
+sendMapLogin(\$remote_socket, $accountID, $charID, $sessionID, Win32::GetTickCount(),$accountSex2);
if (timeOut(\%{$timeout{'ai_keepAlive'}})) {
$timeout{'ai_keepAlive'}{'time'} = time;
-sendIgnore(\$remote_socket, "", 1);
+#sendIgnore(\$remote_socket, "", 1);
-#sendSync(\$remote_socket, Win32::GetTickCount());
+sendSync(\$remote_socket, Win32::GetTickCount());
0324デフォルトの名無しさん
NGNGTimeout on Map Sever , connecting to Master Sever...
が頻出するようになりますた。
0325名無しさん＠Ｅｍａｃｓ
NGNGhttp://pc3.2ch.net/test/read.cgi/tech/1031227918/5
反撃しないのが仕様とか。
0326デフォルトの名無しさん
NGNG0327デフォルトの名無しさん
NGNGああ、%timeout{'play'}の更新を、
ignoreに対するackの中(00D1)でやってるね。
これを、007Fの中でやらないと。
しかし、0バイトキャラ名""に対して/inを実行、エラーを確認かい (^^;
まあ、npc会話の選択肢選ぶ時に、選択肢として出されたの以外に
応答する昨今、この程度なんてことないのか。
0329TPascal
NGNG} elsif ($switch eq "007F") {
print "Recieved Sync\n" if ($config{'debug'} >= 2);
$timeout{'play'}{'time'} = time; ＜＝追加か？
0330デフォルトの名無しさん
NGNG仕方ないからignoreでやってまふ。
0331TPascal
NGNGplay 120 にする＜＝クライアントとほぼ同じに
0332デフォルトの名無しさん
NGNGそそ。そんな感じ
>>330
まさか、単純にs/00D1/007F/したのか? それじゃ動く訳ないよ。
0333デフォルトの名無しさん
NGNGｳﾊﾊ･･･。恥さらしだな。漏れもなんかこれじゃ変だなと思った。
TPascal氏のお陰で漸く理解完了(・∀・)
0334名無しさん＠Ｅｍａｃｓ
NGNG> >>303
> ああ、sendMapLoginのpack("L",time)ってなってる所も
> 1ms単位の時計にしないと、即切られるかと
そうだとすると、なんで今迄は time() で動いてたんだろうか。
0335デフォルトの名無しさん
NGNGsync送った時に、login時 or 前回syncを送った時間との
差分を取ってそれが鯖側で進んだ分と大きく違えば、
スピードハックって事で切ってるんでしょ。
今まではsync送ってなかったから、一切チェックされてなかったと。
ま、送信パケットの綺麗さを装う以外は効果無い修正だったね。
余計なお世話ですまんかった。
0336デフォルトの名無しさん
NGNGなんとかなりませんか？（´Д⊂
0337296
NGNG0338デフォルトの名無しさん
NGNG氏ね
0339TPascal
NGNGhttp://yasai.2ch.net/test/read.cgi/mmo/1031560808/
に帰れ！！
0340デフォルトの名無しさん
NGNG0342デフォルトの名無しさん
NGNGここの雰囲気に合わないよ。
0343デフォルトの名無しさん
NGNG攻撃速度を減少させたければ、timeouts.txtの
ai_attackを大きくすればいいんですか？
マジシャンの攻撃時のパケットの送りすぎを
防ぎたいので・・・。
0344デフォルトの名無しさん
NGNG1回だけ攻撃するようにすればいいんじゃない？
0345デフォルトの名無しさん
NGNG多いんですが、、なんとかならんでつか
0346デフォルトの名無しさん
NGNG初期koreといまのkoreどれぐらい違うのかとか、どういう機能を追加できるのかとか。
ちなみに今自分のは、
CTRL攻撃 AUTOATKon/off plに位置座標追加です。
それ＋誰かがアップしてくれたHPリカバリーの表示とチャットログの保存です。
あと、すでにwizとかの魔法陣も横殴りしないようになったのでしょうか？
0347デフォルトの名無しさん
NGNG最後の行間違えました
×あと、すでにwizとかの魔法陣も横殴りしないようになったのでしょうか？
○あと、すでにwizとかの魔法陣も横殴りしないように出来た人はいるのでしょうか？
です。すいません
0348デフォルトの名無しさん
NGNG0349デフォルトの名無しさん
NGNGどこの所だけ残せばよいのでしょうか？
0350デフォルトの名無しさん
NGNG0351名無しさん＠Ｅｍａｃｓ
NGNG>
> あと、すでにwizとかの魔法陣も横殴りしないようになったのでしょうか？
パケットが分ればすぐ出来るでしょう。攻撃の前段階は横殴りではないので全く興味のない事例ですが。
0352デフォルトの名無しさん
NGNG出来るんですか。
パケットって$switch eq "0080"のとかの00 80ってことでしょうか？
暗号みたいににかいてあってわからないです
0353TPascal
NGNGほれ（ｗ
# スキル with 魔方陣
} elsif ($switch eq "013E") {
$msg_size = 24;
# 3E 01 ** ** ** ** F3 C9 00 00 00 00 00 00 13 00 03 00 00 00 93 0A 00 00
*は使ったマジシャンのＩＤナンバー
４バイト(F3 C9 00 00)がモンスターNo.
１３がスキルID
０３がスキルレベル
モンスターにダメージ１与えた事にしてしまえば簡単かも
0354TPascal
NGNG# スキル攻撃withダメージ表示
} elsif ($switch eq "0114") {
$msg_size = 31;
中身は飛ばしてしまいました（謎
マジシャンも使ってるのに手つけてません
0355デフォルトの名無しさん
NGNGありがと～
眠くてどう追加すれば分からないので、一眠りして追加してみますｗ
0356TPascal
NGNG私ではないぞ
================================================
Sep 11 10:42:29 2002
24 bytes
3E 01 D7 76 0B 00 F6 C9 00 00 00 00 00 00 14 00
04 00 00 00 AC 0C 00 00
================================================
Sep 11 10:42:33 2002
31 bytes
14 01 14 00 D7 76 0B 00 F6 C9 00 00 6B 74 29 0A
9C 02 00 00 B0 01 00 00 3A 02 05 00 05 00 08
0357名無しさん＠Ｅｍａｃｓ
NGNG> 眠くてどう追加すれば分からないので、一眠りして追加してみますｗ
簡単なのは monsterID が攻撃対象のと 魔法陣ので等しければ attaskStop してテレポートとかかな。
難しのでは、attaskStop して再ターゲッティングから外すというのだけど。敵が居なくなったら undef しないとだめかも。
適当。
0358デフォルトの名無しさん
NGNGどうすればいいんでしょうか。
0359デフォルトの名無しさん
NGNG011aで、$skillIDが0x0022ならブレス、0x001cならヒールだから、
後は$targetIDが自分かどうかをチェックして(というか既にチェックしてるな)
timeout設定してtimeoutしたらエモーション出すみたいな
ロジック入れればおっけーだね。
ブレスの場合は、$amountがレベルそのままだから、
6以上なら、ハートにするとかも良いかもな (笑
0360TPascal
NGNG} elsif ($targetID eq $accountID) {
if ($sourceID eq $accountID) {
$targetDisplay = "yourself";
} else {
$targetDisplay = "you";
このあたりに書き込む
}
} else {
$targetDisplay = "unknown";
}
if ($skillID == 28) {
0361TPascal
NGNGif ($config{'attackAuto'} && $config{'attackAuto_teleport_idle'} && timeOut(\%{$timeout{'ai_teleport_idle'}})) {
-sendTeleport(\$remote_socket, "Random");
+sendTeleport(\$remote_socket, "Random") if ($config{'attackAuto_Map'} eq $map_string);
$timeout{'ai_teleport_idle'}{'time'} = time;
～～～～少し離れてる
if ($config{'attackAuto'} && $config{'attackAuto_teleport_portal'} && timeOut(\%{$timeout{'ai_teleport_portal'}})) {
if (@portalsID) {
-sendTeleport(\$remote_socket, "Random");
+sendTeleport(\$remote_socket, "Random") if ($config{'attackAuto_Map'} ne $map_string);
$timeout{'ai_teleport_idle'}{'time'} = time;
config.txtにattackAuto_Mapを追加
attackAuto_Mapにかかれたマップ以外ではテレポ等しない
0362名無しさん＠Ｅｍａｃｓ
NGNG> config.txtにattackAuto_Mapを追加
> attackAuto_Mapにかかれたマップ以外ではテレポ等しない
それなんか私のににている。
0363TPascal
NGNG} elsif ($switch eq "007F") {
print "Recieved Sync\n";# if ($config{'debug'} >= 2);
$timeout{'play'}{'time'} = time;
$msg_size = 6;
sendchaosRedPod(\$remote_socket); ＜＝ここ
} elsif ($switch eq "0080") {
定期的に垢ポットを作るパケット
0364デフォルトの名無しさん
NGNG今wisで注意されてた。
他の人に迷惑はかけれねぇよな。
0365デフォルトの名無しさん
NGNGうお、それ何気に便利っぽい。
0366デフォルトの名無しさん
NGNGサンクス
Perl初めて触るんだがソース見ててきとーにやってみたらできまつた。
timeout設定がよくわからんかったのでsleep()で。
攻撃中だと止まるかな～と思ったけどCtrl攻撃なら大丈夫ぽい。
あとヒールの$skillIDは28でしたねｗ（他は未チェック）
0367デフォルトの名無しさん
NGNG0368デフォルトの名無しさん
NGNG0369デフォルトの名無しさん
NGNGこのファイルを落として除いてみたいのですがファイル死んでいると思うのですが
まだ生きていますか？
0370デフォルトの名無しさん
NGNGまったくＰＯＴを使ってくれなくなったんだけどなんでかな？
0371デフォルトの名無しさん
NGNG> ウイルス、ハッキング・クラッキングを求めるような発言は禁止です。
これにひっかからないかな。削除依頼出してみるか。
0372デフォルトの名無しさん
NGNG0373デフォルトの名無しさん
NGNG判断は削除人がやってくれると思いますが・・・
0374デフォルトの名無しさん
NGNG認めてないならモロにチートツールだと思うんだが・・・
0376TPascal
NGNG内容
==ここから
削除対象：
perl2exe forRO
http://pc3.2ch.net/test/read.cgi/tech/1031227918/
削除理由：
ローカルルール？の以下に該当
＝＞ウイルス、ハッキング・クラッキングを求めるような発言は禁止です。
一応、ハッキングの類に入ります
＝＞ゲーム関係の話題はゲーム製作板へどうぞ。
RagnarokOnlineと言うゲームのＢＯＴを改造する板です
ＭＭＯ板のチートスレの延長になちゃってます
==ここまで
0377デフォルトの名無しさん
NGNGこれ実装すりゃ 好きなタイミングで遠隔精錬遠隔カプラできるのに
もう少しがんがってみる
0378名無しさん＠Ｅｍａｃｓ
NGNG> koreってチートツールだよね。
Cheat では無いですね。BOT や クローン、エミュレータなどの類です。
kore をチートに含めると、 IE もネットスケープのクローンですからチートツールとなってしまいますね。はは。
0379デフォルトの名無しさん
NGNG0380名無しさん＠Ｅｍａｃｓ
NGNG0381名無しさん＠Ｅｍａｃｓ
NGNG> Net:RO というモジュール化ができれば便利そうですねえ。
正しくは、 Net::RO か。
0382TPascal
NGNGソース http://ro-sv.info/src/
これをPerl2Exeで、作る
詳細
自宅から調べて
結果（html）をftpで、tripod.co.jp等にＵＰできるようにする
0384デフォルトの名無しさん
NGNG0385名無しさん＠Ｅｍａｃｓ
NGNG> RO SV Infoの変わりになるツール作らんか？
> ソース http://ro-sv.info/src/
> これをPerl2Exeで、作る
はっきり言って現状では無意味ですね。私が思うに 上記のツールで正常と出ているにもかかわらず接続できない状態を不満に思う人たちの苦情によって取り止めたのでしょう。
0386デフォルトの名無しさん
NGNG適当な垢取ってロギンさせればイイだけだし。
0387TPascal
NGNGそれがさ
http://ro-sv.info/misc/
ここに
>一時停止について:
>あのチートに関して何らかの対処 (バグの穴梅あるいはNPCの一時撤去等、最低でも公式サイトでの告知) 及び、チートによる影響への対処 (チーターの垢BAN/BLOCK、チートにより生成されたアイテム/ゼニーの消去、あるいは巻き戻り等) が無い限りこのままです。
>もし何事も無かったかのように運営を続けるのであれば、復活に失敗して埋葬されることでしょう。
>協力して下さった方々には本当に申し分けありません。
>プログラムのソースは置いておきますので、必要であれば持ってって下さい。
>ちなみに、鯖負荷等は全く問題ありませんでした。また、他の理由等もありません。
こうある
それに一部鯖は繋いでるからnetstat -an の結果を使えば済む
chaos鯖にＢＯＴ数体置いてるし
Iris鯖は２体
これの接続状況を使えば実際に繋げてるかが分かる＜kore.plの方も改造必要だけど
0388TPascal
NGNGhttp://ro-sv.info/kadorto.html
復活条件だとさ
>>386
chaosとiris鯖なら可能だけど…
kore.plの方も多少改造しないとならない
で…公開するところは１つではなく複数
tripod.co.jp内数個
tripod.com内数個
他のとこもやれば分散できる
私の所 ２４時間は、無理っぽい
0389名無しさん＠Ｅｍａｃｓ
NGNG> >>385
> それがさ
> http://ro-sv.info/misc/
> ここに
> こうある
これを読んでもサーバ調査の停止とチート対策との直接的な関係を表出できないと思います。
もし彼の様な考えに同意するのであれば作るべきではないですし、そうでなければそれを理由には上げられないと思います。
0390TPascal
NGNGサーバ調査にあるマップも関係してる
普通なら首都の精錬所だけで,できるはずが
同じ鯖内の別マップで 同じ座標にいても出来てしまう
どこでもカプラとかと一緒
で、鯖調査側の要求がバグ修正もあるけど
巻き戻りorチーターの垢バン
これって、どうよ
ある程度大きいからって鯖調査停止を盾に交渉してる所が許せないね
レッツみたくおとなしく閉鎖すればいいのに
0391デフォルトの名無しさん
NGNG何か教えてもらっても「なるほど、だんだんわかってきた」とか言ってお礼言わないし～
自分の意見があくまでも正しいと信じ込んでるし～
でもその頑固さがなにか大きなことをしでかしそうな気配も感じさせる・・・！
0392TPascal
NGNG>>386 にあるような
接続人数まで表示してるとこはない
kore.plを併用すれば簡単にできるはず
更新は２分間隔
表示形式は元の所とほぼ同じ
１２日中にchaos鯖全てのマップ（アリーナ等未実装の所含む）のＩＰ調べる（かもしれない）
Iris鯖はアコを作る必要があるから明日は無理
0393デフォルトの名無しさん
NGNG役に立つか分からないけど
PASSは例のデストローイコピペで
0394デフォルトの名無しさん
NGNG0395TPascal
NGNGそれならhtml形式のがあるよ
chaos鯖もあるけど…
未実装マップとかがない＜ここ重要
すぐに解決するのは…
・chaos鯖の接続人数表示
・マップ＝ＩＰアドレスの対応一覧
残る問題は…
・タイムアウト等の処理 ＜＝全然出来てない
・ftpでのアップロード（パッシブモード）
0396名無しさん＠Ｅｍａｃｓ
NGNG> 普通なら首都の精錬所だけで,できるはずが
> 同じ鯖内の別マップで 同じ座標にいても出来てしまう
おお。そんな単純なことだったんだ。
> ある程度大きいからって鯖調査停止を盾に交渉してる所が許せないね
改善を利用者側に要求してる所が非情だね。飽きたのにそう言えなかったんだろう。
0397デフォルトの名無しさん
NGNG髪型とか髪の色、頭装備がどこなのかさっぱり分からなくて･･･。
0398TPascal
NGNG全部書けるかな？
ＲＯＥのソースから
If Asc(Mid(RecvData, 16, 1)) < 7 Then
For x = 0 To UBound(People) - 1
If Mid(RecvData, 3, 4) = People(x).ID Then
People(x).Pos = MakeCoords(Mid(RecvData, 18, 3))
If Form2.Visible = True Then
UpdatePeople
End If
GoTo Skip
End If
Next
People(UBound(People)).ID = Mid(RecvData, 3, 4)
People(UBound(People)).Pos = MakeCoords(Mid(RecvData, 18, 3))
People(UBound(People)).NameId = Asc(Mid(RecvData, 16, 1))
If Asc(Mid(RecvData, 17, 1)) = 0 Then
People(UBound(People)).Sex = " <F>" Else People(UBound(People)).Sex = " <M>"
End If
0399TPascal
NGNGFor x = 0 To UBound(Monsters)
If (People(UBound(People)).NameId = Monsters(x).ID) Then
People(UBound(People)).Class = Monsters(x).Name
ElseIf (Val(People(UBound(People)).NameId) = 0) Then
People(UBound(People)).Class = "Novice"
ElseIf (Val(People(UBound(People)).NameId) = 1) Then
People(UBound(People)).Class = "Swordsman"
End If
Next
0400TPascal
NGNGIf Asc(Mid(RecvData, 23, 1)) = 1 And People(UBound(People)).Sex = " <M>" Then
People(UBound(People)).Hair = "Messy Red Hair"
ElseIf Asc(Mid(RecvData, 23, 1)) = 2 And People(UBound(People)).Sex = " <M>" Then
02People(UBound(People)).Hair = "Messy Yellow Hair"
03People(UBound(People)).Hair = "Messy Dark-Brown Hair"
04People(UBound(People)).Hair = "Neat Yellow Hair"
05People(UBound(People)).Hair = "Messy Dirty-Blonde Hair"
06People(UBound(People)).Hair = "Long Dark-Red Hair"
07People(UBound(People)).Hair = "Spiky Red Hair"
08People(UBound(People)).Hair = "Whitish Gray Hair"
09People(UBound(People)).Hair = "Messy Blue Hair"
10People(UBound(People)).Hair = "Messy Green Hair"
11People(UBound(People)).Hair = "Neat Dark-Brown Hair"
12People(UBound(People)).Hair = "Neat Blue Hair"
面倒だＲＯＥのソース見ろ
0401デフォルトの名無しさん
NGNGありがとうございます・・・が、知りたいのはβ２の78ヘッダパケットなんです・・・。
0403デフォルトの名無しさん
NGNG速度 0? 0? オプション(カート,鷹,ペコペコ) クラス 髪型 武器
頭中or下? 盾 頭上 頭中or下? 髪色 0? 頭向き
ギルド 0? ギルド2? マナー 悪業値
かな?
ちょっとうちのは78,79,7bあたり共有化するために加工済みなんで変になってるかも
0404デフォルトの名無しさん
NGNG装備してる人口比率&出てくる種類の数から想像するに
～ 頭下(ひげとか) 盾 頭上 頭中(メガネ) ～
かと
0405デフォルトの名無しさん
NGNGだいぶ変わってると思うのですが・・・78パケットはアイテムとは関係ないですし、
何か他のパケットと勘違いしていたのでは。
>403,404さん
なるほど・・・ありがとうございました。
頭向きとマナーと悪行値の位置以外は全部合ってるぽいです。
大変助かりました。m(_ _)m
0406デフォルトの名無しさん
NGNGmove (x) (y)だけじゃなく move (n)でその方向に歩くとか。n=テンキー対応で
0407デフォルトの名無しさん
NGNG訂正・・・やはり403,404さんので全て合っているようでした。
0408デフォルトの名無しさん
NGNG} elsif ($arg1 eq "raw" && $arg2 ne "") {
print"call ID $arg2 [".getHex(pack("L",$arg2))."]\n";
sendTalk(\$remote_socket, pack("L",$arg2));
talk raw (n)
0410TPascal
NGNGkore.plの配列 0x000000～0x0FFFFFまで使える？
もし出来ないとしたら外部ＤＢ作ってそれにアクセスできるようにすれば
モンスター含むＮＰＣ関係とＰＣの処理が軽くなると思われるが…
0411TPascal
NGNGhttp://www.google.co.jp/search?q=cache:5eNCfCD4jdQC:homepage1.nifty.com/gak/webdb/mysql.html+mysql+windows&hl=ja&lr=lang_ja&ie=UTF-8
こんなのがあったけど…
ＤＢは…
ＮＰＣ関係
npcid(0x00000000～0x0000FFFF)
区別（NPC,mons,portal）
画面内にあるか(0,1)
ダメージto
ダメージfrom
ＰＣ関係
id (0x00010000～)
キャラクターの名前
画面内かどうか…等
0412TPascal
NGNGアイテムはあのファイルをそのままＤＢへ入れる
あ…
ＮＰＣとＰＣが画面内かどうかと言うのは複数作る＜多重起動してる人向け
0413デフォルトの名無しさん
NGNG対ｱｸﾃｨﾌﾞ複数だとアイテムをまったく拾ってくれないのですが・・
拾う前に他の攻撃してきてる敵に反撃してしまって、敵を殲滅したときにはもうアイテムが消えてます(;´Д`)
0414名無しさん＠Ｅｍａｃｓ
NGNG>>410
> kore.plの配列 0x000000～0x0FFFFFまで使える？
意味を取れませんでした。
0415TPascal
NGNGデータベース的な扱い方…でもないか
分かりやすく言うとエクセルの１～の所を0x0FFFFFFFまで使えるかどうか＜エクセルだと65536だっけ？
これの制約が無ければ…
npcID 0x0000CC90 の首都修練ＮＰＣを
配列の0x0000CC90番目に入れて・・・と思ったんだけど
モンスターのＩＤも固定です＜例 0x0000C7AA にルナティックだとして
ルナティックを倒したあとも0x0000C7AAにルナティックが割り当てられます
普通のＰＣには0x00010000～が割り当てられてます
両方を一緒に扱うとしたら0x002FFFFF使います ＜＝一部修正
MySQLの準備中…
ＢＯＴマシンにMySQLを入れます
0416デフォルトの名無しさん
NGNG意図はなんとなく判りますが、Koreの中で本当の意味で配列を使っている所は極少数です。
大半hash(連想配列)を使っており、perlがてきとーに良いようにしてくれてます。
(C使ってbot書こうかと思ってる側からすると、凄く楽そうでうらやましい)
敵や他のPCについては、IDから配列indexへの変換テーブル($monstersID[],$playersID[]あたり)を
使ってるので心配無用です。
ついでに言うと、IDは10進数表記でNPCは50000～、PCは100000～を使っています。
0078の件と良い調査不足ではないかと。
0417TPascal
NGNG突っ込みありがとう
もしかしてperlは ＤＢ的な使い方もできるわけか…
0078は、拡張されただけだよ
元々,0078はキャラクターの容姿を決めてるパケットであって
ＲＯＥのソースは髪型しか利用してなかった（装飾用アイテム等無視）
kore.plも必要ないところは削ってる＜マジシャンの魔方陣等は別として…
他のＢＯＴソースも見たほうがいいよ
１つのものだけ見ると足りない部分が結構ある
0418デフォルトの名無しさん
NGNGとほざいてみるﾃｽﾄ
0419TPascal
NGNGアイテム売るときはアイテム名では無く＜設定ファイルの指定も
ＩＤにしないか？
（日本語の）アイテム名同士だと不具合がある
日本語に"_"が入ってると空白に変換されてるし…
モンスターも同様
0420デフォルトの名無しさん
NGNG0423名無しさん＠Ｅｍａｃｓ
NGNG$ai_cmdQue[$ai_cmdQue]
これはなんだろう。もしかして配列とスカラーは同名で別に管理されているのか。
0424デフォルトの名無しさん
NGNGPerl の本を見ると $hoge[] = @hoge $hoge{} = %hoge で $hoge とは別枠だそうな
>>420
ttp://member.nifty.ne.jp/yatsushi/ なんつーのがあるそうだ (ぉ
>>417
botソース見て役に立つ場合と、
正規クライアントの逆アセソース眺めて役に立つ場合と、
パケットダンプ眺めてた方が判り良い場合とあるでしょ。
で、今回はダンプ眺めてた方が良かった訳。
まあ直でsocketストリームの16進ダンプ眺めてる訳じゃないけど。
過去実績的に、ゲームのデータ解析する際、簡単な圧縮や暗号化とかなら、
プログラム読まずにダンプだけで片付けてたタイプなんでね
0425デフォルトの名無しさん
NGNG洩れはタゲ死亡のパケを受け取ったら予め指定した座標にmoveさせてるんだけど
アイテムがあっても正確に同じ場所に戻り続けるから動きが怪しいんだよね
>>406
洩れはポタ避けをランダムに数タイル移動して避けるようにしたいYP
ランテレはあからさまにBOTだからなー
如何せんスキルが無さ過ぎるな洩れ（つДT)
0426TPascal
NGNG００７８のパケット見てるんだが見つからん＜それ以外は見ていない罠
0427デフォルトの名無しさん
NGNGネタ?
今までさんざんKore.pl読んでるはずなのにそれで判らないとなると...
0429名無しさん＠Ｅｍａｃｓ
NGNGmakeCoords とかいうので飛んでくんじゃないのかな。
それにしても Coords って何語だ？
0430デフォルトの名無しさん
NGNGcoodinateの略。志村～辞書辞書！
0431デフォルトの名無しさん
NGNGcoordinateだな。
0432名無しさん＠Ｅｍａｃｓ
NGNG> 次スレ建てるときはいっそ互換クライアントスレにしないか
クローンの何とか でもいいよ。
0433デフォルトの名無しさん
NGNG0434名無しさん＠Ｅｍａｃｓ
NGNG> coordinateだな。
なるほど。
>> makeCoords(\%coords, substr($msg, 46, 3));
($x, $y) = getCoordinates( ... ) 等とした方が分りやすいと思うなあ。
0435TPascal
NGNGが～ん
やってしもうた
sub makeCoordsX {
my $rawCoords = shift;
return unpack("C", substr($rawCoords, 0, 1)) * 4 + (unpack("C", substr($rawCoords, 1, 1)) & 0xC0) / 64;
}
sub makeCoordsY {
my $rawCoords = shift;
return (unpack("C",substr($rawCoords, 1, 1)) & 0x3F) * 16 + (unpack("C",substr($rawCoords, 2, 1)) & 0xF0) / 16;
}
なむ～
MySQL構築中…＜＝SQLをちっとね…
0436名無しさん＠Ｅｍａｃｓ
NGNG> >>434
> が～ん
>
> やってしもうた
> sub makeCoordsX {
> sub makeCoordsY {
座標はセットで取得したほうがいいと思うよ。
0437名無しさん＠Ｅｍａｃｓ
NGNGC:\installer\game\Ragnarok\Kore\Kore-0.68.08>perl -w kore.pl
Name "main::type_equip" used only once: possible typo at kore.pl line 3351.
Name "main::lastBase" used only once: possible typo at kore.pl line 1282.
Name "main::stop" used only once: possible typo at kore.pl line 103.
Name "main::proto" used only once: possible typo at kore.pl line 66.
Name "main::test" used only once: possible typo at kore.pl line 3352.
0438デフォルトの名無しさん
NGNG日本語ヘルプ見た限りでは
config.txt のpartyWarper_・・・・ 0
からslot 2に変更の場合
conf partyWarper_slot_corrent 2
を入力すれば良いんですよね？
doesn't existとでて変更できないのですが・・・
ヘルプおねがいしまつ（つд｀）
0439某板の73 ◆5otivffc
NGNGそういう仕様ですし、別に私は困ってないので直す気はありません。確認はしてませんが
＞if ($config{'itemsTakeAuto'} && $monsters_old{$ai_attack_target{'ID'}}{'dmgFromYou'} > 0 && !ai_getAggressives()) {
こんな部分を探して「 && !ai_getAggressives()」を消せばアイテム拾いが優先されるんじゃないですかね…
もっとも、大量に襲われた時に攻撃が後回しにされるので死ぬ可能性が上がると思いますが。
>>437
・type_equip
＞$type_equip = unpack("C1",substr($msg, 19, 1));
こんな感じで取得してはいるが
＞$chars[$config{'char'}]{'inventory'}[$invIndex]{'type_equip'} = $itemSlots_lut{$ID};
tables/itemslots.txtのデータを使っているので無視されている。
取得方法が間違っていないのなら$type_equipを使うようにしたほうがいいかもしれないですね。
・lastBase
不要。
・stop
不要。
・proto
おまじない程度にしか考えてません。
わざわざ変数に代入しなくても動くと思いますが。
・test
よくわかりません。
>>438
correntって何よ？
0440TPascal
NGNGpartyWarper 1
partyWarperPassword some_password
partyWarperAuthorization 1
partyWarper_portalX 170
partyWarper_portalY 375
partyWarper_slot_0 prontera.rsw
partyWarper_slot_1 payon.rsw
partyWarper_slot_2 geffen.rsw
partyWarper_slot_3 alberta.rsw
partyWarper_slot_4 morocc.rsw
partyWarper_slot_5 aldebaran.rsw
partyWarper_slot_6 mjolnir_02.rsw
partyWarper_slot_7 prt_fild03.rsw
partyWarper_slot_current 3 ＜＝ここ
0441TPascal
NGNGperl2exeでは動かなくなりました
なむ～
メモリ喰いすぎ
重複起動できるのか！？＜最大同時８体起動
0442デフォルトの名無しさん
NGNGかなり書き換え個所多かったと思うけど、おつかれさま。
ところで、ゲーム鯖跨ぐとnpcID重なるけど、その対策してある?
ちょっと前のログ読む分にそれっぽく見えなかったけど
0443名無しさん＠Ｅｍａｃｓ
NGNG-1000 >> 2 が 1073741574 だった。
なんじゃこれ。
0444デフォルトの名無しさん
NGNGそのまんま。>>は演算子。
32bit長のsigned int変数を2ビット右シフトさせてる。
11111111111111111111110000011000=-1000
00111111111111111111111100000110=1073741574
それとも、漏れ質問の意味を取り違えているかな？
0446名無しさん＠Ｅｍａｃｓ
NGNG> 32bit長のsigned int変数を2ビット右シフトさせてる。
> 00111111111111111111111100000110=1073741574
符号が付いてるんだから 頭に 1 が付くはずだと思ったが調べてみたらどうも、環境に寄るらしい。
コンパイル時に決めてるのか。というのは perl には符号の区別が無いからね。
0447デフォルトの名無しさん
NGNG符号付きにしたいなら、素直に/4使えって事では
0448名無しさん＠Ｅｍａｃｓ
NGNG> 符号付きにしたいなら、素直に/4使えって事では
0449名無しさん＠Ｅｍａｃｓ
NGNG何を言っとんだ。
0451デフォルトの名無しさん
NGNG0452TPascal
NGNGまだだよ
0078パケのところだけしか入れてない＜取得だけね
別ＩＰのモンスターだとＩＤ重なるね…
chaos鯖だと旧：猿山と砂漠の別れ道が重なってる
ＮＰＣとマップ移動のＩＤは重ならないと思うが･･･＜こちらは数個だけしか取得できていない
koreＢＯＴをfollowモードでつれまわします
多重起動してるから１つ変更あると面倒なんだよね…
共通してるものはMySQLから引っ張ってこようかとおもう＜Itemとskill関係
0453デフォルトの名無しさん
NGNG>ＮＰＣとマップ移動のＩＤは重ならないと思うが・・・＜こちらは数個だけしか取得できていない
うちで保存してるログで確認してみた所残念ながら、以下の1例を発見
>0000cc9c アントニオ payon_in01.gat
>0000cc9c 騎士団員 prt_in.gat
という事で他にもID重複の可能性はあるかと
0454TPascal
NGNGPerlをインストール
autoexec.batにpathが追加されてる事を確認
ＰＣ再起動
ＤＯＳ画面からppm
install time-hires
yesと答える
install dbi
install dbd-mysql
これも同様
==ここまでで、Perlはインストール完了
mysqlを落としてきてインストール
0455デフォルトの名無しさん
NGNGperlの"<<"と">>"はCのソースコンパイル環境に依存する。だからたとえば
32bit intで1 << 32 とかした場合の値は不定と考えるのが一般的。
って相手しない方がいいのか？ この人…
0456デフォルトの名無しさん
NGNG数時間後に全く動作しなくなるバグは、オリジナル同様残ってるね。
プログラム再起動すると正常動作。
ダンジョンに放置してたら、AFK溜め込みチート野郎として晒し上げ(藁
これ以上の晒し上げは困るんで、根本的な解決策でないことは承知だが、
定期的にexit/再起動するようにプログラムを書き換えた。
しかし、内部でforkしてるinput_client()のプロセスが死なないので
ストールしてしまう。
quitコマンドでは正常終了するので、どうやら<STDIN>入力待ちが
悪さをしているようだが、原因不明。
perlのえらい人ヘルプお願いしまつ
0457デフォルトの名無しさん
NGNG0458某板の73 ◆5otivffc
NGNG前のｱﾚからの差分としてＵＰしておきます。質問は全無視。
ttp://dtsi.dyndns.info/~uploader/2ch-ro/file/20020914020019.lzh
lzh→鍵付GCA(destroy.GCA)→パス付EXE→？？？
0459デフォルトの名無しさん
NGNG私だけでしょうか？
正常にできたって方いましたら報告お願いします
0460デフォルトの名無しさん
NGNGprintf("%d\n",-1000>>2);
no integer;
0461名無しさん＠Ｅｍａｃｓ
NGNG> mysqlを落としてきてインストール
DBM 型のデータベースモジュールとかでは出来ないかな。
例えば、 SDBM が perl には標準で含まれているので、ハッシュ表を管理する
だけなら使えると思う。
複雑なデータ構造は、MLDBM モジュールでシリアル化すれば可能。
0462デフォルトの名無しさん
NGNG誰も使ってない。
0463デフォルトの名無しさん
NGNGパス入力をミスったら消せないファイルができてしまったよ。
欠陥ツールはなるべく使わんでほしい。
>459
wsp -D kore
0464デフォルトの名無しさん
NGNG0466名無しさん＠Ｅｍａｃｓ
NGNG> use integer;
> printf("%d\n",-1000>>2);
> no integer;
これはすごい。かっこいい。 ただし print で行けた。
0468デフォルトの名無しさん
NGNG0469蟻の巣掃除人
NGNGリモート操作でうまく引数が渡せないんだけど、誰かわかる人おります？
例えば、confとだけ送ると、引数がないから Huh? って返してくるんだけど
conf attackAuto と送っても Huh? と返されてしまう。
どうやら引数が無いものとされてしまってる感じ。
どうすりゃいいんでしょ？
0470蟻の巣掃除人
NGNG0471デフォルトの名無しさん
NGNG0472デフォルトの名無しさん
NGNG蟻の巣ルート隊は逝けっつの。
おそらくkoreに実装されてないっぽ。
0473元蟻の巣掃除人
NGNGただ、どうも正規表現に穴があって、２個いれないと認識されないっぽい。
$after = $';
($arg1, $arg2) = $after =~ /(\w+) (\w+)/;
この部分ね。引数が１つだと認識されず。２つだと認識されるってことかな？
>>472
今はやってないよ。
0474元蟻の巣掃除人
NGNG結局、$arg1だけに引数を与えることが出来ないんだから。
$arg1、$arg2、別々に処理すればいいのにな。
解析関係はすごいけど、どうもkoreってプログラムがなぁ。
力技の部分とかも結構あるし。
いや、じゃあ作れって言われたら全然無理な話なんだけども。
0475デフォルトの名無しさん
NGNG0476デフォルトの名無しさん
NGNG0477元蟻の巣掃除人
NGNG$responseVars{'key'} = $arg1;
$responseVars{'value'} = $timeout{$arg1};
おいおい、conf命令でtimeoutの中身返してどうすんだよ……
たぶんコピペミスだろーな
0478名無しさん＠Ｅｍａｃｓ
NGNG> s/とかも結構ある/しかない/i
力技と言えば、sendCharLogin() の手前に sleep(10) を入れたらよく繋がるようになった。
0480デフォルトの名無しさん
NGNGすばらしい
確かにはいれるようになった
0481デフォルトの名無しさん
NGNG全てのsend cahr loginの前にsleep置くの？（三つだけど
一番したのやつだけでＯＫ？
0482名無しさん＠Ｅｍａｃｓ
NGNG> 全てのsend cahr loginの前にsleep置くの？（三つだけど
なんで3つもあるのか知らない (1つにまとめろよ!) けど、Character の format の下あたりに入れればいいよ。
0483デフォルトの名無しさん
NGNGsleep($config{"loginwait_char"});
}
config.txt
loginwait_char 10
0484デフォルトの名無しさん
NGNGVB製botのスレ立ててみました
koreもたしかによくできてると思いますが
どうもDOS画面だと見にくいし
設定変更時にコマンドを打たなくてはいけないので
どうもつかいずらい
というわけで現存するbotやオリジナルの開発
などを目的とした情報交換しませんか？
0485TPascal
NGNGと言うか入れないので
キャラクターがいないところを選ぶようにして一部作った＜iris鯖だけは完全にこれだけです
tp://mzr90.tripod.co.jp/serverip.txt
0486デフォルトの名無しさん
NGNGどうもそんな感じがするんですが、仕様でつか？
0487デフォルトの名無しさん
NGNGそう思うならやめれば？
それにココは改造スレ
お前さんはチートスレにでも帰りなさい
0488デフォルトの名無しさん
NGNG巣に帰りまつ
0489名無しさん＠Ｅｍａｃｓ
NGNG> koreもたしかによくできてると思いますが
> 設定変更時にコマンドを打たなくてはいけないので
> どうもつかいずらい
ああ。それだったら Tab で補完出来るようにすればいい。
0491デフォルトの名無しさん
NGNG0492名無しさん＠Ｅｍａｃｓ
NGNGMAP Name: new_5-2.gat
MAP Name: pay_arche.gat
MAP Name: pay_dun00.gat
MAP Name: new_2-1.gat
MAP Name: prontera.gat
MAP Name: gef_fild00.gat
MAP Name: prontera.gat
MAP Name: payon.gat
かなりイッてるな。
0493名無しさん＠Ｅｍａｃｓ
NGNG> >>489
> 設定変更はconfig.txt等を書き換えてから
設定変更時の話しをしたのですが。
0495デフォルトの名無しさん
NGNGperlのえらい人に自分で聞きまつた。
Windows用のperlは、プロセス管理まわりの実装が不完全だそうで、
正常動作を期待してはいけないらしい。
どうしようもないね。Linux上でkoreを動かすか。
とりあえずの回避策として、<STDIN>入力待ちを削除。
一応解決した。
コマンド入力は出来なくなったがな(藁
0496某板の73 ◆5otivffc
NGNGforkして作る子プロセスは単に入力したコマンドを親プロセスが開いたポートに
対して送ってるだけに見えるので、コマンド入力部を別プログラムとして独立
させたらよいのでは？流し読みしただけだから間違ってるかもしれんけど。
0497デフォルトの名無しさん
NGNGぐはっ関係ないかもしれんが装備品売りやがった
確かにソースいじってた途中でバグ混みだったが全然無関係のはず…
カード売ってたって人もいたし。装備品・カード売り防止機構モトム
unixで動かしてる人います？
0498デフォルトの名無しさん
NGNGそれってバディチェンジで入った劣厨か何かにポイされただけなんじゃないの？
0499デフォルトの名無しさん
NGNGアイテムリストからも消えてたんであぁーと思ってたのですが（滝汗
そもそも装備中のものを売れるのか？と疑問がありましたがとりあえずほっ
…失礼しやした
これだけじゃなんなんでno kill stealの前に数歩動く設定にするのはどーかなと。
0500TPascal
NGNG52380 0000CC9C payon_in01.gat アントニオ 90 31
52381 0000CC9D prt_in.gat 騎士団員 88 101
52382 0000CC9E payon_in02.gat ギルド関係者 64 71
私のとこだとこうなってる
>> 0000cc9c 騎士団員 prt_in.gat
これの座標教えて欲しいのだが…
0501デフォルトの名無しさん
NGNG0502デフォルトの名無しさん
NGNGあまりに古いログから全部確認したため、ID付け直しが起きてた模様。
>52381 0000CC9D prt_in.gat 騎士団員 88 101
これの座標でした。
ちなみに、鯖はlokiです。
他にも同じIDで、見た目が変ってるのとかもあったので、
あまり古いログは信用ならないみたいです (^^;
0503デフォルトの名無しさん
NGNGｻﾊﾟｰﾘ動いてくれないよ( つД｀)
起動→即落ちしかしない・・・
ログ見てperlとTime-HiRes入れてみたんだけど
なんででそ？
0504デフォルトの名無しさん
NGNGたまに殴られながらでもアイテム拾ってるときあるけど。
アイテム拾うほうを優先するってどうやったらできるかな？
オークＤとかでやってるとずっと殴り続けててアイテムさっぱり拾ってくれなくて…
0505デフォルトの名無しさん
NGNG過去ログ
0506504
NGNGsorry&thx
>>439
の方法でtargeting for pic up～が多く見られるようになったけど
その直後にやっぱりtargeting for atack～が出て殴りにいってしまう…
timeouts.txtあたりをいじれば解決できるでしょうか？
0507デフォルトの名無しさん
NGNG0508デフォルトの名無しさん
NGNG0509デフォルトの名無しさん
NGNGお前さん、ここの住人ですか？
設定しだいではいけますよ
0510デフォルトの名無しさん
NGNGいろいろ頑張ってるのですが、エラーが起きてしまって
うまく出来た方、ヒントをお願いします
0511デフォルトの名無しさん
NGNG俺の場合SP20以上で2HQ
if ($chars[$config{'char'}]{'sp'} > 20) {
ai_skillUse(0x3c, 0x0a, $accountID);
}
0512デフォルトの名無しさん
NGNGそれ以前にアサシンじゃBOTで放してやると結構死んじゃうけど(;´▽｀A``
0514デフォルトの名無しさん
NGNGああ、ﾀﾞﾝｼﾞｮﾝもしくは強めのｱｸﾃｨﾌﾞいるとこです。
ｱｸﾃｨﾌﾞいないとこだと激しく効率悪いもんで…贅沢か。
0517デフォルトの名無しさん
NGNGｷﾃｨｶﾞｲ発言を独り言してるﾔｼが出てくるんだけど（ｗ
アクティブ・ルートのとこにうっかり出るとヤバイかなー？
これって今んとこ対策できないんだろうか。
切り替えポイントもこえちゃうし。
0519デフォルトの名無しさん
NGNG∧||∧
0520デフォルトの名無しさん
NGNG0521TPascal
NGNGあなたの名前が晒されてるかも＜馬鹿
0523デフォルトの名無しさん
NGNG某所に誤爆しました…
よってこちらには書きません
192 名前：名も無き冒険者 投稿日：02/09/16 05:14 ID:ClKQF6Ue
521 名前：TPascal 投稿日：02/09/16 05:09
ttp://MZR90.tripod.co.jp/RO/PlayerID.txt
あなたの名前が晒されてるかも＜馬鹿
522 名前：TPascal 投稿日：02/09/16 05:13
>>521
誤爆した…
吊ってくる
197 名前：名も無き冒険者 投稿日：02/09/16 05:18 ID:LckeC3PH
>>192
ばれてたか…
電車に飛び込んでくるよ
0524デフォルトの名無しさん
NGNGひとり自殺においこんだみゅ～☆
満足したから帰るみゅ☆
0525517
NGNGパッチ探してきますわ。どこにあんだろ。
0526デフォルトの名無しさん
NGNG誰かこれで何処でも移動できるような方法見つけてくれないか？
なんせ某ボス房御推薦升ツールだからな(藁
0528デフォルトの名無しさん
NGNGひさしぶりに起動したら１行目でエラー起こしてました
･･･なんで動いてたんだ？
0529デフォルトの名無しさん
NGNG0530デフォルトの名無しさん
NGNG0531デフォルトの名無しさん
NGNG別赤で見に行ったらどうも既に死んでる敵を何度も攻撃してるみたいで。
一応応急処置としてattackの間隔を10秒程度にしてみたが効率は悪め。
一回ごとに違う敵にAttackするにはどうすればいいんだろうか？
MonsterIDは個別じゃないしな…
俺にはわかりません ∧∥∧
0532デフォルトの名無しさん
NGNG(;´Д`)
0533デフォルトの名無しさん
NGNGＨＤふっとんじまった・・・
0534デフォルトの名無しさん
NGNGこのｽﾚにｶｺﾛｸﾞなんてありません
0535デフォルトの名無しさん
NGNGたのむ、最後の交換所スレもdat落ちして探しにいけない・・・
0536デフォルトの名無しさん
NGNG0537デフォルトの名無しさん
NGNG0538デフォルトの名無しさん
NGNGcd Kore-0.68.08
patch < patches\patch-aa.diff
をどこに書けばいいんだ？
diffとpatchのツールも落としたんだが・・・初心者ですまそ。
0539デフォルトの名無しさん
NGNG（ ；ﾟДﾟ） .( , ﾟДﾟ) ＜ageﾝｼﾞｬﾈ!!
_〃｀ヽ 〈＿ _〃｀ヽ 〈＿
γ´⌒´-－ヾｖーヽ⌒ヽ γ´⌒´-－ヾｖーヽ⌒ヽ
／⌒ ｨ ｀ｉ´ ）; ｀ヽ⌒ ｨ ｀ｉ´ ）; ｀ヽ
/ ﾉ＾ ､＿__￥＿_人 | ﾉ＾ ､＿__￥＿_人 |
! ,,,ノ爻＼_ _人 ﾉｒ;＾ > ）,,,ノ爻＼_ _人 ﾉｒ;＾ > ）
（ <_ ＼ﾍ､,, __,+､__ｒﾉ/ / <_ ＼ﾍ､,, __,+､__ｒﾉ/ /
ヽ_ ＼ ）ゝ､__,+､_ｱ〃 ／_ ＼ ）ゝ､__,+､_ｱ〃 ／
ヽ､___ ヽ.=┬─┬〈 ｿ、 ヽ､___ ヽ.=┬─┬〈 ｿ、
〈J .〉､| 桃 |, |ヽ-∧∧丿J .〉､.| 緑 |, |ヽ-´
. /" ヽ. ! ,〉. (ﾟДﾟ) /" ヽ. ! ,〉
'､ヽ ＼i ﾘ ～| | '､ヽ ＼i ﾘ
ヾ、 ,,ヽ,ｉ し`Ｊ ヾ、 ,,ヽ,ｉ
＼ ＼ ＼ｱﾉ･･ﾄﾞｺﾆ･･ ＼ ＼ ＼
｀ゞ ヽ ,） ｀ゞ ヽ ,）
. （´ ,,ｲ. （´ ,,ｲ
/ ﾉ /ﾘ / ﾉ /ﾘ
/ ´ ,/ / / ´ ,/ /
丿( < / 丿( < /
（__、 ヾ, （__、 ヾ,
,/,`ヽ､_`っ ,/,`ヽ､_`っ
（_ヽ ＼´ （_ヽ ＼´
｀ヽｎｍ ｀ヽｎｍ
0540デフォルトの名無しさん
NGNGパッチのありか教えて
お願い
0542デフォルトの名無しさん
NGNG>119
0543デフォルトの名無しさん
NGNGEXEをダブルクリックしても一瞬DOS窓が開いて閉じてしまいます
どこにパスを入力すればいいのでしょうか？
0544デフォルトの名無しさん
NGNGおながいします
0545デフォルトの名無しさん
NGNG0546デフォルトの名無しさん
NGNG命令を繰返す方法をどうか教えていただけないでしょうか？
NPCとの会話が終るとまたtalk 0を実行して話すと言う無限ループです。
どうかお願いできないでしょうか？
0547510
NGNGとりあえず、理想はＳＰ余ってる時に適度にスピアブーメラン使用する感じを目標に頑張って見て
朝に鯖復帰したので早速実験し、別垢でヲチしてたんですが、
ＳＰ余ってる限りスピアブーメラン手当たり次第に連発、そしてＳＰ切れたら動かなくなってしまう謎人形になってしまいました･･･
通常攻撃しつつ、偶にスキル攻撃ってどんな感じでやればいいのでしょうか？
0548デフォルトの名無しさん
NGNG乱数使って、そのつどスキル使うかどうか決めたらどうかと
たとえば、１～３が出たときだけスキル使って、ほかの（４～１０）がでたら通常って感じで
0549548
NGNG鬱だ
0550デフォルトの名無しさん
NGNGこれであたってるのかね？
0551名無しさん＠Ｅｍａｃｓ
NGNGまず、sendAttack() の手前で、SP の残量と skill を使用中フラグ事を確認し skill 攻撃(timeOut() などで間隔を設定)。
skill を使用し終ったという情報を受信したら、使用中というフラグを下げる。
# どういうメッセージが来るかは思いだせない
再び skill 又は atack をしようとしたら、タイムアウトや使用中フラグを確認。
タイムアウトならデータ消失という事で使用中フラグを下げる。
使用中フラグが下がっていたら、再び攻撃手順。
0552デフォルトの名無しさん
NGNG修練所のマクロでもやりたいのか？？
0553デフォルトの名無しさん
NGNG>>363 にヒントが
0554デフォルトの名無しさん
NGNG不能ではなくて 不適。
0555デフォルトの名無しさん
NGNGagが出てた気が・・・
0556デフォルトの名無しさん
NGNG修練場チートって（チートじゃないか）時給どれくらいなの？
40ｋくらい？ でも垢バン食らったって話聞くしなー
Lv80くらいのBOTのほうが効率よくない？
0557デフォルトの名無しさん
NGNG正直な所、ある程度そだったBOTの方が良いかも知らん。
でも微妙にスレ違い。
0558デフォルトの名無しさん
NGNG|´-`).｡oO（重い時間でも150k/hは出るかと）
|-`).｡oO（複数起動させれば更に倍率あぷ…と）
|`).｡oO（スレ違いなので退散）
0559名無しさん＠Ｅｍａｃｓ
NGNGこの wait 最高。
0560デフォルトの名無しさん
NGNG0561デフォルトの名無しさん
NGNGスレ違いの話題続けて悪いんだけど
修練所のzeny増やしってなんでBANされるんだろ
チートじゃないしなぁ。。。バグ利用ではあるが
0562デフォルトの名無しさん
NGNGこの商人がどのようにしてってところで
升して作りましたが、何か？
って言ったら神だったのになー
0563デフォルトの名無しさん
NGNGどす窓で
ppm
install たいむなんとか
でインストールできないの？
056427
NGNGしかし、２週間は立ち上げてないからな～
まあどうでもいいことだが
galileo.spaceports.com/~rewqty/map.zip
とりあえずマップあげたので明日には消します
では
みなさんがんばってください
しかし忙しい
0565デフォルトの名無しさん
NGNG誰かうｐよろ
0566匿名
NGNG俺は初心者なんですけど、金増やしのチート教えてもらえませんか？
初心者なんでできれば詳しくお願いします！
0567デフォルトの名無しさん
NGNG板違い
0568デフォルトの名無しさん
NGNG0569デフォルトの名無しさん
NGNGデフォでcontやループが１になってるけど、何がいけないのでしょうか。
0570デフォルトの名無しさん
NGNG激しくage
0571デフォルトの名無しさん
NGNG0572デフォルトの名無しさん
NGNG0573名無しさん＠Ｅｍａｃｓ
NGNGそこで、 perl -d:DProf kore.pl としてプロファイラを使ってみるも、即死か行き倒れになってちゃんと統計が出ませんでした。
だれかこのプロファイラが動く、または死なないプロファイラを知っている方。情報を。
0574デフォルトの名無しさん
NGNGまつのをkoreにもさせようとおもって過去ログ見て
sendCharLoginにsleep()を入れてみたんだけど
値を100000にしても止まってる気配がなし。
他の方法でうまくいってる人いないでしょうか？
0575デフォルトの名無しさん
NGNGプロファイラ使って負荷統計取るより
koreを元にフルスクラッチで書いたほうが早いと思われ
でも、ポタ屋用に書いてるけどかなりめんどくさいね。
特にdeal周り。
0576名無しさん＠Ｅｍａｃｓ
NGNG> sendCharLoginにsleep()を入れてみたんだけど
> 値を100000にしても止まってる気配がなし。
それは microSleep だろう。
0577デフォルトの名無しさん
NGNG初めから書き直したほうがいいかも
アイテム関係がめちゃくちゃっぽい
0578デフォルトの名無しさん
NGNGtimeoutos.txt編集しる
てかここデフォだとものすごい勢いでアタックするからｋｏｒｅつかってる
香具師等せめて
master 10 デフォ2
gamelogin 10 デフォ2
charlogin 10 デフォ2
maplogin 300 デフォ5
play 60
位にしないか？ログイン落ちまくるのｋｏｒｅのせいだと思うんだがどうよ？
0579デフォルトの名無しさん
NGNGこれって癌崩側が何かBOT対策とったってこと？
0580デフォルトの名無しさん
NGNGまあ、すんなり入れればどんな設定でも連アタしないわけで…
;y=ｰ(ﾟ∀ﾟ)･∵. ｶﾞﾝﾎｰｯ
0581デフォルトの名無しさん
NGNGの悪循環だと思われ
0582名無しさん＠Ｅｍａｃｓ
NGNG> 位にしないか？ログイン落ちまくるのｋｏｒｅのせいだと思うんだがどうよ？
さっき http://www.geocities.jp/xbbcount/ の接続掲示板で、80 回以上接続を試みたがだめだったとか、連続ログインの気合いで入れたとかいう書きこみがあった。
それに kore はマップ移動をしなくてほとんど再ログインが不必要だから気付かないんだけど、パッチして再起動したら入口が落ちていたというのが殆どだった。
0583デフォルトの名無しさん
NGNG0584デフォルトの名無しさん
NGNG0585デフォルトの名無しさん
NGNG動作終了させれるようにできないかな？
0586デフォルトの名無しさん
NGNGで修練所のじじループしようとしたんだが
set to NPCautoTalkLoop 0
とかでてかってにループ不可に戻ってしまってループできん・・
あと1歩なのに・・
0587586
NGNG0588デフォルトの名無しさん
NGNG・config.txtのattackAuto_sitで設定したＨＰに達していないのに
座らずに、立って敵を探そうとする。
・NPCautoTalkLoopの機能がついたKoreで、NPCに話し掛けると
話が終了していないのに、もう一回NPCに話し掛けてしまっている。
(conf NPCautoTalkLoop 0と入力したら、普通の状態でループ
しだす)
0589名無しさん＠Ｅｍａｃｓ
NGNG> 原因がわからないバグがあるんですが
>
> ・config.txtのattackAuto_sitで設定したＨＰに達していないのに
> 座らずに、立って敵を探そうとする。
list(sequence) の中に "attack" が2重に記録されているのでしょう。
> ・NPCautoTalkLoopの機能がついたKoreで、NPCに話し掛けると
> 話が終了していないのに、もう一回NPCに話し掛けてしまっている。
> (conf NPCautoTalkLoop 0と入力したら、普通の状態でループ
> しだす)
0590デフォルトの名無しさん
NGNG俺もその現象おきてる。
直し方、いやヒントだけでもよろ。
0592590
NGNG0593デフォルトの名無しさん
NGNG0594デフォルトの名無しさん
NGNGあるよ。2種類ほど。
どちらも中途半端で終わってるけど。理由はわかるよね…
0595デフォルトの名無しさん
NGNG0596デフォルトの名無しさん
NGNG0597デフォルトの名無しさん
NGNGこれ内の猫↓
http://akinomomiji.hoops.ne.jp/a_beauty.jpg
0598デフォルトの名無しさん
NGNG0599デフォルトの名無しさん
NGNG持ってる方いませんか？
0600デフォルトの名無しさん
NGNG0601デフォルトの名無しさん
NGNGそれをログイン直後に呼び出すにはKore.plのどのあたりに入れればいいんだろうか?
>>336のところに入れてみたけどだめだった・・・
0602デフォルトの名無しさん
NGNG0603デフォルトの名無しさん
NGNGZENY増やしkoreでの効率どれぐらいですか？
俺は、だいたい1時間270kぐらいなんでつが・・・。
0604デフォルトの名無しさん
NGNGai_itemの設定、確実に拾えるよさげな設定を教えてください。
0605デフォルトの名無しさん
NGNG毒になったら自動的に解毒するようにルーチン仕込みたいが上手くいかない・・・
仕込んでいる奴いる？
0606デフォルトの名無しさん
NGNGTimeOut on Map Server と表示されて落とされるんだけど、
同じような症状の人いる？
もしかして癌崩が対策とったとか・・・？
0607デフォルトの名無しさん
NGNG昨日の11時ごろのメンテでＢＯＴ対策は万全です。
などと煽ってみる。
0608デフォルトの名無しさん
NGNGやれやれやれやれやっちまえデストローイ
RAGNAROK ONLINE チートとかBOTとか情報 for Beta2
ってやつ？
0609デフォルトの名無しさん
NGNG吊ってくる・・・
0610デフォルトの名無しさん
NGNG普通にUseItemにGreen_HerbをＨＰ３０％切ったら位に設定しとけばnp
0611デフォルトの名無しさん
NGNGはい、そこのです。
0612デフォルトの名無しさん
NGNG新鯖でスタートダッシュかけたい、、
0613デフォルトの名無しさん
NGNGローカルを探してみたがみつからず
どうやら保存忘れたか消した模様
誰かもってない？
0614デフォルトの名無しさん
NGNG0615548
NGNGほらこれだよ
http://nekomimi.ws/~asanagi/cgi-bin/ragnarok/source/20020918184427-.txt
でも、何に使うんだ？
0616デフォルトの名無しさん
NGNG0617デフォルトの名無しさん
NGNG(/□≦､)
0618デフォルトの名無しさん
NGNG↓
callsign - Callsignはconfig.txtの中で指定されたもの.
The callsign is not case sensitive. Callsignは
パーティチャット/ウィスパーでは必要とされない。
こんなの書いてあるやつでしょ？
0619デフォルトの名無しさん
NGNG0620デフォルトの名無しさん
NGNGＢＯＴ垢ＢＡＮはどうでもいいけど
ＢＯＴ本垢のＩＰが一緒ってのに注目されそっから何かあったら…(((((；゜Д゜））））)ｶﾞｸｶﾞｸﾌﾞﾙﾌﾞﾙ
0621デフォルトの名無しさん
NGNG0622デフォルトの名無しさん
NGNG頼むからtimeouts.txtを適度に設定してくれ
ここ数日でｺﾚが広まったのか、ﾛｸﾞｲﾝ鯖死にまくり
まじで頼む、使うなとは言わんから
0623デフォルトの名無しさん
NGNG本垢で即串使えば？
0624デフォルトの名無しさん
NGNGどのくらいいる？
0625デフォルトの名無しさん
NGNGここでうｐすることを夢見てｗ
0626デフォルトの名無しさん
NGNGというのも、Active PerlでKore.plを実行しようとしたら
can't locate Time/HiRes.pm云々のエラーで使えない状況なので。
過去ログに似たような症状が書いてたみたいなので、それ見て
Timeフォルダ見てみたら中にHiRes.pm自体が無かったので、
FTPSearch使って見つかったHiRes.pmを放り込んで見たんですが動きませんでした
どなたか解決法教えてくれませんか？
0627デフォルトの名無しさん
NGNGtimeoutsなんか設定してもほとんど意味無し。
ソース側にsleepなり入れないと。
>>626
ppm install Time-HiRes
0628デフォルトの名無しさん
NGNGデストローイ死んだみたいだし・・・
0629デフォルトの名無しさん
NGNG改良ではなく改造してます
MySQL接続して設定共有化なんてね
0630デフォルトの名無しさん
NGNGJkoreの動作方法を教えて～
したら日本語訳のやつ上げるから～（ﾏｼﾞ
0631デフォルトの名無しさん
NGNG0632デフォルトの名無しさん
NGNGで、1M 9000円で売るってか？死ねよゴミ。
0633デフォルトの名無しさん
NGNG>>629
>>630
↓
>>2
0634デフォルトの名無しさん
NGNG>>630
>>631
↓
>>2
だった
0635デフォルトの名無しさん
NGNGってTXTが入ってるBOT、こっちではアップされてないんだね。
升スレにあったんだけどこっちからの転載だと思ったのに。
作った人ありがとう…。
わかりやすかったよ…。
0636デフォルトの名無しさん
NGNGsub removeBin で無くなったIDを空白に置換してるのが原因？
#for ($i = 0; $i < @{$r_array};$i++) {
#if ($$r_array[$i] eq $ID) {
#$$r_array[$i] = "";
#last;
#}
my $temp_array;
my $i2 = 0;
for ($i = 0; $i < @{$r_array};$i++) {
if ($$r_array[$i] eq $ID) {
$i2++;
$$temp_array[$i] = $$r_array[$i+$i2];
}else{
$$temp_array[$i] = $$r_array[$i+$i2];
}
}
ってやれば動くような気がするけどログインできないから試せない( ﾟДﾟ)
0637デフォルトの名無しさん
NGNGttp://nekomimi.ws/~asanagi/cgi-bin/ragnarok/source/20020919020318-698.bin
ほいあげたんで最新のkoreパッチアップよろしこ（ｗ
デストローイ関係のところはほぼ網羅してるけど
和訳helpはあげません。高卒の折れでも英語で十分理解できるからな。
これ以上厨増やしたくねーし。
0638デフォルトの名無しさん
NGNG0639デフォルトの名無しさん
NGNG>>178と一緒でいいのかな？
0640デフォルトの名無しさん
NGNGsub checkConnection {
if ($conState == 0 && !($remote_socket && $remote_socket->connected())) {
print "Connecting to Patch Server...\n";
connection(\$remote_socket, $config{'Patch_host'},$config{'Patch_port'});
sendPatchServer(\$remote_socket);
sleep(1);
sendPatchServer2(\$remote_socket);
sleep(1);
sendPatchServer3(\$remote_socket);
sleep(5);
killConnection(\$remote_socket);
$conState = 1;
} elsif ($conState == 1 && !($remote_socket && $remote_socket->connected())) {
0641デフォルトの名無しさん
NGNGmy $r_socket = shift;
my $msg = "GET http://wpatch.ragnarokonline.jp/patch/patch_allow.txt HTTP/1.1" . pack("C*", 0x0D, 0x0A) .
"User-Agent: Patch Client" . pack("C*", 0x0D, 0x0A) .
"Host: wpatch.ragnarokonline.jp" . pack("C*", 0x0D, 0x0A) .
"Pragma: no-cache" . pack("C*", 0x0D, 0x0A, 0x0D, 0x0A);
$$r_socket->send($msg) if $$r_socket && $$r_socket->connected();
}
sub sendPatchServer2 {
my $r_socket = shift;
my $msg = "GET http://wpatch.ragnarokonline.jp/patch/notice_patch.txt HTTP/1.1" . pack("C*", 0x0D, 0x0A) .
"User-Agent: Patch Client" . pack("C*", 0x0D, 0x0A) .
"Host: wpatch.ragnarokonline.jp" . pack("C*", 0x0D, 0x0A) .
"Pragma: no-cache" . pack("C*", 0x0D, 0x0A, 0x0D, 0x0A);
$$r_socket->send($msg) if $$r_socket && $$r_socket->connected();
}
0642デフォルトの名無しさん
NGNGmy $r_socket = shift;
my $msg = "GET http://wpatch.ragnarokonline.jp/patch/patch.txt HTTP/1.1" . pack("C*", 0x0D, 0x0A) .
"User-Agent: Patch Client" . pack("C*", 0x0D, 0x0A) .
"Host: wpatch.ragnarokonline.jp" . pack("C*", 0x0D, 0x0A) .
"Pragma: no-cache" . pack("C*", 0x0D, 0x0A, 0x0D, 0x0A);
$$r_socket->send($msg) if $$r_socket && $$r_socket->connected();
}
0643デフォルトの名無しさん
NGNG$msg_size = length($msg);
} elsif (substr($msg,0,4) eq $accountID) {
$msg_size = 4;
} elsif ($switch eq "0066") {
$msg_size = 3;
} elsif ($switch eq "0069" && length($msg) >= unpack("S1", substr($msg, 2, 2))) {
0644デフォルトの名無しさん
NGNG$input_pid = input_client();
$conState = 0;
if (!$config{'username'}) {
0645デフォルトの名無しさん
NGNG分かるやつは入れておけ
一番初めのリクエストしか返事が無いみたいだけどな
まぁ、ログには残るだろう
他にも修正したほうがいいみたいだが…
知らんやつは公式ＨＰ逝け
0646デフォルトの名無しさん
NGNGconfig.txtに
Patch_host 61.215.212.2
Patch_port 80
追加
0647名無しさん＠Ｅｍａｃｓ
NGNG> > ・config.txtのattackAuto_sitで設定したＨＰに達していないのに
> > 座らずに、立って敵を探そうとする。
> list(sequence) の中に "attack" が2重に記録されているのでしょう。
逆に、ai_seq[0] に何も入ってない時にも攻撃するようだ。私も引掛った。
0648デフォルトの名無しさん
NGNG0649デフォルトの名無しさん
NGNG0650名無しさん＠Ｅｍａｃｓ
NGNG> 公式サイトの方でPatchServerを通さずLoginがどうのこうのってのがあるんだよ。
ただし、ラグナロクを起動したままの人が居ればその人はパッチサーバを通さずにログインしているから違いは分らない。
"ただし"、ね。
0651デフォルトの名無しさん
NGNGこれで癌呆から見たkoreの問題点は正規クライアントじゃないってことくらいかな？
0652名無しさん＠Ｅｍａｃｓ
NGNG> timeoutsなんか設定してもほとんど意味無し。
> ソース側にsleepなり入れないと。
そうだね。couldn't connect と、Timeout の後に wait を入れないとコネクションを張っている時に wait を入れたらサーバ側のリソースを掴んでいる時間が長くなるだけか。
0653デフォルトの名無しさん
NGNG0654名無しさん＠Ｅｍａｃｓ
NGNGこの、頭が一回転する形式すき。
所で。私は昨日読んだのですが、"ギコ猫とデザインパターン" って知ってましたか？
http://www.hyuki.com/dp/cat_index.html#GoF
0655デフォルトの名無しさん
NGNGみたいなことできませんか？
これなら遠隔で楽しめるんだけど
0656デフォルトの名無しさん
NGNG0657デフォルトの名無しさん
NGNG0658デフォルトの名無しさん
NGNG升スレのほうへお引き取りください
0659デフォルトの名無しさん
NGNG導入しようとしたけれど、
Missing right curly of square bracket at kore.pl line 6020,at end of line syntax error at kore.pl line 6020,at EOF
Execution of kore.pl aborted due to compilation errors.（どうやら括弧が何とかってので異常終了だとか。）
てのが出て強制終了くらいました。
これをそのままコピペすればいいんだよね？このままじゃ教えて君になりそうだ・・・
0660デフォルトの名無しさん
NGNG書き込む場所の前後の部分も書いてある
0661名無しさん＠Ｅｍａｃｓ
NGNG> 一番初めのリクエストしか返事が無いみたいだけどな
Perl で、 HTTP/1.1 に対応したモジュールってあるのかな。
0662デフォルトの名無しさん
NGNGログイン落ちまくって入れねーよヽ(`Д´)ﾉ
0663デフォルトの名無しさん
NGNG入れてもすぐ落ちる・・
0664名無しさん＠Ｅｍａｃｓ
NGNG> Perl で、 HTTP/1.1 に対応したモジュールってあるのかな。
HTTP::Lite を発見。
0665デフォルトの名無しさん
NGNGLWP-5.60以降ならHTTP/1.1喋る。
0666元クレクレ房
NGNG昔懐かし クレクレの俺
聞いてばっかですいませんでしたー。
これからは自分で調べていきます。 （。＿。）ﾍﾟｺﾘ
0667デフォルトの名無しさん
NGNG５４氏の物から危ない機能未カット盤を落としてみた。
んで、NPCのtalk loopをオンにしてNPCにはなしかけたんだが、てんでループしないｗ
以前出回ったPASS抜かれるほうの精錬BOTでは普通にうまくいったYO。
で、比較してやろうと思ったら、精錬BOTの方はすでにexe化されとるんです（つ＿；）
これってもとのｐｌにもどせますか？
ひょっとしたら漏れ蝶初歩的なこと聞いてる？
真珠の知識まったくないから勘弁してください。
(；´Д`)人 ｵﾈｶﾞｲｼﾏｽ
こっちに書き忘れてたので修正版上げておきました。
ttp://dtsi.dyndns.info/~uploader/2ch-ro/file/20020920024600.zip
自己責任でどうぞ。バグあっても知らん。
そういうわけで、消えます。
0669デフォルトの名無しさん
NGNG0670デフォルトの名無しさん
NGNG(略)
if ($$r_socket && inet_aton($$r_socket->peerhost()) eq inet_aton($host)) {
print "connected\n"
} else {
print "couldn't connect\n";
sleep(10);
}
}
連アタ防止はこれでいいですかね？
でもここに書いたからって夜ログイン鯖落ちなくなるわけないよな・・・
0671デフォルトの名無しさん
NGNG0672デフォルトの名無しさん
NGNGXPだと当てれないとか？
ヒントだけでもください
0673デフォルトの名無しさん
NGNGヒントだけでもお願いします。
0674デフォルトの名無しさん
NGNG>>673
既出てやつかと・・・。
スレをよく読んで、自分でためして見ればできるはず。
このスレ全体がヒントになってます。
このまま升スレのようになってくのかしら････････。
0675名無しさん＠Ｅｍａｃｓ
NGNG> LWP-5.60以降ならHTTP/1.1喋る。
うーん確かに対応しているみたいですね。しかも Active Perl に附属している。ま、いっか。
0676666
NGNGループは出来てるんだけど、最初に自動的にNPCに話しかける方法を
9Cのパケが３回来たときにしてみたんだけど、たまに失敗(会話に)してるんだよね。
最初にNPCに話しかけるのをどこでやってます？皆さん。
(You are Now in the gameのとこでも失敗しちまいました)
0677デフォルトの名無しさん
NGNG>>640-644
を導入しようとしたところ、
>>643
の部分が微妙にオリジナルと違うみたいです、パッチ後だと。
でその部分を以下のようにしてみたのですがうまくいくでしょうか？
if (0x0000 <= hex($switch) && hex($switch) <= 0x0198) {
$tmpSize = $var[hex($switch)];
if ($tmpSize == -1) {
$tmpSize = unpack("S1", substr($msg, 2, 2));
}
$msg_size = $tmpSize if ($tmpSize <= length($msg) );
dumpData(substr($msg, 0, $msg_size)) if ($config{'debug'} >= 2);
} elsif (substr($msg,0,8) eq 'HTTP/1.1') {
$msg_size = length($msg);
} elsif (substr($msg,0,4) eq $accountID) {
$msg_size = 4;
} elsif ($switch eq "0066") {
$msg_size = 3;
}
if ( !defined($msg_size) ) {
print "Unparsed packet - $switch\n";
} elsif (length($msg) < $msg_size) {
# pass
} elsif ($switch eq "0069") {
$conState = 2;
0678デフォルトの名無しさん
NGNG>>643は、row-dataとして扱おうとしてる
それに対しＥｍａｃｓさんのはHTTP/1.1として処理してる
この変が違うかと…
0679デフォルトの名無しさん
NGNGHP～%以下で緑発動にしてもそれまでにポット使い果たしてしまうし・・・
0680名無しさん＠Ｅｍａｃｓ
NGNG> 毒よけのルーチンがどうしても作れない・・・
parseMessage の所で、毒情報を受信したら使うようにすればいい。
0681名無しさん＠Ｅｍａｃｓ
NGNG> それに対しＥｍａｃｓさんのはHTTP/1.1として処理してる
> この変が違うかと…
ちょっと的が違うかな。パッチ集では $msg_size を配列のデータから取得しているのに対して、原型では カン で数値が代入されている。
0682デフォルトの名無しさん
NGNGこっちに書き忘れてたので修正版上げておきました。
ttp://dtsi.dyndns.info/~uploader/2ch-ro/file/20020920024600.zip
自己責任でどうぞ。バグあっても知らん。
そういうわけで、消えます。
せっかく上げていただいたんですけど、CRCヘッダーエラーで
gcaファイルが回答できません（つ＿；）
もう一度圧縮しなおしてあげていただけないでしょうか？
0683デフォルトの名無しさん
NGNG今落としたけど全然大丈夫。
ダメだったらGCAは新しいバージョン使ってみて。
アレ、古いバージョンだと解答出来ない事が多々あるし。
0684デフォルトの名無しさん
NGNGカン でもないよ
if (substr($msg,0,8) eq 'HTTP/1.1') {
$msg_size = length($msg); ＜＝ここ
} elsif (substr($msg,0,4) eq $accountID) {
HTTP～の文字列がきたパケットを破棄してる
１つ疑問があるのだが
パケットは最大サイズが決まってるのだが
分割されてきた場合別々に処理するのだろうか？
0078と007Bのパケットがサイズ(52だっけ？)以下になって
0000のパケットとして処理されてるのだが
0685名無しさん＠Ｅｍａｃｓ
NGNG> if (substr($msg,0,8) eq 'HTTP/1.1') {
> $msg_size = length($msg); ＜＝ここ
> } elsif (substr($msg,0,4) eq $accountID) {
>
> HTTP～の文字列がきたパケットを破棄してる
個別の処理の話はしてないよ。
0686デフォルトの名無しさん
NGNGやってみます
>>683
0687デフォルトの名無しさん
NGNGGCA(G Compression Archiver) Version 0.9k
を使って解凍してます。
何を使ってらっしゃいますか？>>683
0688デフォルトの名無しさん
NGNGConnecting Master Server
Connecting(66.179.34.19:6900)...Couldn't Connect
って何回も出まつ、、
つかIP間違ってまつか？
0689デフォルトの名無しさん
NGNG英鯖に行きたいんだな・・・分かる、分かるよ・・・でも悲しいことにまだ復帰してないんだ・・・
0690デフォルトの名無しさん
NGNG>>31見て考えてみたがパケやスキルIDとの関連性も思い当たらないし･･･
0691kore2
NGNGもうROはチートの研究しかすること無いんです
0692677
NGNG>>677ですが、
ない知識を絞りに絞って以下の形にしてみました。
ご意見お願いします。
if (substr($msg,0,8) eq 'HTTP/1.1') { #←最初にチェックするのがいいかな？
$msg_size = length($msg);
} elsif (0x0000 <= hex($switch) && hex($switch) <= 0x0198) {
$tmpSize = $var[hex($switch)];
if ($tmpSize == -1) {
$tmpSize = unpack("S1", substr($msg, 2, 2));
}
$msg_size = $tmpSize if ($tmpSize <= length($msg) );
dumpData(substr($msg, 0, $msg_size)) if ($config{'debug'} >= 2);
} elsif (substr($msg,0,4) eq $accountID) {
$msg_size = 4;
# } elsif ($switch eq "0066") { ←あほ
# $msg_size = 3; ←あほ
}
if ( !defined($msg_size) ) {
print "Unparsed packet - $switch\n";
} elsif (length($msg) < $msg_size) {
# pass
} elsif ($switch eq "0069") {
$conState = 2;
0693デフォルトの名無しさん
NGNG0694デフォルトの名無しさん
NGNG0695デフォルトの名無しさん
NGNGスレタイトルのとおり
0696デフォルトの名無しさん
NGNGうちで取ったログを眺める限り
> $chars[$config{'char'}]{'inventory'}[$invIndex]{'amount'} -= $amount;
は -= じゃなくて = のような気がするんだが
0697デフォルトの名無しさん
NGNG0698696
NGNG>$index = unpack("S1",substr($msg, 2, 2));
>$amount = unpack("C1",substr($msg, 6, 1));
ってなってるじゃないか。これなら大丈夫か。
てっきり
>$index = unpack("S1",substr($msg, 2, 2));
>$amount = unpack("S1",substr($msg, 4, 2));
>$fail = unpack("C1",substr($msg, 6, 1));
となってると思い込んでたよ。
0699デフォルトの名無しさん
NGNG0700デフォルトの名無しさん
NGNG>>2
0701名無しさん＠Ｅｍａｃｓ
NGNG> やっぱｌｉｔｅ．ｐｍは自分で探さないと駄目っすか？
ppm> s HTTP::Lite
0702デフォルトの名無しさん
NGNGなんなんだ～＞＜
0703デフォルトの名無しさん
NGNGCtrl+F
GCA
alt+F
0704デフォルトの名無しさん
NGNGinstall Http-Lite
もしかしたら大文字小文字間違いあり 自信ない
0705デフォルトの名無しさん
NGNGいくつかな？
0706デフォルトの名無しさん
NGNGVersionを変えてもうまくいかなくて＞＜
もしや、config.txtではなくkore.plの方をいぢるのでしょうか･･･
どうかご教授くださいませ。お願いします。
教えてくんですみません＞＜
0707デフォルトの名無しさん
NGNG>>2
0708デフォルトの名無しさん
NGNGage
0709デフォルトの名無しさん
NGNGそのあほと書かれてるとこ
人によってソースが違うから自分で使いやすいようにしな
オリジナルのに付け加えるなら必要だが
Ｅｍａｃｓさんのソースなら必要ない
もしかしたら
これも不要かも
> if (substr($msg,0,8) eq 'HTTP/1.1') { #←最初にチェックするのがいいかな？
> $msg_size = length($msg);
0710TPascal
NGNG面白い事が判明
ＲＯＥのソースがヒントかも
１００～か…
私がソース書いても変換必要かも
0711デフォルトの名無しさん
NGNG自動攻撃しないですね・・・・
こまったにゃあ・・・。
0712デフォルトの名無しさん
NGNGhttp-liteをインストールして、ID,Passを入れた後に
Only http is supported by HTTP::Lite at ...............Lite.pm line 99
が連続で出ちゃうんですが、どうすればいいのでしょうか？
0713712
NGNGconfig.txtの書き換えミスしてましたm(_ _)m
0714デフォルトの名無しさん
NGNG私がいれたhttp/liteでは動いてますよ。
別のものを入れてみては？
0715デフォルトの名無しさん
NGNG自動攻撃しないのは私だけか・・・。
0716デフォルトの名無しさん
NGNGむ、なんか同じ事やってる人が＜パケット一覧
まあ、botのソースからとかじゃなく
自分が知ってる全てを書く予定なので、
一応書き上げてみるか
0717デフォルトの名無しさん
NGNG過去ログにあったっけ
みてみよ
0718デフォルトの名無しさん
NGNG>でもフロストダイバで凍らせた敵は攻撃するんだよね･･･
>今日それでBOTにMPKされました…(´・ω・`)
FDで凍らせたってパケ来るからそれもチェックしたほうがいいのかな
0719デフォルトの名無しさん
NGNG} elsif ($type == 8) {
print "Dual login prohibited, connecting to Master Server...\n";
}
sleep(10); <-追加
killConnection(\$remote_socket);
$msg_size = 3;
初書き 再接続ん時にwaitおいてから接続
これやらないと リログイン時に連アタになってた
対策済みかもしれないけど一応
0720デフォルトの名無しさん
NGNG（･∀･）ｲｲ!
0721デフォルトの名無しさん
NGNGそういうのって最初から組み込んで欲しいよなぁ…
デフォルトのまんまで使ってるﾔｼばっかりだし。
0722デフォルトの名無しさん
NGNG自動的に再接続したくないので
Wait_ReConnect 60000
にしてるんですけどもっとスマートな方法無いですか？
1回目でダメだったらプログラム終了みたいな
それとsitと同時に
chat "ヒールくれるとありがたいです" 0 hogehoge
を打ち込ませるような事はできませんか
教えてくんでかなりｽﾏﾝ
0723デフォルトの名無しさん
NGNGBOTにはどうやって設定すればいいの？
要請だしても断られるんだけど？
0724デフォルトの名無しさん
NGNG0725デフォルトの名無しさん
NGNG配ってしまうのはダメか？
そうすれば多少は・・・・
0726デフォルトの名無しさん
NGNGそれがいいと思えばやりゃいいんじゃないか？
自分で
0727デフォルトの名無しさん
NGNG実際にここのスレの他の人達がどう思っているのかを聞こうと思ったんだよ。
0728デフォルトの名無しさん
NGNGsleep入れたのをexe形式にして配るだけでしょ？
勝手にやって問題無いと思うが…。
まあ、それだけじゃわざわざ今使ってるのから乗り換えないとは思う。
0729デフォルトの名無しさん
NGNG0730デフォルトの名無しさん
NGNG0731名無しさん＠Ｅｍａｃｓ
NGNGこれだ。
0732デフォルトの名無しさん
NGNG烈同。
やるなら前のファイルからupdateするような形式にしないと狩場はbot使いで溢れる。
ま、もう溢れてるけどな。；y=ｰ(ﾟ∀ﾟ)･∵. ﾀｰﾝ
0733デフォルトの名無しさん
NGNG探してるんですけど見つからない・・・
誰かうｐしてください。
0734デフォルトの名無しさん
NGNGの0ってなんですか？
0735デフォルトの名無しさん
NGNGｕｐｄａｔｅしてもこのスレにやり方書いてあるからたいして抑止にならんと思われ
まったく配布しない方向でｷﾎﾞﾝ
>>734
ｱﾌｫはMMO板にｶｴﾚ
0736名無しさん＠Ｅｍａｃｓ
NGNG> 毒よけのルーチンがどうしても作れない・・・
>> Ragnarok掲示板2
>> http://www.geocities.jp/xbbcount/
> ３秒に２％だったかな・・・ダメージもあるし、ＢＯＴ中は永遠に消耗させれる。
こういう事か。早急に解決する必要がありそう。
0737729
NGNGそれにしてもログイン鯖不調・・・。ｲﾏﾉｳﾁにperlの勉強でもしようかな
0738デフォルトの名無しさん
NGNG0739デフォルトの名無しさん
NGNG0740デフォルトの名無しさん
NGNG色々試してみれ
0741デフォルトの名無しさん
NGNGﾎﾟﾀｺであれば，可能だなぁ。
戦闘するﾏｯﾌﾟ覚えさせて・・便利だｺﾘｬ
0742デフォルトの名無しさん
NGNGつかそんな長時間ずっとkore動いてくれなくない？
寝てる間に数体起動して起きた頃には二体くらいまったく動かなくなってるし
たまにまったく動かなくなっちゃうのって現状では対策ないんだよね？
0743名無しさん＠Ｅｍａｃｓ
NGNG> たまにまったく動かなくなっちゃうのって現状では対策ないんだよね？
while (1) {
usleep($config{'sleepTime'});
if ($config{'dump'}) {
$dumper = new Dumpvalue;
$dumper->dumpValues(\@ai_cmdQue,
\@ai_seq,
\$chars[$config{'char'}],
\%monsters);
configModify('dump', 0);
}
0744名無しさん＠Ｅｍａｃｓ
NGNG0745名無しさん＠Ｅｍａｃｓ
NGNG0747742
NGNG0748デフォルトの名無しさん
NGNGこれってバグ？それともなにかミスったのかな？
重量100％にしてたらいけるよな？もしそれだけでは無理なら、何が足らないのかおすえてください。
0749デフォルトの名無しさん
NGNGusleep($config{'sleepTime'});
if ($config{'dump'}) {
$dumper = new Dumpvalue;
$dumper->dumpValues(\@ai_cmdQue,
\@ai_seq,
\$chars[$config{'char'}],
\%monsters);
configModify('dump', 0);
}
last if ($quit);
if (dataWaiting(\$input_socket)) {
$input_socket->recv($input, $MAX_READ);
parseInput($input);
} elsif (dataWaiting(\$remote_socket)) {
$remote_socket->recv($new, $MAX_READ);
$msg .= $new;
$msg_length = length($msg);
while ($msg ne "") {
$msg = parseMsg($msg);
last if ($msg_length == length($msg));
$msg_length = length($msg);
}
}
これってメチャクチャでしょうか？
>>743さんのを入れたら止まらなくなるんですよね？
0750デフォルトの名無しさん
NGNG0751デフォルトの名無しさん
NGNG>>2
0752名無しさん＠Ｅｍａｃｓ
NGNG> config.txtに何か追加いります？
dump 0
と書いて放っておく。止ったら、conf dump 1 として出てきたリストを掲示する。バグが見付かればハッピー。
0753デフォルトの名無しさん
NGNG「ppm は、内部コマンドまたは外部コマンド、操作可能なプログラムまたはバッチ ファイルとして認識 …」
って出るんですけどどうすればいいでしょうか？
0754デフォルトの名無しさん
NGNG500あたりで出てる<STDIN>入力待ち削除ってどうなんでしょう？
コマンドで命令ができなくなるみたいだけど
止まらないでくれるのなら命令なんかする必要ないわけで。。
0755デフォルトの名無しさん
NGNG0756名無しさん＠Ｅｍａｃｓ
NGNG> 500あたりで出てる<STDIN>入力待ち削除ってどうなんでしょう？
うーん、なるほど。私の辞書では、ゾンビ子プロセスは wait しないとプロセステーブルが溢れてしまうとあるがそれは UNIX での話。では、windows では？
0757デフォルトの名無しさん
NGNGパッチを当てると>>643がうまくできず
677氏の>>692を入れてみても、エラーっぽいです
パチ鯖通るのがこんなに難しいとは･･･
0758デフォルトの名無しさん
NGNG自分のＢＯＴはＶＩＴ剣士なんで…
毒殺避けはconfigいじって回避してる。
attackAuto_sit 45
healSelf_item_0 Green Potion
healSelf_item_0_hp 25
ちなみにHP2000超えてるから25%で発動だけど…
…コレよりスマートな解決法ないかね(^^；
0759デフォルトの名無しさん
NGNGすまん…sage忘れた。
吊ってくる
0760デフォルトの名無しさん
NGNG毒にかかったというパケットをチェックして緑ポット使用
これが一番スマートな方法だと
0761757
NGNG漏れもだ
回線切って寝ます
0762デフォルトの名無しさん
NGNGattackAutoになってしまい以降座ってくれないようです。
チェックしてないのかな？
あとattackAuto set to 0 とかできると便利
0763デフォルトの名無しさん
NGNG0764デフォルトの名無しさん
NGNGどなたか $switch の値だけ教えて頂けませんか？
0765名無しさん＠Ｅｍａｃｓ
NGNG- undef %{$chars[$config{'char'}]{'inventory'}[$invIndex]};
+ splice(@{$chars[$config{'char'}]{'inventory'}}, $invIndex, 0);
これでいけそう。
0766デフォルトの名無しさん
NGNG0767デフォルトの名無しさん
NGNG0768デフォルトの名無しさん
NGNG0ｘ009Aは$servers[$config{'server'}]{'name'}GMMessage.txtって
ファイル名で保存されるようになってない? それとも変わった?
0769名無しさん＠Ｅｍａｃｓ
NGNG> inventory 配列のバグについて。
> - undef %{$chars[$config{'char'}]{'inventory'}[$invIndex]};
> + splice(@{$chars[$config{'char'}]{'inventory'}}, $invIndex, 0);
+ splice(@{$chars[$config{'char'}]{'inventory'}}, $invIndex, 1);
だ。
0770デフォルトの名無しさん
NGNGperl解る人お願いします
0771デフォルトの名無しさん
NGNGCtrl+F ２HQ
0772デフォルトの名無しさん
NGNG} elsif ($switch eq "008A") {
==中略==
print "Monster attacks You: ～
の後にモンスターをタゲって居なかったら
攻撃してきたモンスターに対してAttackを試みる構文入れればいいような気がする
でもperl始めてまだ3日だからどの変数がタゲってるかなのかさっぱりヽ( ´ー`)ﾉ
{$monsters{$ai_attack_target{'ID'}}} <-この辺？
0773デフォルトの名無しさん
NGNGなんか外から帰ってきてログ見たら罵声の嵐･･･
別垢のアコを公平分配で育ててるだけの捨て垢からいいんだけどさ。
ちなみにマジBOTで、場所は蟻の巣。
0774デフォルトの名無しさん
NGNGダンジョンは危険かも…結構横殴りしてるっぽいよ
0775デフォルトの名無しさん
NGNG>>439や、timeouts.txtをいろいろいじったりしてるのですが、
なかなかうまくいきません。どなたかうまくいってる方いないでしょうか？
目の前でレアや属性石が放置されてくのを見ると(´･ω･`)
今は対処法としてコンソール画面を見ないことにしています・・・
0776デフォルトの名無しさん
NGNGコンソールの前にいるならilでリスト出してtakeで根性入れて拾え。
たまに拾ってくれる。
0777デフォルトの名無しさん
NGNG思いのほか便利だったので、入れておいて貰えると嬉しいです。
0778デフォルトの名無しさん
NGNG空白のファイルoverallauth.txtとwarperauth.txtは何を意味してるんだろうか？
Koreのページにも載ってなかったっぽ･･･
0779デフォルトの名無しさん
NGNG>>2
0780デフォルトの名無しさん
NGNG0781名無しさん＠Ｅｍａｃｓ
NGNGinventory を試してみろ。動作結果も報告を。
0782デフォルトの名無しさん
NGNG普通のsellはちゃんと売ってくれるようになったが、
autosellがまったく機能してくれなくなった(;´д`)
0783デフォルトの名無しさん
NGNGどうやったら直るんだろうか
0784デフォルトの名無しさん
NGNGあ、機能してた
skills addだった。板汚しｽﾏｿ
0785デフォルトの名無しさん
NGNG0786デフォルトの名無しさん
NGNG0788デフォルトの名無しさん
NGNGここで探しナ
http://www3.to/kaitou/
0789デフォルトの名無しさん
NGNG>>787さん>>788さんありがとうございます
で、また壁が…
起動したヽ(ﾟ∀ﾟ )ﾉとおもったらすぐ閉じました(ﾟдﾟ)?
これhttp://ragdestoroy.tripod.com/698.txt
の通りにやったのに何故～？？
まずこのスレを1から読み直してきます～
0790デフォルトの名無しさん
NGNG0791デフォルトの名無しさん
NGNG0792デフォルトの名無しさん
NGNG0793デフォルトの名無しさん
NGNGネタに見られてるのかな・・・
0794デフォルトの名無しさん
NGNG本家で配布されているKore（素の）のplファイルは
698さんのテキスト通りにやったら実行することができました
しかし、このスレの>>178さんのKoreのplファイルは
起動と同時に閉じてしまいます。
おかしいなと思って>>178さんのplファイルの内容をコピー
そして素のKoreのplファイルをまっさらにしてペースト
そしたら後者同様起動したらすぐ閉じるようになりました
考えられる原因をもしご存知でしたら全てとは言いません
ヒントだけでも教えてくれませんでしょうか
0795デフォルトの名無しさん
NGNGこのスレにUPされてる「ある人のIDとpassが入っているKore」
を起動させたら普通に…起動できてる(´・ω・`)
何がいけないのかわからんけど自分味にして使おうっと
親切にポタル避けとかまで入ってるし解説も付いてるから(ﾟдﾟ)ｳﾏｰ
ありがとでした
追伸:スレ汚しごめんなさいでした☆
0796デフォルトの名無しさん
NGNG>178でなく>668にすればいいんじゃないか？
>178にこだわるなら>180読め。
0797デフォルトの名無しさん
NGNGとりあえずゼロピーとか指定したアイテム拾わないようにしてみた
さらに拾ったものを自動的にどこでもカプラさんで
倉庫に入れるようにしようと考えてるが
結局inventoryバグ発生すると倉庫に入れることできないしな・・・
0798デフォルトの名無しさん
NGNGも、盲点だった…
あれがこのエラーに関連していたとは--;
直してみます
ありがとう！
0799デフォルトの名無しさん
NGNG何もせずに使えますよね？
ActivePerlのインスコ失敗したのだろうか…
もしよければアドバイスを（～人～）
0800797
NGNGしかも769効果あるような気がしてきたし、
自動倉庫なんて必要ないじゃん
しばらくこのままでいこう
0801799
NGNGがんがってPrintScreenしてたYO…
D:\Perl\lib\Time\HiRes.pm
D:\Perl\site\lib\Time\HiRes\*
でいいんだよね？
一行目でエラーがでとる…
0802799
NGNGD:\Perl\lib\Time\HiRes.pm
D:\Perl\site\lib\auto\Time\HiRes\*
で３行目でエラーです。
>698さんのtxtにはそこには触れてないし…
教えて厨で申し訳ない…
0803デフォルトの名無しさん
NGNGテキスト読んだか？
＞・ActivePerlをインストールして再起動する(必ずPATHの設定をすること)
＞・DOSプロンプトからppm install Time-HiResを実行
＞・DOSプロンプトからppm install HTTP-Liteを実行(※追加)
＞・control/config.txtを各自書き換え
＞・perl JKore.pl
ppmで必要なモジュールをｲﾝｽｺしてないだけだと思われ。
真珠入れる時にppm入れてないなら真珠入れなおせ。
0804デフォルトの名無しさん
NGNGttp://downloads.activestate.com/ActivePerl/Windows/5.6/ActivePerl-5.6.1.633-MSWin32-x86.msi
0806デフォルトの名無しさん
NGNG0807デフォルトの名無しさん
NGNGsub sendAttack {
～略～
my $msg = pack("C*", 0x13, 0x01, 0x08, 0x00, 0x13, 0x00).$monID;
～略～
}
魔法で攻撃したいのだが、packの中身はその攻撃方法のパケでいいんだよな？
漏れの可愛い息子が攻撃してくれないでつ（つд｀）
ヒントplz
0808デフォルトの名無しさん
NGNG0809名無しさん＠Ｅｍａｃｓ
NGNG> 普通のsellはちゃんと売ってくれるようになったが、
> autosellがまったく機能してくれなくなった(;´д`)
うちでは動いてるから、どっか間違ってるんじゃない？
0810名無しさん＠Ｅｍａｃｓ
NGNG今度は、Index が重複しはじめたよ。。。
0811デフォルトの名無しさん
NGNGIndexが重複するまではautosellはすこぶるよろしいけども
重複した時点でautosellしなくなりますな
0812デフォルトの名無しさん
NGNG街に戻ってから緑ポガブ飲みされてもねぇ…
たまにまったく動かなくなるって現象回避できてる人っているのかな？
0813デフォルトの名無しさん
NGNG0814デフォルトの名無しさん
NGNG0815デフォルトの名無しさん
NGNGsub initConnectVarsの中に
＞undef $chars[$config{'char'}]{'inventory'};
を入れるとか。
MAP移動で発生するindex重複にはこれで対応できると思うが確認はしてない。
0816名無しさん＠Ｅｍａｃｓ
NGNG> >>810
> Indexが重複するまではautosellはすこぶるよろしいけども
> 重複した時点でautosellしなくなりますな
まあ、番号をずらせばなおる。
0817デフォルトの名無しさん
NGNG改善しようと思ってます…
なので、少ない脳みそで考えた所
まずとりあえずは、「自分が殴っているモンスターが他PCを攻撃している場合」を条件に
attackStopを呼ぼうと考えたのですが判定の仕方で躓いています。
自分がタゲっているモンスや、モンスが攻撃しているPCを区別するにはどうすればよいでしょうか？
推測やヒントでもよろしければお願いします。
0818817
NGNG0819デフォルトの名無しさん
NGNG普通に攻撃判定だして反撃するだけだと届かないし・・・
0820デフォルトの名無しさん
NGNGｶﾞｲｼｭﾂだったらｽﾏｿ。
0822次ｽﾚ天麩羅案
NGNG□Link□
-【前ｽﾚ】 http://pc3.2ch.net/test/read.cgi/tech/1031227918/
-【Kore】 ttp://ro.l33t.ca/
-【Apez】 ttp://apezro.cjb.net/
-【ﾃﾞｽﾄﾛｰｲ】 ttp://ragdestoroy.tripod.com/
-【鯖状態確認】 ttp://rosv.zive.net/
-【β規約】 ttp://www.ragnarokonline.jp/account/kiyaku.html
-【升】 http://yasai.2ch.net/test/read.cgi/mmo/1032589317/
-【隔離】 http://yasai.2ch.net/test/read.cgi/mmo/1032679283/
-【晒し】 http://yasai.2ch.net/test/read.cgi/mmo/1032272057/
-【あぷろだ】 http://dtsi.dyndns.info/~uploader/2ch-ro/
-【patch-al】 あぷろだ/file/20020920011227.zip
-【個人情報付】 あぷろだ/file/20020908143436.zip
-【JKore(pass付)】 あぷろだ/file/20020920024600.zip
-【JKore(pass無)】 ttp://ragdestoroy.tripod.com/pub/kore.zip
◆ﾒｰﾙ欄にsageは必須です
◆基本的に互換ｸﾗｲｱﾝﾄ≒BOTですので規約違反になることを覚悟して下さい
◆愚痴は隔離ｽﾚ、晒しは晒しｽﾚへ。好き嫌いはあるだろうが住み分けれ
◆以下の話題は升スレでおながいします
- 導入方法 / ｿｰｽ非公開の互換ｸﾗｲｱﾝﾄ(bor2等)の話題 / 升全般 / 純正ｸﾗｲｱﾝﾄ改造
◆教えてばかりではなく自分も情報提供しましょう
0823デフォルトの名無しさん
NGNG} elsif ($switch eq "008A") {
これが攻撃している・されているのパケットだから
他PCにダメージを与えているモンスはリストから消すとか
print "Monster $monsters{$ID1}{'name'} ($monsters{$ID1}{'binID'}) attacks Player
の辺りで
攻撃してるモンスをリストから消してみるとか
0824名無しさん＠Ｅｍａｃｓ
NGNG> Indexが重複するまではautosellはすこぶるよろしいけども
> 重複した時点でautosellしなくなりますな
# undef %{$chars[$config{'char'}]{'inventory'}[$invIndex]};
# splice(@{$chars[$config{'char'}]{'inventory'}}, $invIndex, 1);
removeInventory($chars[$config{'char'}]{'inventory'}, $invIndex);
0825名無しさん＠Ｅｍａｃｓ
NGNGmy $r_inventorys = shift;
my $index = shift;
my $limit = scalar(@$r_inventorys);
print "index: $index count: $limit \n";
for (my $i = 0; $i < $limit; $i++) {
if ($$r_inventorys[$i]->{'index'} == $index) {
splice(@$r_inventorys, $i, 1);
last;
}
}
for (my $i = 0; $i < $limit; $i++) {
if ($index < $$r_inventorys[$i]->{'index'}) {
$$r_inventorys[$i]->{'index'}--;
}
}
my $dumper = new Dumpvalue;
$dumper->dumpValues($r_inventorys);
}
0826名無しさん＠Ｅｍａｃｓ
NGNGログイン出来ないので全く試験もできないよ。
0827デフォルトの名無しさん
NGNG他の人はどうか分からないが、おれはそれでうまくいきました。ありがとう。
>>817
デフォルトでは、誰かが攻撃してる敵はno kill stealで横殴りしないでしょ?
問題は、「他のPCを攻撃していながら、誰からも攻撃されてない敵」の
取り扱いだと思います。これの判定はめんどくさいので、「予約」行為と
考えて横殴りOK(自分の脳内で)にしています。
0828デフォルトの名無しさん
NGNG試してみます。 thx
>827
そういうわけにもいかないみたい。
たとえばリンクモンスとかアクティブモンス、両方いないとこでも恨みシステム（？）が働いた場合もあるし
あと、凍ってる敵とかハンターの罠系にかかってる敵にも攻撃しにいってるね。
特に凍ってる敵を破壊するのはマズイかも
0829デフォルトの名無しさん
NGNG誰かこれβ2用に改造してください
0830817
NGNG>>817
>>827
ありがとうございます！
perlなんてほぼいじったこと無いので頭悩ませてますがいただいた情報でちょっとやってみます。
試すときにうまくログインできればいいんだけど・・・
0831デフォルトの名無しさん
NGNGデフォルトのまま動かしてる香具師…ささーと設定変え汁！
…パスと、コールサインそのままなんでつが(ＴＴ
こういうのは、好きに遊んでよし？
>760
さんきゅー。おかげで、毒飲まされても耐えるようになった…
POTの尽きる限りはね。
緑ハーブの買取とかやり始めたら…やばいよなぁ(ぉ
0832デフォルトの名無しさん
NGNGお前素でアホじゃないのか?
解説します。
http://www.geocities.co.jp/SiliconValley-Bay/7608/es/
にて、ROのemu鯖の制作、起動に成功（ただしβ1ver.)し、証拠として動画がUPされました。
そのなかで、作者はEmu鯖のデータを非公開とする発言をしていましたが、
先程、それらしきファイルが発見され、それが、>>829というわけです。
これを解析すれば、或いはβ2エミュ鯖の開発も不可能ではないかもしれません。
0833デフォルトの名無しさん
NGNG止まらずにそのまま向いている方向に進ませたいのだが、、
キャラの向いている方向がわからん。
誰か方向のパケットかkoreで状態の入ってるところ教えてください。
0834デフォルトの名無しさん
NGNG試してないが、ai_attack_giveupを小さくしてみるとか。
0835デフォルトの名無しさん
NGNGお 前 こ そ ア ホ じ ゃ な い の か ？
0836デフォルトの名無しさん
NGNGなるほど、とりあえずはそれで怪しい行動はしなさそうですね、ありがとうございます。
ついでに作り途中の怪しい関数ＵＰ
mapフォルダ作って適当なjpg入れて使ってください
sub CreateMap {#マップを作る
open DUMP, "> map.html";
print DUMP "<html><head><title>MAP</title></head><body BGCOLOR=#c0c0ff>\n";
print DUMP '<img src="map/'.$map_string.'.jpg" WIDTH="300px">'."<BR>\n";
print DUMP '<DIV style="position:absolute; top: '.$chars[$config{'char'}]{'pos_to'}{'y'}.'px; POSITION: absolute; left: '. $chars[$config{'char'}]{'pos_to'}{'x'}.'px"><FONT COLOR=Navy>・</FONT></DIV>'."\n";
for ($i = 0; $i < @playersID; $i++) {
next if ($playersID[$i] eq "");
print DUMP '<DIV style="position:absolute; top: '.$players{$playersID[$i]}{'pos_to'}{'y'}.'px; POSITION: absolute; left: '.$players{$playersID[$i]}{'pos_to'}{'x'}.'px"><FONT COLOR=#00FF00>・</FONT></DIV>'."\n";
}
for ($i = 0; $i < @monstersID; $i++) {
next if ($monstersID[$i] eq "");
print DUMP '<DIV style="position:absolute; top: '.$monsters{$monstersID[$i]}{'pos_to'}{'y'}.'px; POSITION: absolute; left: '.$monsters{$monstersID[$i]}{'pos_to'}{'x'}.'px"><FONT COLOR=#FF0000>・</FONT></DIV>'."\n";
}
print DUMP "更新 ".$date."<BR>\n";
print DUMP "<FONT COLOR=Navy>・自分</FONT><BR>\n";
print DUMP "<FONT COLOR=#00FF00>・他の人</FONT><BR>\n";
print DUMP "<FONT COLOR=#FF0000>・敵</FONT><BR>\n";
print DUMP "<BR>\n";
print DUMP '<a href="./ro.html">main</a><BR>'."\n";
print DUMP "</body></html>\n";
close DUMP;
}
0837デフォルトの名無しさん
NGNG敵に近寄っていってそのままピタっと止まるの怪しすぎだもんな
横殴りしそうになったらランダムな方向に
２、３マスずれるとかできないかな？
0838デフォルトの名無しさん
NGNG見つかったYO
"009C" これでどのキャラがどっちの方向を向いてるわかるな
$chars[$config{'char'}]{'look'}{'head'} = $head;
$chars[$config{'char'}]{'look'}{'body'} = $body;
0839デフォルトの名無しさん
NGNG0840デフォルトの名無しさん
NGNGperlでか？
0841デフォルトの名無しさん
NGNGﾜﾛﾀ
0842デフォルトの名無しさん
NGNGsub removeInventoryの下の方にエラーが出てきました(´Д⊂
0843デフォルトの名無しさん
NGNGjkoreを落とさせて貰い起動させてみたのですが
versionが違うと表示され動作しません
表示の指示通り1づつ数字を加えていってみているのですが
この方法でいいのでしょうか？
それとも違った手順でversionを調べる方法があるのでしょうか？
手順・ヒントだけでも宜しいです、どなたかご教授お願いいたします。
0844デフォルトの名無しさん
NGNGバージョンを調べるのは100から1づつ調べるのがいいんだよ
0845デフォルトの名無しさん
NGNGmy $dumper = new Dumpvalue;
$dumper->dumpValues($r_inventorys);
ここあたりでエラーがでたんだけど俺だけかな？
0846デフォルトの名無しさん
NGNGうちも入れてみたらエラーでました。
0847デフォルトの名無しさん
NGNG0848名無しさん＠Ｅｍａｃｓ
NGNG> ここあたりでエラーがでたんだけど俺だけかな？
use Dumpvalue; は当然入れているよな。
0849名無しさん＠Ｅｍａｃｓ
NGNG> use Dumpvalue; は当然入れているよな。
入れていないのだったら、その2行は削除するべし。
0850デフォルトの名無しさん
NGNG人様のソースパクるのはよくないな ｼｺｼｺ作るよ
0851デフェルトの名無しさん
NGNGcontrolやtableのなかのtxtのロードに失敗してしまいます
controlとかの設定txtってkore.plと同じディレクトリに置けばいいですよね？
同じような症状が出てる人いませんか？OSはwin2kです
0852851
NGNGkore.plとおなじフォルダにcontrolフォルダとかが置いてあるの間違いです
0853852
NGNGあとは過去ログのなかから自分に必要そうな部分修正したけど
この状況じゃ動くかどうかのテストもできないよヽ(`Д´)ノ
0854843
NGNG100からでしたか
早速試してみます、ありがとうございました
0855デフォルトの名無しさん
NGNG0856デフォルトの名無しさん
NGNG入れさせて頂きました。
起動して徘徊させた所アイテム表記が変に？？？
所持品リスト「i」で
赤いハーブ×０とか…
オレの設定悪いだけ？（;´Д`）
0857名無しさん＠Ｅｍａｃｓ
NGNG> >>849
> 入れさせて頂きました。
> 起動して徘徊させた所アイテム表記が変に？？？
テストしてないから。
0858名無しさん＠Ｅｍａｃｓ
NGNG> テストしてないから。
というか、繋がらないので出来ない。。。
0859デフォルトの名無しさん
NGNG中身しっかり理解してる訳じゃないので技術的なことは言えないので
せめて報告をと思って。
あくまで個人的にだけど以前に提示してくれた>>769の方が安定してる気がする。
ただいまBOTが何もしてくれなくなりました…
ただ突っ立ってるだけ…再起動で直るけど今は再起動したら入れなくなるよー
。・ﾟ・(ﾉД`)・ﾟ・。原因わからんです。。。
0860デフォルトの名無しさん
NGNGelsif ($switch eq "00AF") {
$index = unpack("S1",substr($msg, 2, 2));
$amount = unpack("S1",substr($msg, 4, 2));
undef $invIndex;
$invIndex = findIndex(\@{$chars[$config{'char'}]{'inventory'}}, "index", $index);
print "Inventory Item Removed: $chars[$config{'char'}]{'inventory'}[$invIndex]{'name'} ($invIndex) x $amount\n";
$chars[$config{'char'}]{'inventory'}[$invIndex]{'amount'} -= $amount;
if ($chars[$config{'char'}]{'inventory'}[$invIndex]{'amount'} <= 0) {
removeInventory($chars[$config{'char'}]{'inventory'}, $invIndex);#←ここ
}
sub removeInventory { ～略～ }
とりあえずこんな感じでいいのでしょうか？
0861デフォルトの名無しさん
NGNGttp://www25.big.or.jp/~wolfy/test/read.cgi/ragnarok/1032767899/
0862デフォルトの名無しさん
NGNGtalk forceを自動的にするにはどうすればいいですか？
NPCのIDはわかってますがそこが分かりません
0863デフォルトの名無しさん
NGNG0864デフォルトの名無しさん
NGNG中でどんな処理してるか見てからそこから考えればいいだろ
0865デフォルトの名無しさん
NGNGどうもそれには自動会話機能がついてないらしく
>>862こんな質問が増えそうな予感…
0866デフォルトの名無しさん
NGNGActivePerl入れないと駄目スか？
0867デフォルトの名無しさん
NGNGttp://dtsi.dyndns.info/~uploader/2ch-ro/file/20020924020215.lzh
0868デフォルトの名無しさん
NGNG0869デフォルトの名無しさん
NGNG0870デフォルトの名無しさん
NGNGﾍﾙﾌﾟにしっかり書いてあった罠。
しかし，ｱｺﾗｲﾄのBOTがmemoで覚えたﾎﾟﾀﾙ位置の確認がわからんのだが。
0871デフォルトの名無しさん
NGNGwhere gate
このへん？
アコいなくて試せない
ｽﾏｿ
0872デフォルトの名無しさん
NGNG実行ファイルはいけるのに…（鯖缶だけど
なんででつか( ´Д⊂）
0873デフォルトの名無しさん
NGNGif ($ai_attack_target{'ID'} == $ID1;) {
attackStop(\$remote_socket);
print "Target is fighting $players{$ID2}{'name'}
}
タゲったモンスがダメージ食らってたらアタック停止っていうとこんな感じ？
試してないからわからんけど
0874デフォルトの名無しさん
NGNG教えて君でヌミマセン
0875775
NGNGあの後、take連打してみましたが全く駄目でした。
というか、自分でBOTじゃなくて､その場所で戦ってみたんですけど
インデュア使わないと拾えませんでした(ﾟ∀｡)ｱﾋｬ
というわけで、きれいさっぱりあきらめます。
0876デフォルトの名無しさん
NGNGこれを
print "The server thinks your version is out of date. Try increasing 'version' by 1 in config.txt\n";
print "refused version No.$config{'version'}\n";
$config{'version'}=$config{'version'} + 1;
print "next try version No.$config{'version'}\n";
とかすればバージョン上がっても楽かも。
……あれだな。うんこだな。
0877デフォルトの名無しさん
NGNGif ($ai_seq[0] eq "attackAuto_sit" && ($chars[$config{'char'}]{'sitting'} || ($chars[$config{'char'}]{'skills'}{1}{'lv'} < 3 && !$ai_saveHash{'attackAuto_sit_end'}))) {
if (ai_getAggressives()
|| ($ai_saveHash{'attackAuto_sit_reason'} eq "hp" && percent_hp(\%{$chars[$config{'char'}]}) >= $config{'attackAuto_sit_end'})
|| ($ai_saveHash{'attackAuto_sit_reason'} eq "sp" && percent_sp(\%{$chars[$config{'char'}]}) >= $config{'sitAuto_sp_end'})) {
$ai_saveHash{'attackAuto_sit_trigger_switch'} = 0;
$ai_saveHash{'attackAuto_sit_trigger'} = 0;
stand();
if ($chars[$config{'char'}]{'skills'}{1}{'lv'} < 3) {
$ai_saveHash{'attackAuto_sit_end'} = 1;
}
↑の部分があやしいと思っているのですが．．．
0878デフォルトの名無しさん
NGNGから音が鳴って強制終了これはどうすればいいのやら・・（ウィン98
0880デフォルトの名無しさん
NGNGpmｺﾏﾝﾄﾞで list gate 送る。
ﾎﾟｰﾀﾙ先が表示される。
pmｺﾏﾝﾄﾞで swich gate でﾎﾟｰﾀﾙ先を指定。
これで，ﾎﾟｰﾀﾙが開くと思ったんだけど，うまく開かない。
ﾌﾞﾙｰｼﾞｪﾑ持たずに出来るとおもったんだが，ﾘﾓｰﾄﾎﾟｰﾀﾙうまくいってますか？
0881TPascal
NGNG} elsif ($switch eq "013E") {
sendTeleport(\$remote_socket, "Random");
}
} elsif ($switch eq "0141") {
0882TPascal
NGNGう・・・
} elsif ($switch eq "013E") {
sendTeleport(\$remote_socket, "Random");
} elsif ($switch eq "0141") {
こうだった
分かる人だけいれとけ
0883デフォルトの名無しさん
NGNGｽｷﾙﾎﾟｲﾝﾄを振ろうと，
skill add ｺﾏﾝﾄﾞを使ってもｽｷﾙふれないのですが。
0884デフォルトの名無しさん
NGNG0885デフォルトの名無しさん
NGNGｻﾝｸｽ，ﾎﾟｰﾀﾙで移動出来たﾖ
0886デフォルトの名無しさん
NGNGシーフしてしまう状況って、戦闘中のモンスが画面に入ってしまったとき、
シーフ発動なんでしょうか？
また、
最近kore2からJkoreにのりかえて自動戦闘BOTしまくってますが、
なんだかkore2のときより、やたらシーフしてる模様～
kore2のときは、ゴレ砂漠 シーフしちゃったみたいログ２/1day だったのが、
Jkore… 同じくゴレ砂漠 シーフしちゃったみたいログ９/1day が平均なのですが…
※kore2、Jkoreともにリンク敵標的０設定、モンスSeachランテレ非設定ですのに…
no-kill Steal関連のプログラムがkore2のほうが優れてるんでしょうか？
シーフ関連を修正できるのであれば、これからPerl勉強して修正チャレンジしたいなぁと思ってます、
どなたかご指導お願いします～
0887デフォルトの名無しさん
NGNG0888デフォルトの名無しさん
NGNG0889886
NGNGみなさんのチャットログにも「横殴りするなよ」などのＷＩＳ履歴が残ってますよね？
リンク敵を攻撃しないようにも設定してるのに、
なんで敵をシーフするようになってしまうのかなぁ…と思ってるのです。
そして、
チャットログから判別するに、
kore2よりもJkoreに転向してからのほうが、
やたらシーフしてしまってる模様なのでその原因が知りたかったのです。
できるのであれば、完全にシーフしないＢＯＴを作りたいなと思っているんです。
わかりにくくてすみません…
0890デフォルトの名無しさん
NGNG0891デフォルトの名無しさん
NGNGってのがわけわからん
0892デフォルトの名無しさん
NGNG0893886
NGNG要は「横殴り」のことです^^;
0894デフォルトの名無しさん
NGNGkoreもJkoreもダメージでてる敵を判別してるよ。
つまりアクティブを溜め込んでるときはお構いなしに横殴りしてる。
…アクティブの多いところに行くなと。
闇ぽたに気おつけろよ。ポタ回避は万能じゃないからな。
…ところで、敵をシーフするって新種の日本語？
和製英語？…まぁ、どーでもいいや
横殴りしたくないなら、周りの伽羅の番地（座標)を抜いて
それ以上近寄らないようにしろや。そーすりゃ、ましになると思うぞ
…うまくいったためしは無いけどな（ぉ
んなわけで、アクティブ居ないところに落ち着いてるよ
0895デフォルトの名無しさん
NGNGAutoAttackを切って反撃だけするようにしとれば横殴りの心配は０。
0896デフォルトの名無しさん
NGNGダミーでダメージ加算してno kill steal扱い
にしてるんだがどうよ?
} elsif ($switch eq "013E") {
$ID1 = substr($msg, 2, 4);
$ID2 = substr($msg, 6, 4);
if ($ID1 eq $accountID) {
#Ignore
}
elsif (%{$players{$ID1}}){
if(%{$monsters{$ID2}}){
#Dummy Damage
$monsters{$ID2}{'dmgTo'} += 1;
$monsters{$ID2}{'dmgFromPlayer'}{$ID1} += 1;
$players{$ID1}{'dmgToMonster'}{$ID2} += 1;
}
}
$msg_size = 24;
0897886
NGNG>>894
周りの伽羅の番地（座標)を抜いて
それ以上近寄らないように…＜ちょい猛勉強して組んでみます～！(*^∇^)o"彡
確かに、画面内モンスリスト（ml）にて非ダメ表示されますし、
それを判定して横殴り防止が発動してるんですよね～
ただ、例えばゴーレム…
毒、氷漬け 以外の状態のゴレも 横殴り防止が効かないときあるんですよ(>_<；
まれですけどね…横殴りすんなよって文句言われるのは、その時が多いです。
ラグのせいなのかなぁ～
特に手動でteleしたときよくなります…
>>895
そうですね！反撃だけなら１００％シーフしないですもんねぇ～
もうちょっと強くなったら、試してみまふ。
まだキャラよわよわなんで…オークＤとかで放置してたらすぐにちんじゃいます(>_<;
0898デフォルトの名無しさん
NGNGスキルポイントを振るのは
skills add *
だったはず。ヘルプが間違ってるせいでつね。
0899名無しさん＠Ｅｍａｃｓ
NGNG> あくまで個人的にだけど以前に提示してくれた>>769の方が安定してる気がする。
どうも amount <= 0 時の処理が3個所あり、しかも方法がそれぞれ違っている。。
# undef %{$chars[$config{'char'}]{'inventory'}[$invIndex]};
# splice(@{$chars[$config{'char'}]{'inventory'}}, $invIndex, 1);
removeInventory($chars[$config{'char'}]{'inventory'}, $invIndex);
undef %{$chars[$config{'char'}]{'inventory'}[$invIndex]};
$chars[$config{'char'}]{'inventory'}[$invIndex] = "";
なんだこの3番目のは!
0900デフォルトの名無しさん
NGNG攻撃元、ターゲット、ダメージの取得が
} elsif ($switch eq "0114") {
$ID1 = substr($msg, 4, 4);
$ID2 = substr($msg, 8, 4);
$damage = unpack("S1", substr($msg, 24, 2));
で、あとはこれに通常のダメージ処理を模倣して処理付け足せば
うまく処理できる希ガス。
で、mageでKoreな話。
俺はattackAutoの処理の中のsendAttack関数を
smの処理～skillUseにそっくりそのまま置き換えて
さらに攻撃前のmave関数外して蟻巣に放置してる。
一歩もその場から動かずに射程に入ったモンスに魔法を撃つ感じ。
さらにparseDataFile5を
($key, $args) = $_ =~ /(.+?)\t(\d+.*)/;
@args = split /\t/,$args;
if ($key ne "") {
$$r_hash{$key}{'attack_auto'} = $args[0];
$$r_hash{$key}{'teleport_auto'} = $args[1];
$$r_hash{$key}{'teleport_search'} = $args[2];
$$r_hash{$key}{'useskill'} = $args[3];
$$r_hash{$key}{'skilllv'} = $args[4];
}
こんな感じにして細工すれば敵毎に魔法も撃ち分けられる仕組み。（蟻にはFB2ビタタにSS4みたいな）
0901デフォルトの名無しさん
NGNG0902名無しさん＠Ｅｍａｃｓ
NGNG先程の3個所を removeInventory() に換えて、以下の改訂された sub を導入すれば行けそう。
sub removeInventory {
my $r_inventorys = shift;
my $arrayIndex = shift;
my $itemIndex = $$r_inventorys[$arrayIndex]->{'index'};
my $limit;
print "arrayIndex: $arrayIndex count: $limit \n";
splice(@$r_inventorys, $arrayIndex, 1);
$limit = scalar(@$r_inventorys);
for (my $i = 0; $i < $limit; $i++) {
if ($itemIndex < $$r_inventorys[$i]->{'index'}) {
$$r_inventorys[$i]->{'index'}--;
}
}
my $dumper = new Dumpvalue;
$dumper->dumpValues($r_inventorys);
}
0903デフォルトの名無しさん
NGNG次スレは俺たちが必死に育ててるBOTをのうのうと
毒にして邪魔するノーマナーアサシン晒しもOKにしない？？
[鯖]
[名前]
[ギルド]
[ID](ココ重要)
[特徴]
[そのキャラに対する罵倒wisを考える](ココのスレの住人でいっせいにwis攻撃)
969 名前：965 投稿日：02/09/25 18:35 ID:fOVp7eUj
わりｗ誤爆ｗｗｗｗｗｗｗｗｗｗｗｗ
みなかったことにしてｗ＾＾；；；
0905デフォルトの名無しさん
NGNGとばされたとこが0,0地点なのを座標指定でﾎﾟﾀﾙひらけんかのぉ。
とばされたｷｬﾗの人ごめんね
0906デフォルトの名無しさん
NGNGシーフの時点でかなりツライんだけど…
どこに置いてました？
0907デフォルトの名無しさん
NGNG0908877
NGNG31さんのやつをどこに入れればいいんでしょうか？
お願いします．．．
0909デフォルトの名無しさん
NGNGＷＰＥ使って蝶パケのほうが早い。
0910デフォルトの名無しさん
NGNG攻撃前のmove関数が見つからないです
sub moveかな～とか思ったんですけどこれいじると歩かなくなるし
攻撃処理ってAIの攻撃ルーチンの中身をいじってあるんですか？
my $flag = shift; それともこれが移動に関係あるのかな
my $msg = pack("C*", 0x89, 0x00) . $monID . pack("C*", $flag);
を置き換えただけだと移動して隣接してから発動だから奇妙な動きになるし
>>908
- この行を検索する
+ この行をその場所に上書きする
私はsendattackのみ書き換えてます
それ以上は私のスキルレベルが足りません (;´Д⊂
0911デフォルトの名無しさん
NGNGを試したのですが、FB4で倒し終わってから
1，2回またFB4を詠唱してしまってます
この上なく、怪しいマジですね．．．(;´Д⊂
も一度、がんばってみます
0912デフォルトの名無しさん
NGNGWinXpだから，蝶ﾊﾟｹ使えないのﾖﾝ。
Search:B2 00 01
Modify:B2 00 00
このフィルタはキャラセレを選ぶとセーブポイントに帰れる。
これって，まだ使えたかな？
0913デフォルトの名無しさん
NGNGﾊｧ(ﾟдﾟ)
wpeproでもｴﾓｰｼｮﾝで出来るだろが！
しかも禿しくスレ違い。帰れ
0914デフォルトの名無しさん
NGNGすまん，つい話が長引いてしまった。ごめんね
0915デフォルトの名無しさん
NGNGこの板の住人でもないのでいいタイトルが思いつかんわ
0916デフォルトの名無しさん
NGNG必死に育ててるというのか？ＢＯＴで…
うちは、自プログラムをのんびり鑑賞しながらおまけで育ててるつもりだけど…
…ところで、番地抜いてアクティブの居るところに行くより
何もしないプログラムをアクティブ居ないところで回すほうが
効率からすべていいんだけど…
変なエラーも吐かないしね…自分の能力の無さに萎えて来たよ。
>903追加
毒避けはパケット抜いて対処するか
緑POTか緑ﾊｰﾌﾞ持たせて対処汁。死なずに元気でBOT回してたら
とうとう、毒もかけてもらえなくなったよ。
ところで、BOT回してのんびりしてる皆さんは次何を考えてますか？
うちは、銭BOTでも回して倉庫の中身をネタで揃えようかと思ったりしてますが…
0917添削プリーズ
NGNG$msg_size = 24;
$spell_targetID = substr($msg, 6, 4);
if ($spell_targetID == $targetID) {
attackStop();# 攻撃中止
# ここから下がうまくいかない
undef %ai_attack_target;#現在の攻撃対象を消去？したつもり
shift @ai_seq;#次の攻撃対象に照準を合わせる？つもり
print "spell conflict, give up attacking.\n";
}
0918917
NGNG魔法使いの多いマップでは使い物にならないし、魔法使いが少ないマップでは
あまり魔法使いへの横槍は問題にならないし・・・
0919デフォルトの名無しさん
NGNG0920デフォルトの名無しさん
NGNG誰か教えてくれます?（ ´Д⊂
0921名無しさん＠Ｅｍａｃｓ
NGNG> >>899
>
> 先程の3個所を removeInventory() に換えて、以下の改訂された sub を導入すれば行けそう。
うーん。index が 17 になると動きが奇しくなる。。。
0922デフォルトの名無しさん
NGNG次はリンク時の横殴り防止対策中です
あとバグ潰し。これは書き直したほうが楽かもしれない。
0923デフォルトの名無しさん
NGNGここは説明書スレじゃねんーんだよっボケ
英語ぐらい勉強しろ
0924デフォルトの名無しさん
NGNG今実験中だけどコメントアウトした部分ありで順調に動いてるよ
sub RemoveDuplication {#重複アイテム修復
my @tempname;
my $flag;
for ($i = 0; $i < @{$chars[$config{'char'}]{'inventory'}}; $i++) {
#$flag = 0;
for ($i2 = 0; $i2 < @{$chars[$config{'char'}]{'inventory'}}; $i2++) {
#print "$chars[$config{'char'}]{'inventory'}[$i]{'name'}= $tempname[$i2] \n";
if ( $tempname[$i2] eq $chars[$config{'char'}]{'inventory'}[$i]{'name'}){#$tempname[$i2]
print "$tempname[$i2] を削除\n";
splice(@{$chars[$config{'char'}]{'inventory'}}, $i2, 1);
#$flag = 1;
last;
}
}
#if ($flag == 0){
push (@tempname,$chars[$config{'char'}]{'inventory'}[$i]{'name'});
print "$chars[$config{'char'}]{'inventory'}[$i]{'name'} を追加\n";
#}
}
}
#次スレ作ろうよ
0925デフォルトの名無しさん
NGNGROのBOT
でいいんでないかい？
シンプルだしロボットとも絡んでるわけで。
0926デフォルトの名無しさん
NGNG正確には攻撃前のmove関数を呼び出すところ か。
} elsif ($ai_seq[0] eq "attack") {
の中の
if ($monsters{$ai_attack_target{'ID'}}{'dmgFromYou'} == 0 && $dist > $config{'attackDistance'}) {
getVector(\%vec, \%{$monsters{$ai_attack_target{'ID'}}{'pos_to'}}, \%{$chars[$config{'char'}]{'pos_to'}});
moveAlongVector(\%pos, \%{$chars[$config{'char'}]{'pos_to'}}, \%vec, $dist - $config{'attackDistance'} + 1);
move($pos{'x'}, $pos{'y'},"9");
が、ターゲットに近寄る処理。
で、そのすぐ下の
} elsif ($cleanMonster && $monsters{$ai_attack_target{'ID'}}{'dmgFromYou'} == 0 && timeOut(\%{$timeout{'ai_attack'}})) {
if ($config{'tankMode'}) {
sendAttack(\$remote_socket, $ai_attack_target{'ID'}, 0);
} else {
sendAttack(\$remote_socket, $ai_attack_target{'ID'}, 7);
}
の部分のsendAttackをスキル使う処理持ってきて置き換える。
mageでtankmodeなんか使わないから後ろの方のsendAttackな。
結局俺もスキル無いから既存のコード切り貼りして騙してるだけだよ。
0928TPascal
NGNG>>903 のスプラッシャー避けは完成
アサシン持ってるし…
ついでにやった人のアカウントナンバーも抜いてる＜＝基本
ポータル避けもＩＷ等と判別できるようになった
ＷＩＺもある
次は、ハンターの罠パケットかな
0929916
NGNGどこかに、精錬失敗しても壊れない方法があった気がするよ。
チースレだっけな？すれ違いなんだけど書き込んだほうがいい？
>922
デバックか…漏れは疲れましたので辞めますた(ぉ
放置してある書きかけのブツが(^^;;
>TPascal
アサシン持ってるのかー。
パケットあさるために新しい伽羅でも回すか。
騎士・WIZ しか、上級職無いわ(＾＾;
みんなありがと。まだやれることありそうだ。
0930TPascal
NGNG19 01 ?? ?? ?? ?? 00 00 01 00 00 00 00
0931名無しさん＠Ｅｍａｃｓ
NGNG> アイテム売らないのはアイテムが重複してるからだから定期的にこれ実行してあげれば良さげ
詳しく説明して。
0932デフォルトの名無しさん
NGNGcart add したら リログするまで cart get できない
これらは解決済み？
0933デフォルトの名無しさん
NGNGciは判定ミスってる箇所直してるよね？
他の原因なら知らない
-if ($chars[$config{'char'}]{'cartitems_max'}) {
+if (!$chars[$config{'char'}]{'cartitems_max'}) {
0934TPascal
NGNG-
+if ($skillID == 141) {
+sendTeleport(\$remote_socket, "Random") if $config{'PortalAvoid'};
+}
} elsif ($switch eq "011E") {
0936デフォルトの名無しさん
NGNGリストの削除でうまくいかないならその失敗したのを探して消せばいい。
っと思ってやったら今度は2つ以上持ってる武器が表示されなくなったよ・・
今度はnameをnameIDに変えて実験してる
if (timeOut(\%{$timeout{'ai_sell_auto'}})) {の中のsendSell(）の下にRemoveDuplication();って入れればOK
とりあえず武器の拾いすぎで重量オーバー行かなければ止まらず売り続けるぞ
0937デフォルトの名無しさん
NGNGhttp://www25.big.or.jp/~wolfy/test/read.cgi?bbs=ragnarok&key=1032767899
336 名前：(^ー^*)ノ～さん 投稿日：02/09/26 13:11 ID:hzGM1oE3
ここと似たようなのが
これ
perl2exe forRO
http://pc3.2ch.net/test/read.cgi/tech/1031227918/
>>334 の言うように１人でやった方が効率いいかもしれない
ただ…
２次職のスキル動作等
１人では調べられない部分もある
ＢＯＴ＝エミュ鯖が結びついてしまう…
>>335 さんは完璧なポタル回避できるのだろうか？
011Fのパケットが飛んできてテレポ＝完璧ではない
0938デフォルトの名無しさん
NGNG丁寧な解説ありがとうございます ｍ(＿ ＿)ｍ
早速試そうとソースを読んでいたらふと
attackDistanceという項目がconfigにあったな～と思って
２から１５ぐらいにあげてみたところ普通に距離があっても魔法を使うようになりました
多分この値をもう少し大きくすればアチャでもいけると思われます
攻撃終了から次の攻撃時間をつかさどるのってai attackでしたっけ？
0939デフォルトの名無しさん
NGNG0940デフォルトの名無しさん
NGNG朝芯無いから分からないのですがskillIDの141が毒で>>934はsw 011Aの中で
処理する毒避けと考えてよろしいのでしょうか？
>>930に書かれているsw 0119で処理するとなると、もう毒にやられた後と
いう事になるから遅いですよね？
sw 0119が毒に感染したというパケだとすると、そこで緑使ったりして回復
するという事もできますよね。
とりあえず毒やられたらAlt+7を出すようにして、自力回復するようにしようかな…。
0941939
NGNG0943デフォルトの名無しさん
NGNG回答どうもです。でも
if ($skillID == 141 && $targetDisplay eq "you") {
ってな具合にしておかないと、画面内のスプラッシャーだけで飛ぶように
なっちゃいそうですね。
とりあえず、人間味のあるBOT目指してるので、やられたらAlt+7して
「なにすんだよぉ～」と文句言って、目の前で解毒するようにしてみたりした(笑)
あとは家帰って試すだけだ…
0944デフォルトの名無しさん
NGNGkoreのコマンド打ってくるアホがいて困ってる。
0945デフォルトの名無しさん
NGNGKore ,JKoreのカスタマイズのための情報交換スレッドです
前スレ http://pc3.2ch.net/test/read.cgi/tech/1031227918/l50
【常時sage進行】
・教えてばかりではなく、自分も情報提供しましょう
・koreのセットアップの仕方などは聞かない答えない
誰か話題についてまとめてｗ
0946TPascal
NGNG笑える…
ttp://ww41.tiki.ne.jp/~youc/ro/data/cha_assassin.html
説明がここにあるから
スプラッシャーの所みてみ
かける相手が分かるよ
0947TPascal
NGNGスプラッシャーをかけた"爆弾"をＰＣの横に持ってくることも可能
これで、ＡＦＫ商人等を毒にかけたし
反応あれば解毒する
解読して～といったほうがいいかもしれない
0948デフォルトの名無しさん
NGNGPCに直接かけるのではなく、爆弾を持ってくる方法で感染させるんですね。
とすると、画面内でスプラッシャーが実行されたら逃亡。
画面外からつれてこられたりして感染した場合のみに反応するのがいいんですね。
確かに、解毒して～にすれば解毒の手間省けるかも
0949デフォルトの名無しさん
NGNGなぜか魔法を打つ間隔が長いんですよね・・・・
敵がいるのに放置して２０秒くらい後に魔法を打つんです・・・
どこら辺を改造すればよろしいのでしょうか？
0950TPascal
NGNGいろいろと…
koreは、その点ダメっぽい
でさ、アイテムナンバーなんだけど
付け直しはせずに
ＲＯＥみたく inc したらどうだろう？
必ずしも０～の連番でなくてもいいと思うのだが
0951デフォルトの名無しさん
NGNG>>722
若干コードを追加すれば出来ないことはないけど、チャットばかり開いてると
余計怪しまれるかと。
>>768
JKore独自仕様です。
>>843
JKoreはそのあたり設定済なんですが…(version 5)
升ｽﾚでJKoreをexe化したﾔｼに文句たれて下さい。
>>886
JKoreはconfig.txt内のsleepTimeを大きめに設定してるので、Koreと比べると
反応が遅れる傾向があるためだと思います。
>>895
効率を求めようとするからみんなattackAutoを1にする。
効率を求めようとするからあっさりBOTと見破られる。
…反撃のみだとBOTだと気付く人少ないですよね…
もっともJKoreもKoreであることには変わりないので、特徴さえわかれば
簡単に見破れるはずなんですが。
>>932
ciコマンドは解決済み。cartコマンド関係は実装が適当なので知らん。
>899あたりを参照して自分で直してください。
>>945
情報交換スレッドだと使い方とかそっちの情報交換に陥ると思うので
開発・改良スレッドのほうがいいかと。
あと、次ｽﾚ建てるならJKoreの文字は消してください（´Д｀；）
Kore2だろうとJKoreだろうと、Koreの改造品なんですから。
0953デフォルトの名無しさん
NGNGスレ立ってるし
0954デフォルトの名無しさん
NGNG次スレhttp://pc3.2ch.net/test/read.cgi/tech/1033031207/
09551
NGNG0956デフォルトの名無しさん
NGNG変なのがきたんだけど
>hina_gengengenki
>karen_desu
0957デフォルトの名無しさん
NGNGマナーポイント貰った。当然マイナスだろうな
0958デフォルトの名無しさん
NGNG4B 01 01 ～
なんだけど
0959デフォルトの名無しさん
NGNGIDにマナーポイントを与える。type=00 プラス type=01 マイナス
R 014a <fail>.l
マナーポイントを与えた結果。fail=0 成功 fail=1 失敗
R 014b <type>.B <nick>.24B
マナーポイントを貰った。type=00 プラス type=01 マイナス
表記法に関しては以下略
0960デフォルトの名無しさん
NGNGちょっと調べてみよ。
0961デフォルトの名無しさん
NGNG罵倒メッセージが入りまくってるんですが、これはどうにかならないのでしょうか？
0962デフォルトの名無しさん
NGNG個人的に溜め込みVit嫌いなのでBotのルーチンには不満はありませんがｗ
0963名無しさん＠Ｅｍａｃｓ
NGNG> でさ、アイテムナンバーなんだけど
> 付け直しはせずに
> ＲＯＥみたく inc したらどうだろう？
> 必ずしも０～の連番でなくてもいいと思うのだが
ROE というのを知らないのでどういう動作をするのか説明かソースを見せて。
0964名無しさん＠Ｅｍａｃｓ
NGNGsub removeInventory {
my $r_inventorys = shift;
my $arrayIndex = shift;
my $itemIndex = $$r_inventorys[$arrayIndex]->{'index'};
my $limit;
# splice(@$r_inventorys, $arrayIndex, 1);
undef($$r_inventorys[$arrayIndex]);
$limit = scalar(@$r_inventorys);
# for (my $i = 0; $i < $limit; $i++) {
# if ($itemIndex < $$r_inventorys[$i]->{'index'}) {
# $$r_inventorys[$i]->{'index'}--;
# }
# }
}
} elsif ($switch eq "0119") {
$ID = substr($msg, 2, 4);
$status = unpack("C1", substr($msg, 8, 1));
$unknown = unpack("C1", substr($msg, 10, 1));
if ($ID eq $accountID) {
if ($status & 0x01) {
## 解毒なり緑色ハーブなり緑ポーションなり
} else {
dumpData(substr($msg, 0, $msg_size));
}
}
} elsif ($switch eq "011F") {
$coords{'x'} = unpack("S1",substr($msg, 10, 2));
$coords{'y'} = unpack("S1",substr($msg, 12, 2));
$ID = substr($msg, 6, 4);
$type = unpack("C1", substr($msg, 14, 1));
$fail = unpack("C1", substr($msg, 15, 1));
if ($fail) {
if ($type == 0x81) {
print "Portal opened at $coords{'x'}, $coords{'y'}\n";
if ($config{'PortalAvoid'}
&& $coords{'x'} eq $chars[$config{'char'}]{'pos_to'}{'x'}
&& $coords{'y'} eq $chars[$config{'char'}]{'pos_to'}{'y'}) {
sendTeleport(\$remote_socket, "Random") if $config{'PortalAvoid'};
}
} elsif ($type == 0x8d) {
print "Ice Wall setup at $coords{'x'}, $coords{'y'}\n";
} else {
dumpData(substr($msg, 0, $msg_size));
}
} else {
dumpData(substr($msg, 0, $msg_size));
}
とりあえずJKoreではsub initConnectVarsの中に
＞undef $chars[$config{'char'}]{'inventory'};
とか書いておきましたが、効果があるのかどうかは不明。
接続切れる→再接続→繋がる→アイテムリスト重複のパターンだけは
避けられるとは思うんですが、根拠は全く無し。
0968名無しさん＠Ｅｍａｃｓ
NGNG> 取りあえず、原典の動作に戻してみた。これだと売ってくれるので、問題の原因がさっぱり。
あ。このままだと配列がどんどん長くなっていくから、index の制限にでも引っかかるのかな。
0969デフォルトの名無しさん
NGNGプレイヤーの発言やwis、GMのメッセージとかtxtにして出力させたいんですが
どうやればいいか教えてもらえませんか？
0970デフォルトの名無しさん
NGNGJKoreで実装されてますのでjkore.plを読みましょう
0971969
NGNGどこがどうなってるのか分かりませんでした…。
自分の場合jkore.plいじる前にperlの勉強しないといけないっぽいです…。
0972デフォルトの名無しさん
NGNGNPCやPlayerの座標みれたらmoveしやすいし、
相手の座標確認しながらポタれるし便利だと思う。
でも相手の座標取得ロジックがわからず断念(つД`)
だれか相手の座標取得を教えてください。
0973デフォルトの名無しさん
NGNG$players{$ID}{'pos'}{'x'},$players{$ID}{'pos'}{'y'}
plでの#とIDの対応は@playersIDから取得
0974デフォルトの名無しさん
NGNG某698.txt見ながらActivePerlインストしたりしたんですけど。
コマンドプロンプトからppm install Time-HiResとppm install HTTP-Liteを
実行というのもうまくできないです。
こういう質問って初心者板とかそっちのほうがいいのかな？
0975デフォルトの名無しさん
NGNG>>2
コマンドラインも使えないやつがBOTなんて使ｂ､な
0977デフォルトの名無しさん
NGNGこのスレみていろいろやってたらわかるようになった。
優良スレage
0978デフォルトの名無しさん
NGNG0979デフォルトの名無しさん
NGNG0980デフォルトの名無しさん
NGNGprint "Ice Wall setup at $coords{'x'}, $coords{'y'}\n";
sendTeleport(\$remote_socket, "Random") if $config{'PortalAvoid'};#追加
} else {
これでアイスワールに対応してテレポできる？
098173歳BOTWiz
NGNGパッチ当ててそれなら
ai_skill_useとかai_attack_auto、ai_attack_giveup
あたりを短くしてみればうまくいくかも。
>>961
もしかして移動型？
定点狩り型（というか撒き餌型）にしたほうが
他の「BOTみたいに黙々と魔法撃ってるPCマジ」が
カモフラージュしてくれるからばれにくいと思うよ。
そこに剣士が来ても「俺領域を発動させてるPC」に見えるだろうし。
0982デフォルトの名無しさん
NGNGＶＢで書かれてるけどね
If Asc(Mid(RecvData, 4, 1)) < 1 Then
If Asc(Mid(RecvData, 31, 1)) > 3 And Asc(Mid(RecvData, 31, 1)) <> 10 Then
If MakePort(Mid(RecvData, 3, 2)) > UBound(Equip) Then ReDim Preserve Equip(MakePort(Mid(RecvData, 3, 2)))
If MakePort(Mid(RecvData, 3, 2)) > UBound(Inventory) Then ReDim Preserve Inventory(MakePort(Mid(RecvData, 3, 2)))
Equip(MakePort(Mid(RecvData, 3, 2))).Name = MakeString(Mid(RecvData, 7, 24))
Equip(MakePort(Mid(RecvData, 3, 2))).EquipID = 0
Equip(MakePort(Mid(RecvData, 3, 2))).Amount = MakePort(Mid(RecvData, 5, 2))
Equip(MakePort(Mid(RecvData, 3, 2))).Where = Mid(RecvData, 32, 1)
Inventory(MakePort(Mid(RecvData, 3, 2))).Use = 3
ElseIf (Asc(Mid(RecvData, 31, 1)) <= 3 Or Asc(Mid(RecvData, 31, 1)) = 10) Then
If MakePort(Mid(RecvData, 3, 2)) > UBound(Inventory) Then ReDim Preserve Inventory(MakePort(Mid(RecvData, 3, 2)))
Inventory(MakePort(Mid(RecvData, 3, 2))).Name = MakeString(Mid(RecvData, 7, 24))
Inventory(MakePort(Mid(RecvData, 3, 2))).Amount = Inventory(MakePort(Mid(RecvData, 3, 2))).Amount + MakePort(Mid(RecvData, 5, 2))
Inventory(MakePort(Mid(RecvData, 3, 2))).Use = Asc(Mid(RecvData, 31, 1))
Stat "You got " + MakeString(Mid(RecvData, 7, 24)) + " " + CStr(MakePort(Mid(RecvData, 5, 2))) + " EA" + vbCrLf
End If
UpdateInventory
End If
0983デフォルトの名無しさん
NGNGてのはitems.txtが古いせい？
0984デフォルトの名無しさん
NGNGi
で、リスト表示
is #(iで、表示される０～の番号) で、使う
0985デフォルトの名無しさん
NGNGこっちだったかも
Case &H3D
If Len(RecvData) >= 6 Then
For x = 0 To UBound(Items) - 1
If Mid(RecvData, 3, 4) = Items(x).ID Then
If Items(x).ID = CurrItem Then
SkillUse = False
CurrItem = ""
End If
Items(x).Exist = False
If Items(x).Whose = True Then
YourItems = YourItems - 1
If YourItems < 0 Then
YourItems = 0
End If
End If
Stat MakeHex(Items(x).ID) + " (" + MakeString(Items(x).Name) + ") disappears" + vbCrLf
For y = x To UBound(Items) - 1
Items(y) = Items(y + 1)
Next
ReDim Preserve Items(UBound(Items) - 1)
Exit For
End If
Next
RecvData = Right(RecvData, Len(RecvData) - 6)
Else
NoJump = True
End If
0986デフォルトの名無しさん
NGNGありが㌧
0987デフォルトの名無しさん
NGNGそろそろ次スレに・・・
0988デフォルトの名無しさん
NGNGどうしても０～にしたいんであれば
０．退避テーブルを作る
１．退避テーブルにアイテムテーブルから有効なものを移動
２．アイテムリストあぼ～ん（初期化）
３．退避テーブルからアイテムリストへ移動＆番号付ける
４．退避テーブルを消すor初期化
これをアイテム取得時等アイテムが変わるときに毎回やる
モンスターリストもやれば結構いけると思うのだが
0989デフォルトの名無しさん
NGNG怨念システム健在です
モンスター倒しても同じＩＤ持ってるモンスターに対して攻撃再開するようです
＊すぐ近くに復活(?)した場合
0990デフォルトの名無しさん
NGNG兄貴D見れば言われずともわかるよ
大抵の場合、元のタゲに向かってくるけど、たまに違う奴に行くのが頭痛の種
HPが微妙に少ないことぐらいしか違いが無い
0991デフォルトの名無しさん
NGNG0992デフォルトの名無しさん
NGNG0993デフォルトの名無しさん
NGNG0994デフォルトの名無しさん
NGNG0995デフォルトの名無しさん
NGNG0996デフォルトの名無しさん
NGNG0997デフォルトの名無しさん
NGNG0998デフォルトの名無しさん
NGNG0999デフォルトの名無しさん
NGNG1000デフォルトの名無しさん
NGNG糞スレ立てんな
1001１００１
Over 1000Threadもう書けないので、新しいスレッドを立ててくださいです。。。
レス数が1000を超えています。これ以上書き込みはできません。