Re: Распитие Грейт Хелок :)
Цитата:
Сообщение от R a m
Program DrinkHeal;
{$include sysutils.uops}
const
HealType = 3852;
HealColor = 00;
var
HealId : LongInt;
begin
if _FindObjectByColor(HealType,HealColor,HealID) then begin
SetLastObject(HealType,HealID);
SendKey(kLo);
end else
WriteLn('Out of Heal');
end.
на F1 у мя пробинден ласт обжект,
вроде все,
Крутой папь, а вот ты не в курсе что если ты свой модуль не подключешь, твой скрипт пахать не будет? потому что функции *_FindObjectByColor* не существует :D скрипт на ламбер простой:Repeat Sendkey(k_F1);Delay(10000); Until False; =)))