Апдейт 06-06-07, codename 'Moskovia'

Официальный сервер Ragnarok On-Line в России - https://ru.4game.com/ro/install/

Модератор: 4epT

Правила форума
ВНИМАНИЕ: реклама сторонних ботов запрещена! Всякие плюшки - можно :)
Govorun
Начинающий
Сообщения: 44
Зарегистрирован: Чт янв 18, 2007 1:15 pm
Контактная информация:

Сообщение Govorun »

sub sendItemUse {
my $self = shift;
my $ID = shift;
my $targetID = shift;
my $msg;
$msg = pack("C*", 0x89, 0x00) . pack("v", $ID) . $targetID;
$self->sendToServer($msg);
debug "Item Use: $ID\n", "sendPacket", 2;
}
Govorun
Начинающий
Сообщения: 44
Зарегистрирован: Чт янв 18, 2007 1:15 pm
Контактная информация:

Сообщение Govorun »

sub sendStorageClose {
my ($self) = @_;
my $msg;
$msg = pack("C*", 0x16, 0x01);
$self->sendToServer($msg);
debug "Sent Storage Done\n", "sendPacket", 2;
}
Аватара пользователя
piroJOKE
Модератор
Сообщения: 8205
Зарегистрирован: Сб ноя 04, 2006 2:20 am
Сервер RO:: localhost
Откуда: Molvania

Сообщение piroJOKE »

Govorun, ну ты чувак ловко посты набиваешь! :D
Use brain against brain, ai against ai... · как правильно задавать вопросы · faq · download
Govorun
Начинающий
Сообщения: 44
Зарегистрирован: Чт янв 18, 2007 1:15 pm
Контактная информация:

Сообщение Govorun »

sub sendStorageAdd {
my $self = shift;
my $index = shift;
my $amount = shift;
my $msg;
$msg = pack("C*", 0x72, 0x00) . pack("x9") . pack("V", $amount) . pack("v", $index);
$self->sendToServer($msg);
debug "Sent Storage Add: $index x $amount\n", "sendPacket", 2;
}
Govorun
Начинающий
Сообщения: 44
Зарегистрирован: Чт янв 18, 2007 1:15 pm
Контактная информация:

Сообщение Govorun »

sub sendStorageGet {
my $self = shift;
my $index = shift;
my $amount = shift;
my $msg;
$msg = pack("C*", 0x9F, 0x00) . pack("x11") . pack("v", $index) . pack("V*", $amount);
$self->sendToServer($msg);
debug "Sent Storage Get: $index x $amount\n", "sendPacket", 2;
}
Govorun
Начинающий
Сообщения: 44
Зарегистрирован: Чт янв 18, 2007 1:15 pm
Контактная информация:

Сообщение Govorun »

piroJOKE
:)
Щас вы это тестить будите :)
А то мне на работе не сподручно. Исходник хоть за скрипты выдать мона, а вот побегать ботам - меня нач с потрохами сожрёт :)
Govorun
Начинающий
Сообщения: 44
Зарегистрирован: Чт янв 18, 2007 1:15 pm
Контактная информация:

Сообщение Govorun »

piroJOKE
Разберитесь пока что - что такое было 0190 и 0089
Govorun
Начинающий
Сообщения: 44
Зарегистрирован: Чт янв 18, 2007 1:15 pm
Контактная информация:

Сообщение Govorun »

sub sendGetPlayerInfo {
my ($self, $ID) = @_;
my $msg;
$msg = pack("C*", 0x7e, 0x00) . pack("x3"). $ID;
$self->sendToServer($msg);
debug "Sent get player info: ID - ".getHex($ID)."\n", "sendPacket", 2;
}
Хотя не уверен. Надо проверять.
Аватара пользователя
piroJOKE
Модератор
Сообщения: 8205
Зарегистрирован: Сб ноя 04, 2006 2:20 am
Сервер RO:: localhost
Откуда: Molvania

Сообщение piroJOKE »

Govorun писал(а):Щас вы это тестить будите
Ну я так точно не буду: нет времени. Кстати глянь мой атач на 1й странице.

* * *

Флуд.
Разберитесь пока что - что такое было 0190 и 0089
Ага, щас, побежали разбираться.
Последний раз редактировалось piroJOKE Ср июн 06, 2007 3:09 pm, всего редактировалось 2 раза.
Use brain against brain, ai against ai... · как правильно задавать вопросы · faq · download
Govorun
Начинающий
Сообщения: 44
Зарегистрирован: Чт янв 18, 2007 1:15 pm
Контактная информация:

Сообщение Govorun »

## http://www.raggame.ru/
[Russia - rRO]
ip 81.177.13.7
port 6900
master_version 25
version 110022
serverType 13
serverEncoding Russian
pauseCharServer 1
patchserver web.raggame.ru
patchpath /patch02
paddedPackets 1
paddedPackets_attackID 0x0094
paddedPackets_skillUseID 0x85
# Data for XKore PP mode
syncID 0x00A7
syncTickOffset 11
mapLoadedTickOffset 13
Исправлено paddedPackets_attackID 0x0094
Аватара пользователя
piroJOKE
Модератор
Сообщения: 8205
Зарегистрирован: Сб ноя 04, 2006 2:20 am
Сервер RO:: localhost
Откуда: Molvania

Сообщение piroJOKE »

...

Ты это проверял? (ведь это ж явная херня, по крайней мере в той части, что касается pp/xkore/sync)
Если ты это НЕ проверял, то на кой х... ты это выкладываешь?
Use brain against brain, ai against ai... · как правильно задавать вопросы · faq · download
Govorun
Начинающий
Сообщения: 44
Зарегистрирован: Чт янв 18, 2007 1:15 pm
Контактная информация:

Сообщение Govorun »

sub sendSkillUseLoc {
my ($self, $ID, $lv, $x, $y) = @_;
my $msg;
$msg = pack("C*", 0x13, 0x01) . pack("v", $lv) . pack("v*", $ID) . pack("v*", $x) . pack("v*", $y) . pack("x1");
$self->sendToServer($msg);
debug "Skill Use on Location: $ID, ($x, $y)\n", "sendPacket", 2;
}
-eraser-
Энтузиаст
Сообщения: 60
Зарегистрирован: Чт дек 14, 2006 2:55 pm

Сообщение -eraser- »

может кто то сказать что сделать что б 2 окна заработали? )
Govorun
Начинающий
Сообщения: 44
Зарегистрирован: Чт янв 18, 2007 1:15 pm
Контактная информация:

Сообщение Govorun »

sub sendGetCharacterName {
my ($self, $ID) = @_;
my $msg;
$msg = pack("C*", 0x9B, 0x00) . $ID . pack("x1") ;
$self->sendToServer($msg);
debug "Sent get character name: ID - ".getHex($ID)."\n", "sendPacket", 2;
}
Govorun
Начинающий
Сообщения: 44
Зарегистрирован: Чт янв 18, 2007 1:15 pm
Контактная информация:

Сообщение Govorun »

piroJOKE
по поводу синк - ходит, не отваливается и т.д. щас буду проверять окончательный вариант.
Закрыто