Code: Select all
Procedure Beginn;
Begin
wait(1000);
uoSay(Chr(39)+'craftcreate 0');
Wait(3200);
AddToSystemJournal('Открываем пак.');
UseObject(Backpack);
wait(3150);
AddToSystemjournal('Ставим ловушку на инготы');
WaitTargetObject(FindType(Logs,backpack));
wait(150);
AddToSystemJournal('Дабл клик на молоток.');
WaitMenu ('Rusty Armor', '(3)');
UseObject(FindType(Katana,backpack));
ClearJournal;
WaitMenu ('Rusty Platemail', '(1)');
wait(350);
в игре менюшки выглядят так :
[/img]