gvqbio00


Usuario
este scripss todavia abre las medallas,, si algiuien lo puede modificar para el frozen R se los agradeceria...
program ConsumeAllItemID;


var
InventoryPlace : Integer;


procedure GetInventoryPlace(ItemID : Integer);
begin
InventoryPlace := 0;
while ( (InventoryPlace <> Inventory.GetInventoryMax(2)) and (Inventory.GetInventoryItemID(2,InventoryPlace) <> ItemID) ) do
begin
InventoryPlace := InventoryPlace + 1;
end;
Debug(IntToStr(InventoryPlace));
end;


procedure ConsumeAllItemID(ItemID : Integer);
var
s:TPacket;
Begin
GetInventoryPlace(ItemID);
while (InventoryPlace > 0) do
begin
s:=TPacket.Create($009E);
s.Writeint(GetTickCount-81161);
s.Writebyte(InventoryPlace);
s.Writebyte(0);
s.Writeint(ItemID);
s.Writeint(1);
Debug(s.DumpPacket);
s.Send;
s.Free;
Sleep(200);
GetInventoryPlace(ItemID);
end;
end;






begin
//ConsumeAllItemID(2431884); //Frozen R
ConsumeAllItemID(2431174); //Using All Medal of Honor
end.
Sáb 28 Dic - 19:35     editar
           

yulbrin0713


Usuario
Creo que ese scrip sirve para los dos. Para medallas y frozen.
Dom 29 Dic - 11:12     editar
           

mentescura


Usuario
alguien tiene para un perfect en el ability circulator??
Jue 2 Ene - 20:59     editar