Ultima Online Antares

Нашел пока только чтобы кидал на себя пойзон и медитировал.

sub Magery() 
  VAR NS='0x0F88'; Тип Nighshade. 
  VAR Sunduk='0x40F7D583'; Сериал(ID) Сундука. 
  VAR Kolvo=100; Количество регов, которое чар берёт из сундука. 
  While NOT UO.Dead() 
  While UO.Mana>=9 AND UO.NS>0; здесь можно менять со скаких маны чар начнёт медетировать
  UO.DeleteJournal() 
  UO.Cast('Poison', 'self') 
  wait(2000) 
  wend 
  If UO.Mana<9 Then 
  While UO.Mana<UO.Int 
  UO.DeleteJournal() 
  wait(1000) 
  UO.Useskill('Meditation') 
  Repeat 
  wait(100) 
  until UO.InJournal("You are") OR UO.InJournal("You lose") 
  Wend 
  Endif 
  If UO.NS == 0 Then 
  UO.FindType(NS, '-1', Sunduk) 
  UO.Grab(str(Kolvo), 'finditem') 
  repeat 
  wait(100) 
  until UO.NS>0 
Endif 
  Wend 
end sub

Ктобы суда добавил хил(пока пойзон не спадет) и добор бинтов, был бы очень благодарен)

Я б написал тебе с нуля за какие нидубь реги. :)А так времени нету. :(

 Не модно уже лет 5

 Еще один из агрошколоты чтоли? 0_о

Ну привет.

Make U Love Me, отсыпь.