Page 1 of 1

MEDITATION!

Posted: 2006-10-24 13:51:40
by darkangelgg
Люди!!!ПлиZZZ!!!Помогите сделать скрипт на просто медитацию(бе3 всяких "спирит спик" и "хилинг"!
3аранее благодарен!=) :D

Posted: 2006-10-24 13:57:08
by DerMeister =)
ЧееЛ, ПоИсК ёМаЁ!

Posted: 2006-10-24 14:02:09
by darkangelgg
Я то искал... но остался ни с 4ем=( воть... Там есть скрипты, но с Magery и с Healing... а мне это не нано пока:)

Posted: 2006-10-24 14:36:45
by GimFlex

Code: Select all

sub Train_Healing() 
var i,j,tekstr
uo.undress()
wait(100)
repeat
   UO.FindType(0x0E21,"-1","my")
   if UO.FindCount() then
      tekstr=uo.str
      wait(100)
      cheklag()
      uo.usetype(0x1DB9); Cursed Hat
      uo.useskill ("Spirit Speak")
      wait(2000)
      j=0
      repeat
      wait(10)
      j=j+1
      until (uo.life <= tekstr-1) or (j>1000)
      cheklag()
      uo.undress()
      wait(100)
      cheklag()
      uo.useskill('Meditation')
      Wait(2000)
   endif
until uo.dead()
end sub

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


c курсой

Posted: 2006-10-24 14:59:56
by darkangelgg
тханксверимат4:D=)

Posted: 2006-10-24 17:37:26
by Scripts Writer
Question wrote:

Code: Select all

sub Train_Healing() 
var i,j,tekstr
uo.undress()
wait(100)
repeat
   UO.FindType(0x0E21,"-1","my")
   if UO.FindCount() then
      tekstr=uo.str
      wait(100)
      cheklag()
      uo.usetype(0x1DB9); Cursed Hat
      uo.useskill ("Spirit Speak")
      wait(2000)
      j=0
      repeat
      wait(10)
      j=j+1
      until (uo.life <= tekstr-1) or (j>1000)
      cheklag()
      uo.undress()
      wait(100)
      cheklag()
      uo.useskill('Meditation')
      Wait(2000)
   endif
until uo.dead()
end sub

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


c курсой


И что это? Курса и сс. Может ты еще мининг сюда выложишь который медитирует перед улётом?!

Posted: 2006-10-24 20:57:55
by GimFlex
You Must Die wrote:
Question wrote:

Code: Select all

sub Train_Healing() 
var i,j,tekstr
uo.undress()
wait(100)
repeat
   UO.FindType(0x0E21,"-1","my")
   if UO.FindCount() then
      tekstr=uo.str
      wait(100)
      cheklag()
      uo.usetype(0x1DB9); Cursed Hat
      uo.useskill ("Spirit Speak")
      wait(2000)
      j=0
      repeat
      wait(10)
      j=j+1
      until (uo.life <= tekstr-1) or (j>1000)
      cheklag()
      uo.undress()
      wait(100)
      cheklag()
      uo.useskill('Meditation')
      Wait(2000)
   endif
until uo.dead()
end sub

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


c курсой


И что это? Курса и сс. Может ты еще мининг сюда выложишь который медитирует перед улётом?!


исправлял в попыхах могу и мининг выложить если так надо вместе с медитацией :roll:

Posted: 2006-10-24 21:06:30
by GimFlex

Code: Select all

sub Meditation() 
var i,j,tekstr
uo.undress()
wait(100)
repeat
      tekstr=uo.int
      wait(100)
      cheklag()
      uo.usetype(0x1DB9); Cursed Hat
      wait(2000)
      j=0
      repeat
      wait(10)
      j=j+1
      until (uo.mana <= tekstr-2) or (j>1000)
      cheklag()
      uo.undress()
      wait(100)
      cheklag()
      uo.useskill('Meditation')
      repeat
       wait(100)
      until uo.injournal("You are") or uo.injournal("You lose")
until uo.dead()
end sub

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

вот переделал стою щас качаюсь как и просили без сс

Posted: 2006-10-24 21:46:38
by GimFlex

Code: Select all

sub Meditation() 
var i,j,m
uo.undress()
wait(100)
repeat
      m=uo.int
      wait(100)
      cheklag()
      uo.usetype(0x1DB9) ;тип курсанутой вещи
      repeat
       wait(10)
      until uo.mana <= m-1
      cheklag()
      uo.undress()
      wait(100)
      cheklag()
      uo.useskill('Meditation')
      repeat
       wait(100)
       if uo.injournal("You lose") then
        uo.deletejournal()
        uo.useskill('Meditation')
       endif
      until uo.mana==m
until uo.dead()
end sub

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