пример работы с трейд окнами №1пример работы с трейд окнами №2вариант №3 чар с прописанным ID говорит "Вася БРОСЬ!", в журнале бота проверяется регистр букв, ID произнесшего и скидываем на пол (под пол

), активный чар подбирает.
Мой старый вариант для стелса, чего то мутил
Code:
Program takegump;
{$Include 'all.inc'}
Var ID_Bossa : Cardinal;
Begin
ConfirmTrade(0);
ID_Bossa:=$00FDF84F;
Repeat
If IsTrade=true Then
begin
addtosystemjournal('1');
If GetTradeOpponent(0)=ID_Bossa Then
begin
addtosystemjournal('2');
While Not TradeCheck(0,2) do Wait(1000);
ConfirmTrade(0);
wait(300);
uosay('Спасибо!');
end
else
begin
CancelTrade(0);wait(100);uosay('Ты не мой хазяин!');
end
end;
wait(200);
Until False;
End.