3аранее благодарен!=)
MEDITATION!
Moderators: Murderator+, Murderator
-
darkangelgg
- Posts: 9
- Joined: 2006-10-18 13:53:25
- Contact:
MEDITATION!
Люди!!!ПлиZZZ!!!Помогите сделать скрипт на просто медитацию(бе3 всяких "спирит спик" и "хилинг"!
3аранее благодарен!=)
3аранее благодарен!=)
-
DerMeister =)
- Expert!
- Posts: 1032
- Joined: 2006-02-25 21:48:38
-
darkangelgg
- Posts: 9
- Joined: 2006-10-18 13:53:25
- Contact:
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 курсой
-
darkangelgg
- Posts: 9
- Joined: 2006-10-18 13:53:25
- Contact:
-
Scripts Writer
- Posts: 2259
- Joined: 2005-04-19 18:00:29
- Location: Московская область
- Contact:
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 курсой
И что это? Курса и сс. Может ты еще мининг сюда выложишь который медитирует перед улётом?!
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 курсой
И что это? Курса и сс. Может ты еще мининг сюда выложишь который медитирует перед улётом?!
исправлял в попыхах могу и мининг выложить если так надо вместе с медитацией
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
вот переделал стою щас качаюсь как и просили без сс
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