| Zobacz poprzedni temat :: Zobacz następny temat |
| Autor |
Wiadomość |
Krzysztex
Dołączył: 30 Gru 2007
Posty: 4
Przeczytał: 0 tematów
Ostrzeżeń: 0/5
|
 Wysłany: Nie 22:25, 30 Gru 2007 Temat postu: [Potrzebuję] Life Fluid Drinker |
|
|
Potrzebowałbym jakiegoś Life Fluid drinkera dla mojego rookstayera. Da się załatwić?
@EDIT
Item Number = 2874
Post został pochwalony 0 razy
Ostatnio zmieniony przez Krzysztex dnia Nie 23:17, 30 Gru 2007, w całości zmieniany 1 raz
|
|
| Powrót do góry |
|
 |
|
|
 |
Marcin
Administrator
Dołączył: 29 Gru 2007
Posty: 6
Przeczytał: 0 tematów
Pomógł: 2 razy
Ostrzeżeń: 0/5
Skąd: z Polski
|
| Wysłany: Nie 23:34, 30 Gru 2007 Temat postu: |
|
|
Ok zrobiłem więc tak :
| Cytat: | const
minHealth = 400; //////wpisz tutaj minimum hp jakie ma być by zalać life fluida
function GetItemFromOpenBackpack(ItemID, ItemType: integer): TItem;
begin
Result := nil;
for x := 0 to Self.Containers.Count - 1 do
begin
if x >= Self.Containers.Count then Break;
for y := 0 to Self.Containers.Container[x].Count - 1 do
begin
if y >= Self.Containers.Container[x].Count then Break;
if Self.Containers.Container[x].Item[y].ID = ItemID then
begin
if Self.Containers.Container[x].Item[y].Amount = ItemType then
begin
Result := Self.Containers.Container[x].Item[y];
Exit;
end;
end;
end;
end;
end;
while not Terminated do
begin
UpdateWorld;
if Self.Health < minHealth then
begin
Vial := GetItemFromOpenBackpack(2874, 11);
if Vial <> nil then
begin
Vial.UseWithSelf;
Sleep(500);
end;
end;
Sleep(500);
end; |
Post został pochwalony 1 raz
Ostatnio zmieniony przez Marcin dnia Nie 23:39, 30 Gru 2007, w całości zmieniany 1 raz
|
|
| Powrót do góry |
|
|
Krzysztex
Dołączył: 30 Gru 2007
Posty: 4
Przeczytał: 0 tematów
Ostrzeżeń: 0/5
|
| Wysłany: Pon 22:42, 31 Gru 2007 Temat postu: |
|
|
Dzięki. Własnoręcznie sprawdziłem - działa bez zarzutu  .
Post został pochwalony 0 razy
|
|
| Powrót do góry |
|
|
