Показать сообщение отдельно
Старый 17.01.2017, 11:37   #2120
Новичок
 
Регистрация: 06.01.2017
Сообщений: 1
Сказал Спасибо: 0
Имеет 0 спасибок в 0 сообщенях
Qwertyuio пока неопределено
По умолчанию

Доброго времени суток!
Ребят подскажите, учусь только, не сильно шарю. хочу поискать МСы на сервере ХФ. гм-шоп через альтБ, приходят пакеты такого типа:
_bbsmultisell:-100020;_bbspage:shop/VIP - вип магаз за донки
_bbsmultisell:-10003;_bbspage:shop/shop-weapon - магаз с Ц оружием

Ставлю скрипт на перебор МСов:

var i:integer;
Stream:TFileStream;
procedure Init;
begin;
i:=100000;
try
Stream := TFileStream.Create('C:\123.txt', fmOpenReadWrite);
except
Stream := TFileStream.Create('C:\123.txt', fmCreate);
end;
end;
procedure Free;
begin
Stream.free;
end;
begin
if FromClient and (pck[1]=#$56) then begin
i:=i+1;
buf:=#$23;
Writes('_bbsmultisell:-'+inttostr(i)+';_bbspage:shop/shop-weapon');
sendtoserver;
end;
if (pck[1]+pck[6]=#$D0#$01) then
Stream.Write(inttostr(Readd(2))+' ',10);
end.

Если в выделенной строке в скрипте пишу Writes('_bbsmultisell:-'+inttostr(i)); , то он уже не открывает МСы. Т.е. даже если я составляю пакет с номером МС 100020 , но в конце вместо _bbspage:shop/VIP поставлю _bbspage:shop/shop-weapon , то он уже не открывает этот МС.
Я так понимаю, что "_bbspage:shop/shop-weapon" это действие на возврат в предыдущее меню.
как то можно открывать МСы без этой приставки возврата? или я что-то не правильно понимаю, подскажите пожалуйста. И есть ли вообще смысл искать именно в ГМшопе МСы, или просто искать через нпс , там вот такой стандартный пакет "npc_268444567_multisell 002"?

Последний раз редактировалось Qwertyuio, 17.01.2017 в 11:41.
Qwertyuio вне форума   Ответить с цитированием