v0ltag3,
добавляешь в раздел описания переменных новую переменную, при иницаализации скрипта обнуляешь ее, при срабатывании условия ставишь нужное тебе значение.
delphi Код:
var var_1:integer;
procedure Init;
begin
//......................
var_1:=0;
//......................
end;
//......................
begin
//...............
//..........
//при каких-нибудь действиях, например, после юз итем ставишь
var_1:=1;
//................
//после этого ставишь дополнительное условие
if pck[1]=#$7C then
begin
if var_1=1 then //обнуляем переменную
var_1:=0;
//ну и проверяешь, если
{.........} if var_1=0 then UseItem(1234{юзаем следующий итем});
end;
//...............
end;
З.Ы. Старался максимально запутать ситуевину =)