Страница 2 из 15

Добавлено: Ср ноя 29, 2006 5:00 pm
kLabMouse
Старый. Он же спецом для нас зделан. А точнее для Руского Офа.

Добавлено: Ср ноя 29, 2006 5:53 pm
kLabMouse
Jerry писал(а):где моя любимая аватарка ?! %)
Оффтоп. Пропала!

Добавлено: Ср ноя 29, 2006 5:54 pm
kLabMouse
И так. Пробуем (Чесно говоря ето только предварительно), должно пахать. Если что пишем что не пашет.
Глупых Вопросов не задавать Типа как ето зделать и т п.
Предупреждаю. Предварительній Патч. Только Для Тестирования!!!!

Если какая-то операция Не пашет. То пишем что не пащет.

Вот какие пакеты поменялись

Код: Выделить всё

sendMapLogin
sendSync
sendMove
sendGetPlayerInfo
sendLook
sendTake
sendDrop
sendItemUse
sendStorageAdd
sendStorageGet
sendSkillUseLoc
Значит Нам нужно пропатчить Send.pm
Ищем:

Код: Выделить всё

	} elsif ($config{serverType} == 13) {
		$msg = pack("C*", 0x72, 0, 0, 0x40, 0x60, 0, 0x10, 0, 0, 0, 0) .
			$accountID .
			pack("C*", 0xE8, 0xFA) .
			$charID .
			pack("C*", 0x66, 0x00) .
			$sessionID .
			pack("V", getTickCount()) .
			pack("C*",$sex);
Заменяем:

Код: Выделить всё

	} elsif ($config{serverType} == 13) {
		$msg = pack("C*", 0x72,0, 0, 0) . $accountID . pack("C*" 0, 0, 0) . $charID . pack("C*", 0x12, 0, 0xB0, 0xA3, 0x66, 0) . $sessionID . pack("V", getTickCount()) . pack("C*",$sex);

Ищем:

Код: Выделить всё

	} elsif ($config{serverType} == 13) {
		$msg = pack("C*", 0x7E, 0x00, 0x00, 0x00, 0xE8, 0x6F) . $syncSync;
Заменяем:

Код: Выделить всё

	} elsif ($config{serverType} == 13) {
		$msg = pack("C*", 0x7E, 0x00, 0x12) . $syncSync;
Ищем:

Код: Выделить всё

	} elsif ($config{serverType} == 13) {
		$msg = pack("C*", 0x85, 0x00) . getCoordString($x, $y);
Заменяем:

Код: Выделить всё

	} elsif ($config{serverType} == 13) {
		$msg = pack("C*", 0x85, 0x00, 0x5C) . getCoordString($x, $y);
Ищем:

Код: Выделить всё

	} elsif ($config{serverType} == 13) {
		$msg = pack("C*", 0x94, 0x00) . pack("C*", 0xEE, 0x01, 0x0C, 0xF9, 0x12, 0x00, 0x76, 0xC6, 0x54) . $ID;
Заменяем:

Код: Выделить всё

	} elsif ($config{serverType} == 13) {
		$msg = pack("C*", 0x94, 0x00) . pack("C*", 0x5C, 0x01, 0x10, 0xF9, 0x12, 0x00, 0xF6) . $ID;
Ищем:

Код: Выделить всё

	} elsif ($config{serverType} == 13) { 
		$msg = pack("C*", 0x9B, 0x00, 0xBF, 0x05, 0x00, $head, 0x00, 0x00, 0xC8, 0x71, 0xC8, 0x01, $body);
Заменяем:

Код: Выделить всё

	} elsif ($config{serverType} == 13) { 
		$msg = pack("C*", 0x9B, 0x00, 0x6C, $head, 0x00, 0x80, 0x55, $body);
Ищем:

Код: Выделить всё

	} elsif ($config{serverType} == 13) {
		$msg = pack("C*", 0x9F, 0x00, 0x00, 0x00, 0x00, 0x00) . $itemID;
Заменяем:

Код: Выделить всё

	} elsif ($config{serverType} == 13) {
		$msg = pack("C*", 0x9F, 0x00, 0x6C) . $itemID;
Ищем:

Код: Выделить всё

	} elsif ($config{serverType} == 13) {
		$msg = pack("C*", 0xA2, 0x00) .
			pack("C*", 0x00, 0x00, 0x68) .
			pack("v*", $index) .
			pack("C*", 0x06, 0xDB, 0, 0, 0) .
			pack("v*", $amount);
Заменяем:

Код: Выделить всё

	} elsif ($config{serverType} == 13) {
		$msg = pack("C*", 0xA2, 0x00) . pack("C*", 0x12, 0x00) . pack("v*", $index) . pack("C*", 0x6C, 0x01, 0x52, 0x80) . pack("v*", $amount);
Ищем:

Код: Выделить всё

	} elsif ($config{serverType} == 13) {
		$msg = pack("C*", 0xA7, 0x00, 0x12, 0x00, 0xE0, 0x5E) . 
			pack("v*", $ID) .
			pack("C*", 0x1C, 0xFA, 0x12, 0, 0xD8) .
			$targetID;
Заменяем:

Код: Выделить всё

	} elsif ($config{serverType} == 13) {
		$msg = pack("C*", 0xA7, 0x00, 0x70) . pack("v*", $ID) . pack("C*", 0xFA, 0x12, 0, 0x68, 0xF7, 0x12) . $targetID;
Ищем:

Код: Выделить всё

	} elsif ($config{serverType} == 13) {
		$msg = pack("C*", 0xF3, 0x00, 0x00, 0x00, 0x58) .
			pack("v", $index) .
			pack("C*", 0x04, 0x4E, 0x09, 0x91, 0x7C) .
			pack("V", $amount);
Заменяем:

Код: Выделить всё

	} elsif ($config{serverType} == 13) {
		$msg = pack("C*", 0xF3, 0x00, 0x00, 0x00) . pack("v", $index) . pack("C*", 0, 0, 0xFC, 0xF7) . pack("V", $amount);

Ищем:

Код: Выделить всё

	} elsif ($config{serverType} == 13) {
                $msg = pack("C*", 0xF5, 0x00, 0x64, 0x00, 0x21, 0x00, 0x00, 0x00, 0xB6, 0xA6, ) .
                        pack("v*", $index) .
                        pack("C*", 0x21, 0x00, 0x00, 0x00, 0x01, 0x00, 0x00, 0x00, 0x11, 0x83) .
                        pack("V*", $amount);
Заменяем:

Код: Выделить всё

	} elsif ($config{serverType} == 13) {
                $msg = pack("C*", 0xF5, 0x00, 0x16, 0x00) . pack("v*", $index) . pack("C*", 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0) . pack("V*", $amount);
Ищем:

Код: Выделить всё

	} elsif ($config{serverType} == 13) {
		# The block has not been checked up!
		$msg = pack("C*", 0x16, 0x01, 0x12) .
			pack("v", $lv) .
			pack("C*", 0x5E) .
			pack("v*", $ID) .
			pack("C*", 0x68, 0xD1, 0x2F, 0x02, 0x38, 0xD9, 0x5D, 0x0F, 0x5B) .
			pack("v*", $x) . 
			pack("C*", 0x76, 0) .
			pack("v*", $y);
Заменяем:

Код: Выделить всё

	} elsif ($config{serverType} == 13) {
		$msg = pack("C*", 0x16, 0x01, 0, 0) . pack("v", $lv) . pack("C*", 0x7F, 0, 0x08) . pack("v*", $ID) . pack("C*", 0, 0xEF, 0x8A, 0x54, 0, 0xE0, 0x2A, 0x6C, 0x01, 0xF0, 0x4B) . pack("v*", $x) .  pack("C*", 0xBC, 0x7B, 0x57, 0x77) . pack("v*", $y);

Добавлено: Ср ноя 29, 2006 6:07 pm
Omega.Shadow
У меня выдает кучу ошибок в линиях 10, 37,2814,41

Добавлено: Ср ноя 29, 2006 6:09 pm
kLabMouse
Omega.Shadow писал(а):У меня выдает кучу ошибок в линиях 10, 37,2814,41
Знач плохо попатчил. Ща в СВН залью. И выложу головый файлик.

Добавлено: Ср ноя 29, 2006 6:13 pm
Omega.Shadow
Да, мб проще просто сам сенд выложить?

Добавлено: Ср ноя 29, 2006 6:18 pm
Eddga

Код: Выделить всё

$msg = pack("C*", 0x72,0, 0, 0) . $accountID . pack
не правильно... Правильно

Код: Выделить всё

$msg = pack("C*", 0x72,0, 0) . $accountID . pack

Добавлено: Ср ноя 29, 2006 6:29 pm
kLabMouse
Исправил.
Теперь можно Скачать с СВН все готовые исправления.

Добавлено: Ср ноя 29, 2006 6:33 pm
Omega.Shadow
Ррр!
Клаб, ты можешь выложить сенд.пм отдельно?
Мне скачать кору стоит 40р.А вручную я писал, не работает >.<

Добавлено: Ср ноя 29, 2006 6:36 pm
Eddga
Мыхонок :) А как к вашему СВН прикрутиться?

Добавлено: Ср ноя 29, 2006 6:36 pm
DimkaUA
пока-что работает, ошибок не вижу

Добавлено: Ср ноя 29, 2006 6:37 pm
DimkaUA
Eddga писал(а):Мыхонок :) А как к вашему СВН прикрутиться?
качаешь файлик с СВН, потом находишь такой же в папке с ботом и заменяешь на СВНовский.

Добавлено: Ср ноя 29, 2006 6:41 pm
kLabMouse

Добавлено: Ср ноя 29, 2006 6:42 pm
Stells
DimkaUA писал(а):пока-что работает, ошибок не вижу
а можно отдельно файлик выложить, например вот сюда http://www.zalil.ru/ плииизз, сам патчу ошибки выходят :(

Добавлено: Ср ноя 29, 2006 6:45 pm
realm
DimkaUA писал(а): качаешь файлик с СВН, потом находишь такой же в папке с ботом и заменяешь на СВНовский.
Вопрос может глупый , откуда качать???