Code: Select all
repeat
                   AddToSystemJournal('Кастуем вортекса.');
                   FindType(Elem,Ground);
                   cast('Energy Vortex')
                   WaitForTarget(5000);
                   if targetpresent then
                   begin
                      TargetToObject(FindItem);
                   end;
                   ClearJournal;
                 WaitJournalLine(Now, 'Energy|fizzles.', 40000);
                until FindType(Vortex,Ground)=1

 