Yoko

All sides of Injection
It is currently 2026-01-16 21:45:38

All times are UTC+02:00




Post new topic  Reply to topic  [ 10 posts ] 
Author Message
PostPosted: 2009-07-20 16:12:39 
Offline
User avatar

Joined: 2004-10-16 14:40:10
Posts: 11
Location: Latvia
Привет
Вот взял 2 скрипта и сделал 1
Скрипт должен брать из сундука SS и SA, потом кастовать Night Sight на себя, когда мана кончилась - Meditation и после медитаций один раз използовать Spirit Speak.

Всё работает до того , когда мана фулл и използовал спирит спик. Потом он нечево болше неделает :(
Помогите пожалуста, што там надо переписать , менять итд.. ?


Сам скрипт.
Code:
sub NightSight()
VAR m, h
VAR bag = '0x4012C297' ; Lade ar SS un SA
While UO.SkillVal( 'Magery' ) < 1000

uo.findtype('0x0F8D', -1 ,'backpack')
if uo.findcount() < 10 then
uo.useobject( bag )
uo.findtype('0x0F8D', -1 , bag )
if uo.findcount() then
uo.moveitem('finditem','100','backpack')
checklag()
else
return
end if
end if

uo.findtype('0x0F8C', -1 ,'backpack')
if uo.findcount() < 10 then
uo.useobject( bag )
uo.findtype('0x0F8C', -1 , bag )
if uo.findcount() then
uo.moveitem('finditem','100','backpack')
checklag()
else
return
end if
end if

While UO.Mana>=9
         UO.DeleteJournal()
         UO.Cast('Night Sight', 'self')
         wait(3000)
      wend

If UO.Mana<9 Then ;*
         While UO.Mana<UO.Int
            UO.DeleteJournal()
            wait(1000)
                      UO.Useskill('Meditation')
            Repeat
               wait(100)
            until UO.InJournal("You are") OR UO.InJournal("You lose") # ЗДЕСБ ЕСЛИ ИГРАЕТЕ НЕ НА ДРВ - ИСПРАВЬТЕ  СООБЩЕНИЯ СЕРВА
         uo.useskill('Spirit Speak')
         Wait(6000)
         Wend
      Endif
end sub

Sub checklag()
   del('backpack')
   uo.click('backpack')
   repeat
   wait(50)
   until uo.injournal('backpack')
   del('backpack')
   wend
end sub

Sub del(msg)
   while uo.injournal(msg)
   uo.setJournalLine(uo.injournal(msg)-1,"Is Empty!")
   wend
end sub




Болшое спасибо!

_________________
Save this drama... for your mama =]


Top
   
PostPosted: 2009-07-20 16:19:29 
Offline
Expert!
User avatar

Joined: 2006-02-07 08:51:40
Posts: 1348
Location: г. Старый Оскол
http://forum.yoko.com.ua/viewforum.php?f=18


Top
   
 Post subject:
PostPosted: 2009-07-20 16:23:23 
Offline
User avatar

Joined: 2004-10-16 14:40:10
Posts: 11
Location: Latvia
Нда, аватар тебе, как раз )))

неужели скрипт стоко плохой , што мне щас нада идти и всю ету толпу читать в твой линк? :/

_________________
Save this drama... for your mama =]


Top
   
 Post subject:
PostPosted: 2009-07-20 16:37:03 
Offline
Expert!
User avatar

Joined: 2006-02-07 08:51:40
Posts: 1348
Location: г. Старый Оскол
HaxboY wrote:
неужели скрипт стоко плохой , што мне щас нада идти и всю ету толпу читать в твой линк? :/

А почему нет? Я в свое время не по-ленился и прочитал и даже понял и запомнил, чего и вам желаю.


Last edited by Kynep on 2009-07-20 16:45:39, edited 1 time in total.

Top
   
 Post subject:
PostPosted: 2009-07-20 16:43:01 
Offline
User avatar

Joined: 2004-10-16 14:40:10
Posts: 11
Location: Latvia
Прочитать то прочитаю, но щас просто там лазить через всех топиках, и искать почему нету repat, нехочетса :/

_________________
Save this drama... for your mama =]


Top
   
 Post subject:
PostPosted: 2009-07-20 16:47:27 
Offline
Expert!
User avatar

Joined: 2006-02-07 08:51:40
Posts: 1348
Location: г. Старый Оскол
HaxboY wrote:
нехочетса :/

А зря... очень даже зря...
В скрипте не хватало одного wend, точнее он стоял не там где нужно.
Если бы прочитали - были бы внимательней.
Code:
sub NightSight()
   VAR m, h
   VAR bag = '0x4012C297' ; Lade ar SS un SA
   While UO.SkillVal( 'Magery' ) < 1000
     
      uo.findtype('0x0F8D', -1 ,'backpack')
      if uo.getquantity('finditem') < 10 then
         uo.useobject( bag )
         uo.findtype('0x0F8D', -1 , bag )
         if uo.findcount() then
            checklag()
            uo.moveitem('finditem','100','backpack')
            wait(500)
         else
            wait(100)
         end if
      end if
     
      uo.findtype('0x0F8C', -1 ,'backpack')
      if uo.getquantity('finditem') < 10 then
         uo.useobject( bag )
         uo.findtype('0x0F8C', -1 , bag )
         if uo.findcount() then
            checklag()
            uo.moveitem('finditem','100','backpack')
            wait(500)
         else
            wait(100)
         end if
      end if
     
      While UO.Mana>=9
         UO.DeleteJournal()
         UO.Cast('Night Sight', 'self')
         wait(3000)
      wend
     
      If UO.Mana<9 Then ;*
         While UO.Mana<UO.Int
            UO.DeleteJournal()
            wait(1000)
            UO.Useskill('Meditation')
            Repeat
               wait(100)
            until UO.InJournal("You are") OR UO.InJournal("You lose")
            uo.useskill('Spirit Speak')
            Wait(6000)
         Wend
      Endif
   wend
end sub

Sub checklag()
   del('backpack')
   uo.click('backpack')
   repeat
      wait(50)
   until uo.injournal('backpack')
   del('backpack')
end sub

Sub del(msg)
   while uo.injournal(msg)
      uo.setJournalLine(uo.injournal(msg)-1,"Is Empty!")
   wend
end sub


Last edited by Kynep on 2009-07-20 16:53:55, edited 2 times in total.

Top
   
 Post subject:
PostPosted: 2009-07-20 16:49:27 
Offline
User avatar

Joined: 2004-10-16 14:40:10
Posts: 11
Location: Latvia
:)
Нда, щас repeat есть, но он каждий раз берёт по 100 регоф )))

я пошол четать ... )))

_________________
Save this drama... for your mama =]


Top
   
 Post subject:
PostPosted: 2009-07-20 16:52:44 
Offline
Expert!
User avatar

Joined: 2006-02-07 08:51:40
Posts: 1348
Location: г. Старый Оскол
HaxboY wrote:
:)
Нда, щас repeat есть, но он каждий раз берёт по 100 регоф )))

я пошол четать ... )))

Поправил, пробуйте.


Top
   
 Post subject:
PostPosted: 2009-07-20 16:57:48 
Offline
User avatar

Joined: 2004-10-16 14:40:10
Posts: 11
Location: Latvia
Есть! :)
Огромное спасибо! ^^

_________________
Save this drama... for your mama =]


Top
   
 Post subject:
PostPosted: 2009-07-20 17:00:02 
Offline
Expert!
User avatar

Joined: 2006-02-07 08:51:40
Posts: 1348
Location: г. Старый Оскол
HaxboY wrote:
Есть! :)
Огромное спасибо! ^^

А теперь возмите мой и свой скрипт и сравните, что не так. На будующее, для нормального просмотра и редактирования скриптов советую пользоваться ссылкой из моей подписи.
Quote:
***Выставляем отступы в скриптах***©Destruction.


Top
   
Display posts from previous:  Sort by  
Post new topic  Reply to topic  [ 10 posts ] 

All times are UTC+02:00


Who is online

Users browsing this forum: No registered users and 2 guests


You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot post attachments in this forum

Search for:
Jump to:  
cron
Powered by phpBB® Forum Software © phpBB Limited