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

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
chikatilo
Posts: 10
Joined: 2005-07-10 02:22:25
Contact:

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

Post 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

Kynep
Expert!
Posts: 1348
Joined: 2006-02-07 08:51:40
Location: г. Старый Оскол
Contact:

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

Post 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
Kynep
Expert!
Posts: 1348
Joined: 2006-02-07 08:51:40
Location: г. Старый Оскол
Contact:

Post by Kynep »

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


Не знаешь не говори, неделю назад прокачал магери с 30 до ГМ медитация была 30 щаст стала 86, качал с медитацией
kahe
Posts: 25
Joined: 2009-11-14 12:48:27

Post by kahe »

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


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

Умница только на твоём шарде медитация легко качается...на ДРВ у тебя первая магия будет а медитацию будешь докачивать...
PS:скрипт чётко работает,только задержку на курсу поставил больше а то медленно спадает и курсу быстро снимает
Mirage
Posts: 2802
Joined: 2009-05-28 09:58:28
Location: Иваново
Contact:

Post by Mirage »

а на нашем шарде магия стоит 200К золота (набивается за час полтора) а медитацию надо качать. Так что смыс л на куре качать был бы... Но нет курсовых вещей :) Так что мы например качаем насоздании еды (корм животным) ну или на инлоре изначально. Правда тогда магия опережает медит. раза в полтора.
+ медитация качается иногда от удачного входа а иногда (как у нас) от удачного завершения.
Post Reply