Page 1 of 1

Медитация! =)

Posted: 2006-03-07 09:07:37
by chikatilo
При запуске пишется "Медитируем..." и скрипт вырубается(
помогите плиз! раньше помоему он у меня работал а щас хз почему непашет(

Code: Select all

sub Meditation() 
   var Food = '0x097B'      ;Тип еды
   var Curse = '0x1515'     ;Тип курсы
   var typeCurse = 'cloak'
   var int, i=1, time
   UO.Undress()
   Repeat
      wait(500)
   Until UO.ObjAtLayer(typeCurse)=='' OR time+100<UO.Timer()
   int=UO.INT

   While True
      UO.DeleteJournal()

      if UO.Mana>=int then
         UO.UseType(Curse)
         time=UO.Timer()
         While UO.Mana>=int AND time+100>UO.Timer()
            wait(500)
         Wend
      endif

      time=UO.Timer()
      UO.Undress()
      Repeat
         wait(500)
      Until UO.ObjAtLayer(typeCurse)=='' OR time+100<UO.Timer()
      int=UO.INT

      time=UO.Timer()
      UO.UseSkill("Meditation")
      Repeat
         wait(500)
      Until UO.InJournal('You attempt') OR time+100<UO.Timer()

      time=UO.Timer()
      UO.UseType(Curse)
      Repeat
         wait(500)
      Until UO.InJournal('You lose') OR UO.InJournal('You are') OR time+100<UO.Timer()

      if i==50 then
         UO.DeleteJournal()
         repeat
            UO.UseType(Food)
            wait(500)
         until UO.InJournal("simply too full")
         i=1
      else
         i=i+1
      endif

   Wend
end sub


Re: Медитация! =)

Posted: 2006-03-19 11:50:17
by Kynep
chikatilo wrote:При запуске пишется "Медитируем..." и скрипт вырубается(
помогите плиз! раньше помоему он у меня работал а щас хз почему непашет(

Code: Select all

sub Meditation() 
   var Food = '0x097B'      ;Тип еды
   var Curse = '0x1515'     ;Тип курсы
   var typeCurse = 'cloak'
   var int, i=1, time
   UO.Undress()
   Repeat
      wait(500)
   Until UO.ObjAtLayer(typeCurse)=='' OR time+100<UO.Timer()
   int=UO.INT

   While True
      UO.DeleteJournal()

      if UO.Mana>=int then
         UO.UseType(Curse)
         time=UO.Timer()
         While UO.Mana>=int AND time+100>UO.Timer()
            wait(500)
         Wend
      endif

      time=UO.Timer()
      UO.Undress()
      Repeat
         wait(500)
      Until UO.ObjAtLayer(typeCurse)=='' OR time+100<UO.Timer()
      int=UO.INT

      time=UO.Timer()
      UO.UseSkill("Meditation")
      Repeat
         wait(500)
      Until UO.InJournal('You attempt') OR time+100<UO.Timer()

      time=UO.Timer()
      UO.UseType(Curse)
      Repeat
         wait(500)
      Until UO.InJournal('You lose') OR UO.InJournal('You are') OR time+100<UO.Timer()

      if i==50 then
         UO.DeleteJournal()
         repeat
            UO.UseType(Food)
            wait(500)
         until UO.InJournal("simply too full")
         i=1
      else
         i=i+1
      endif

   Wend
end sub



Ептить вот это замуты :shock:

На поробуй, типы проставь сам

Code: Select all

sub medit()
VAR cursa=0x144F
VAR j, tekmana
uo.undress()
wait(1000)
repeat
      UO.UseType(0x097B) # Что кушаем
      wait(1000)
      tekmana=uo.int
      wait(100)
      checklag()
      uo.usetype(cursa); Cursed Hat
      uo.useskill ("Spirit Speak")
      wait(2000)
      j=0
      repeat
      wait(10)
      j=j+1
      until (uo.mana <= tekmana-1) or (j>1000)
      checklag()
      uo.undress()
      wait(100)
      checklag()
      uo.useskill ("Meditation")
      Wait(3000)
until uo.dead()
end sub

sub checklag()
uo.deletejournal()
uo.click('backpack')
Repeat
wait(100)
Until UO.InJournal("backpack")
end sub

Posted: 2006-03-19 11:54:56
by Kynep
ZWERb wrote:НУ А СМЫСЛ?????? НУ НИКАКОГО СМЫСЛА!!!!!!
МЕДИТАЦИЯ без МАГИИ - НЕ НУЖНО АБСОЛЮТНО!!!
А прокачав магию хотябы до 70.0 будет медитации ГМ!
единственное что этот скрипт можна под хилинг переделать! Вот тогда в нем польза ЕСТЬ!


Не знаешь не говори, неделю назад прокачал магери с 30 до ГМ медитация была 30 щаст стала 86, качал с медитацией

Posted: 2010-01-03 20:36:03
by kahe
ZWERb wrote:
Cooper wrote:Не знаешь не говори, неделю назад прокачал магери с 30 до ГМ медитация была 30 щаст стала 86, качал с медитацией


если ручьки кривые...
Я на In LOR с 50.0 магию до 70.4 поднял!
и медитация была 50.0 Стала ГМ!

Умница только на твоём шарде медитация легко качается...на ДРВ у тебя первая магия будет а медитацию будешь докачивать...
PS:скрипт чётко работает,только задержку на курсу поставил больше а то медленно спадает и курсу быстро снимает

Posted: 2010-01-04 08:42:50
by Mirage
а на нашем шарде магия стоит 200К золота (набивается за час полтора) а медитацию надо качать. Так что смыс л на куре качать был бы... Но нет курсовых вещей :) Так что мы например качаем насоздании еды (корм животным) ну или на инлоре изначально. Правда тогда магия опережает медит. раза в полтора.
+ медитация качается иногда от удачного входа а иногда (как у нас) от удачного завершения.