Yoko

All sides of Injection
It is currently 2025-11-07 23:03:39

Unanswered topics | Active topics


» » »

All times are UTC+02:00



Post new topic  Reply to topic  Page 1 of 1
  [ 9 posts ] 
  Print view Previous topic | Next topic 
Author Message
MeLFiS
PostPosted: 2008-01-03 20:36:06 
Offline

Joined: 2007-06-08 11:44:35
Posts: 80
Code:
sub inckript() 
VAR bl = '0x0e34' 
VAR sb = '0x0efa'


   while not uo.Dead()
     uo.useskill('Inscription') 
     uo.waittargetobject('_'+bl, '_'+sb) 
     uo.automenu('Select a circle to inscribe', 'Circle 3 spells') 
     uo.automenu('Select a spell to inscribe',  'Poison')
     while not uo.InJournal('You create the scroll and put it in your backpack') or uo.InJournal('You fail and destroy the scroll') or uo.InJournal('you fail')
     wait(100)
  wend
 wend
end sub


Что здесь может быть не правельно помогите доделать
Top
   
Reply with quote  
Kynep
PostPosted: 2008-01-03 21:31:37 
Offline
Expert!
User avatar

Joined: 2006-02-07 08:51:40
Posts: 1348
Location: г. Старый Оскол
MeLFiS wrote:
Code:
sub inckript() 
VAR bl = '0x0e34' 
VAR sb = '0x0efa'
     uo.automenu('Select a circle to inscribe', 'Circle 3 spells') 
     uo.automenu('Circle 3 spells',  'Poison')

   while not uo.Dead()
     uo.waittargettype(bl) 
     wait(500)
     uo.useskill('Inscription') 
     while not uo.InJournal('You create the scroll and put it in your backpack') or uo.InJournal('You fail and destroy the scroll') or uo.InJournal('you fail')
     wait(100)
  wend
 wend
end sub


Что здесь может быть не правельно помогите доделать
Top
   
Reply with quote  
MeLFiS
 Post subject:
PostPosted: 2008-01-04 15:05:21 
Offline

Joined: 2007-06-08 11:44:35
Posts: 80
Code:
sub inckript() 
VAR bl = '0x0e34' 
VAR sb = '0x0efa' 
     uo.automenu('Select a circle to inscribe', 'Circle 3 spells')
     uo.automenu('Select a spell to inscribe',  'Poison') 

   while not uo.Dead() 
     uo.waittargetobject('_'+bl, '_'+sb)  
     wait(500) 
     uo.useskill('Inscription') 
     while not uo.InJournal('You create the scroll and put it in your backpack') or uo.InJournal('You fail and destroy the scroll') or uo.InJournal('you fail') 
     wait(100) 
  wend 
 wend 
end sub



Я подправил немножко токо тепер нада с журналом чтото зделать а то он 1 раз делает а дальше не хочет
Top
   
Reply with quote  
Kynep
 Post subject:
PostPosted: 2008-01-04 15:10:53 
Offline
Expert!
User avatar

Joined: 2006-02-07 08:51:40
Posts: 1348
Location: г. Старый Оскол
Code:
sub inckript() 
VAR bl = '0x0e34' 
VAR sb = '0x0efa' 
     uo.automenu('Select a circle to inscribe', 'Circle 3 spells')
     uo.automenu('Select a spell to inscribe',  'Poison') 

   while not uo.Dead() 
    UO.DeleteJournal()
     uo.waittargetobject('_'+bl, '_'+sb)  
     wait(500) 
     uo.useskill('Inscription') 
     while not uo.InJournal('You create the') or uo.InJournal('You fail and')
     wait(100) 
  wend 
 wend 
end sub
Top
   
Reply with quote  
MeLFiS
 Post subject:
PostPosted: 2008-01-04 20:41:59 
Offline

Joined: 2007-06-08 11:44:35
Posts: 80
вписал я свои настройки в журнал всеравно 1 раз делает и все
Top
   
Reply with quote  
MeLFiS
 Post subject:
PostPosted: 2008-01-04 20:57:52 
Offline

Joined: 2007-06-08 11:44:35
Posts: 80
Code:
sub inckript() 
VAR bl = '0x0e34' 
VAR sb = '0x0efa' 
     uo.automenu('Select a circle to inscribe', 'Circle 3 spells') 
     uo.automenu('Select a spell to inscribe',  'Poison') 

   while not uo.Dead() 
    UO.DeleteJournal()
    repeat
     uo.waittargetobject('_'+bl, '_'+sb)  
     wait(500) 
     uo.useskill('Inscription') 
     while not uo.InJournal('You fail') or uo.InJournal('"You create') 
     wait(100) 
  wend
  If UO.InJournal("You fail and destroy the scroll") and uo.InJournal("You create the scroll and put it in your backpack") then 
repeat
 wait(500)
 wend 
end sub


Дописал еше такое токо вот не знаю как тепер
Code:
  If UO.InJournal("You fail and destroy the scroll") and uo.InJournal("You create the scroll and put it in your backpack")

Токо тепер он начинает заного если пишетса 1 а если 2 то он не чего не делает как правильно написать чтобы при 2 тоже наченал заного
Top
   
Reply with quote  
stickman
 Post subject:
PostPosted: 2008-01-04 21:40:10 
Offline
User avatar

Joined: 2005-04-05 04:13:24
Posts: 139
Location: DRW
while wend repeat... 8) все перепутано, напутано...брр
Top
   
Reply with quote  
Kynep
 Post subject:
PostPosted: 2008-01-04 22:04:39 
Offline
Expert!
User avatar

Joined: 2006-02-07 08:51:40
Posts: 1348
Location: г. Старый Оскол
MeLFiS wrote:
Code:
sub inckript() 
VAR bl = '0x0e34' 
VAR sb = '0x0efa' 
     uo.automenu('Select a circle to inscribe', 'Circle 3 spells') 
     uo.automenu('Select a spell to inscribe',  'Poison') 

   while not uo.Dead() 
    UO.DeleteJournal()
     uo.waittargetobject('_'+bl, '_'+sb)  
     wait(500) 
     uo.useskill('Inscription') 
     while not uo.InJournal('You fail') or uo.InJournal('"You create') 
     wait(100) 
     wend
  wend 
end sub



Блин я же тебе написал, пробуй. Если хоцца своих сообщений то исправь, текущие на свои.
Top
   
Reply with quote  
MeLFiS
 Post subject:
PostPosted: 2008-01-05 01:35:37 
Offline

Joined: 2007-06-08 11:44:35
Posts: 80
все я нашол вчем проблема можете тепер помоч чтобы он медетировал када маны не будет
Top
   
Reply with quote  
Display posts from previous:  Sort by  
Post new topic  Reply to topic  Page 1 of 1
  [ 9 posts ] 

» » »

All times are UTC+02:00

Who is online

Users browsing this forum: No registered users and 8 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