Скрипт

[n1ce?!]

Раньше был скрипт на авто дроп итемов из инверьтаря,вчера облазел весь инет не где не нашёл,не кто не поможет написать?или есть остался у вас?

[QaK]

Сообщение от n1ce?!

вчера облазел весь инет не где не нашёл

лжешь, презренный бледнолицый! А по теме - с какой целью предметы дропать собрался - инвентарь чистить или рисовать аденой?

[n1ce?!]

Сообщение от QaK

лжешь, презренный бледнолицый! А по теме - с какой целью предметы дропать собрался - инвентарь чистить или рисовать аденой?

чистить,я раньше так чистил,на явах захотил со скриптом на смерть 0x3,и включал авто дроп скрипт,и у меня всё падало на землю,вчера случайно купил 200 точек,и чар повис,когда захожу в игру сразу ла2 пропадает,когда захожу со скриптом,тока открыть инверь сразу вырубается клиент

[QaK]

n1ce?!, готового скрипта, скорее всего нет, по крайней мере я не помню. А так - берешь мало-мальски попсовый скрипт, который тут найдешь, который инвентарь обрабатывает - там чуть подправить и все заработает.
З.Ы. а зачем дропать? Лучше уничтожать ....

[n1ce?!]

Сообщение от QaK

n1ce?!, готового скрипта, скорее всего нет, по крайней мере я не помню. А так - берешь мало-мальски попсовый скрипт, который тут найдешь, который инвентарь обрабатывает - там чуть подправить и все заработает.
З.Ы. а зачем дропать? Лучше уничтожать ....

Я в паскале не шарю(Да мне бы или удалить,или дропнуть,перса жалко и щмота на нём.Я другим персов вижу кто стоит чар который повис,если я рядом сним выкину на землю точку,и с чара который повис на авто поставлю RequestDropItem может так получиться?

Добавлено через 4 минуты
И дело не в перевесе,а в том что много итемов(

Добавлено через 49 минут
Тока для WPF нашёл=/

PHP код:

Auto_drop:
// скрипт дропа вещей. q2zx(c).
if _gAbsNumPkt = 1 then begin // Первый пакет, здесь один раз за всю сессию установим переменные... 
Flag3:=0; 
Flag2:=0; 
Flag1:=0; 
Flag4:=0; 
Flag5:=0; 
recv:=HPck('0F'); 
end; 

if _gFromServ = true then begin 
if _gbuff[3] = #$15 then begin // если 3 байты пакета равны 15 
x:=copy(_gbuff,54,4); 
y:=copy(_gbuff,58,4); 
z:=copy(_gbuff,62,4); 
WritelogH(x,y,z,#13,#10); 
Flag1:=1; 

end; 
end; 
_gOutBuff :=_gbuff; 
Flag4:=0; 
end; 

if _gFromServ = true then begin 
if _gbuff[3] = #$1B then begin 
Buff :=_gbuff; 
_gOutBuff :=_gbuff; 
Flag3:=1; 
Writelog('перехвачен _1B_ и записан в Buff',#13,#10); 
end; 
end; 
if Flag1=1 and Flag2=1 and Flag3=1 then begin 
for dp:=0 to 50 do begin 
drop:=#$17+#$00+#$12+copy(Buff,(10+28*dp),4)+copy( Buff,(18+28*dp),4)+x+y+z; 
if length(drop)=23 then begin 
if gSys('EnSendS',drop) <> length(drop) then begin // пошлем пакет на сервер. 
Writelog(' пакет не отослался! '); 
end else begin 
//Flag3:=1; 
Writelog(length(drop),'дропнули');Writelog(#13,#10 ); 
end; 
WritelogHexB(copy(Buff,(10+28*dp),4));Writelog(#13 ,#10); 
WritelogHexB(copy(Buff,(18+28*dp),4));Writelog(#13 ,#10); 
end else flag2:=0; 
end; 

end; 
if _gFromServ = false then begin 
if _gbuff[3] = #$03 then begin 
Flag2:=1; 
end; 
end;