У кого нить есть скрипт на медитацию

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
BornToReign
Posts: 21
Joined: 2004-04-08 18:24:46

У кого нить есть скрипт на медитацию

Post by BornToReign »

У кого нить есть скрипт на медитацию? Заранее благодарен.=))
Yoko
Site Admin
Posts: 1964
Joined: 2004-04-03 16:49:38
Contact:

Post by Yoko »

sub idiotmeditate()
uo.useskill("Meditation")
end sub
WhiteDemon
Posts: 16
Joined: 2004-04-09 19:07:00

Post by WhiteDemon »

У меня тож вопрос про скрипт на медитацию! НО мне надо с курсой! Чтоб он одевал курсу на время потом ее снимал и медитировал! Очень прошу!
Psimorph
Posts: 118
Joined: 2004-04-06 12:27:32
Contact:

Post by Psimorph »

в смысле с курсой? с вещью курсованой? и какой тогда смысл медитации?
Jagy
Posts: 3
Joined: 2004-04-09 21:23:08

скрипт

Post by Jagy »

Code: Select all

VAR kursa         = 0x1517 ; Рубашка курсовая 
VAR eda           = 0x09bb ; свинина
Var Mana          = 70     ; Мана перца
VAR i=0;
VAR Localtime;
sub meditate()
UO.DeleteJournal()
repeat
  if i>300 then
  UO.Print("edaa")
    uo.usetype(eda)
    i=0
  endif
  i=i+1
  uo.equipt("Shirt", kursa)
  UO.Print("Equip")
  repeat
   wait(500)
   test()
  until UO.Mana < Mana
  repeat
  uo.unequip('Shirt')
  wait(500)
  Until NOT UO.InJournal("You have no")
  UO.UseSkill('Meditation')
  wait(500)
  repeat
   if UO.InJournal("You lose your concentration") then
    UO.UseSkill('Meditation')
    UO.SetJournalLine(UO.InJournal("You lose your concentration")-1,"Fixed")
   endif
   wait(500)
   
   test()
  Until UO.InJournal("at peace")

  wait(500)
  test()
  UO.SetJournalLine(UO.InJournal("at peace")-1,"Fixed")
Until UO.SkillVal('Meditation',1)==1000
end sub

sub test()
var start;
 if UO.InJournal("World save has been initiated.") then
  UO.SetJournalLine(UO.InJournal("World save")-1,"Fixed")
  UO.Click('self')
  start=UO.Timer()
  repeat
   wait(500)
  until UO.InJournal("TvoeImya: TvoeImya") or UO.Timer() - start > 300

 end if
end sub
Jagy
Posts: 3
Joined: 2004-04-09 21:23:08

Post by Jagy »

кста, можете улучшить, например не обязателньо задавать точное значение маны :)
Post Reply