MEDITATION!

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
darkangelgg
Posts: 9
Joined: 2006-10-18 13:53:25
Contact:

MEDITATION!

Post by darkangelgg »

Люди!!!ПлиZZZ!!!Помогите сделать скрипт на просто медитацию(бе3 всяких "спирит спик" и "хилинг"!
3аранее благодарен!=) :D
DerMeister =)
Expert!
Posts: 1032
Joined: 2006-02-25 21:48:38

Post by DerMeister =) »

ЧееЛ, ПоИсК ёМаЁ!
DerMeister сейчас на нейрале!
darkangelgg
Posts: 9
Joined: 2006-10-18 13:53:25
Contact:

Post by darkangelgg »

Я то искал... но остался ни с 4ем=( воть... Там есть скрипты, но с Magery и с Healing... а мне это не нано пока:)
GimFlex
Expert!
Posts: 766
Joined: 2005-01-07 13:22:19
Contact:

Post 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 курсой
darkangelgg
Posts: 9
Joined: 2006-10-18 13:53:25
Contact:

Post by darkangelgg »

тханксверимат4:D=)
Scripts Writer
Posts: 2259
Joined: 2005-04-19 18:00:29
Location: Московская область
Contact:

Post 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 курсой
И что это? Курса и сс. Может ты еще мининг сюда выложишь который медитирует перед улётом?!
GimFlex
Expert!
Posts: 766
Joined: 2005-01-07 13:22:19
Contact:

Post 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:
GimFlex
Expert!
Posts: 766
Joined: 2005-01-07 13:22:19
Contact:

Post 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 
вот переделал стою щас качаюсь как и просили без сс
GimFlex
Expert!
Posts: 766
Joined: 2005-01-07 13:22:19
Contact:

Post 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 
Post Reply