Yoko

All sides of Injection
It is currently 2026-02-22 23:35:54

Unanswered topics | Active topics


» » »

All times are UTC+02:00



Post new topic  Reply to topic  Page 1 of 1
  [ 16 posts ] 
  Print view Previous topic | Next topic 
Author Message
Kenny
PostPosted: 2005-04-16 13:20:15 
Offline
User avatar

Joined: 2005-03-31 19:22:32
Posts: 38
Location: +7, 095.
Сабж.
Только громко не ржите плз ... %)
Я в инже 0, поэтому не понимаю, почему мой мегаскрипт работать не хочет ...
Code:
sub begging() 
while NOT UO.Dead() 
UO.DeleteJournal()
UO.Useskill('Spirit Speak')
wait(5000)
UO.Useskill('Begging')
UO.Waittargetobject('ИД другого плеера')
wait(1000)
wend
end sub()


_________________
Слухи о моей смерти сильно преувеличены.
© Марк Твен
Top
   
Reply with quote  
Leo
 Post subject:
PostPosted: 2005-04-16 14:13:46 
Offline
Expert!
User avatar

Joined: 2005-01-15 19:15:05
Posts: 791
Location: Dragon World
ID-то ты прописал?

_________________
Image
Top
   
Reply with quote  
Kenny
 Post subject:
PostPosted: 2005-04-16 15:28:50 
Offline
User avatar

Joined: 2005-03-31 19:22:32
Posts: 38
Location: +7, 095.
Угу. Пишет типа ошибка в 10 строке ... :(
Line 10. Parse error.

_________________
Слухи о моей смерти сильно преувеличены.

© Марк Твен
Top
   
Reply with quote  
Immelstorn
PostPosted: 2005-04-16 15:35:49 
Offline

Joined: 2004-10-22 13:33:21
Posts: 67
Code:
end sub()

Исправь на end sub. т.е кавычки убери
Top
   
Reply with quote  
Kenny
 Post subject:
PostPosted: 2005-04-16 15:42:23 
Offline
User avatar

Joined: 2005-03-31 19:22:32
Posts: 38
Location: +7, 095.
Спасибо, работает. :D
Мой первый скрипт.)))

Еще подскажите плз, как сделать, чтобы беггинг юзался сразу после спирита, то бишь после надписи 'you failed' или 'you established'???
В теории знаю, а синтаксис еще не выучил ... :oops:

_________________
Слухи о моей смерти сильно преувеличены.

© Марк Твен
Top
   
Reply with quote  
Immelstorn
PostPosted: 2005-04-16 15:50:37 
Offline

Joined: 2004-10-22 13:33:21
Posts: 67
Code:
sub begging() 
while NOT UO.Dead() 
UO.DeleteJournal()
uo.useskill('Sp')
repeat 
wait(200) 
until UO.InJournal("You establish a connection to the netherworld.") or UO.InJournal("You fail your attempt at contacting the netherworld.")
UO.Useskill('Begging')
UO.Waittargetobject('ИД другого плеера')
wait(1000)
wend
end sub
Top
   
Reply with quote  
Kenny
 Post subject:
PostPosted: 2005-04-16 15:52:07 
Offline
User avatar

Joined: 2005-03-31 19:22:32
Posts: 38
Location: +7, 095.
Спасибо. :)

_________________
Слухи о моей смерти сильно преувеличены.

© Марк Твен
Top
   
Reply with quote  
Immelstorn
 Post subject:
PostPosted: 2005-04-16 15:53:04 
Offline

Joined: 2004-10-22 13:33:21
Posts: 67
Kenny wrote:
Спасибо. :)

пжлст
Top
   
Reply with quote  
Kenny
 Post subject:
PostPosted: 2005-04-16 16:13:29 
Offline
User avatar

Joined: 2005-03-31 19:22:32
Posts: 38
Location: +7, 095.
Еще вопрос.
Я по шаблонам намастерил скрипт на Инскрипт Фсов...
Не пашет. Пишет 'Line 6 Parse error'...
Если не задолбал еще, помогите плз.)
Code:
sub makeFS()
While NOT UO.Dead()
UO.DeleteJournal()
UO.WaitMenu ('Spell Circles', 'Seventh Circle', 'Spell Circle 7', 'Flamestrike')
UO.UseType('0x0E34')
IF UO.InJournal('You put') or UO.Journal('You failed') Then wend
end sub

Если IF поменять на While, то не происходит зацикливание ...

_________________
Слухи о моей смерти сильно преувеличены.

© Марк Твен
Top
   
Reply with quote  
Kenny
 Post subject:
PostPosted: 2005-04-16 16:56:09 
Offline
User avatar

Joined: 2005-03-31 19:22:32
Posts: 38
Location: +7, 095.
Все, разобрался.
Тока теперь, когда скрипт врубаю, УО начинает тормозить ...
Code:
sub makeFS()
Function:
UO.FindType('0x0E34')
If UO.FindCount() == 0 Then
UO.Print("There are not any blank scrolls") 
return 
Endif
UO.DeleteJournal()
UO.WaitMenu ('Spell Circles', 'Seventh Circle', 'Spell Circle 7', 'Flamestrike')
UO.UseType('0x0E34')
While NOT UO.InJournal('You put') AND NOT UO.InJournal('You fail to')
wend
Goto Function
end sub

_________________
Слухи о моей смерти сильно преувеличены.

© Марк Твен
Top
   
Reply with quote  
Immelstorn
 Post subject:
PostPosted: 2005-04-16 17:59:53 
Offline

Joined: 2004-10-22 13:33:21
Posts: 67
Code:
sub makeFS()
Function:
UO.FindType('0x0E34')
If UO.FindCount() == 0 Then
UO.Print("There are not any blank scrolls") 
return 
Endif
UO.DeleteJournal()
UO.WaitMenu ('Spell Circles', 'Seventh Circle', 'Spell Circle 7', 'Flamestrike')
UO.UseType('0x0E34')
While NOT UO.InJournal('You put') AND NOT UO.InJournal('You fail to')
wait(200)
wend
Goto Function
end sub
Top
   
Reply with quote  
Kenny
 Post subject:
PostPosted: 2005-04-16 18:42:40 
Offline
User avatar

Joined: 2005-03-31 19:22:32
Posts: 38
Location: +7, 095.
Пасиб. %)

_________________
Слухи о моей смерти сильно преувеличены.

© Марк Твен
Top
   
Reply with quote  
Edred
PostPosted: 2005-04-17 00:26:02 
Offline
Expert!

Joined: 2004-04-03 17:36:29
Posts: 2544
Location: Saint-Petersburg
Immelstorn wrote:
Code:
UO.Useskill('Begging')
UO.Waittargetobject('ИД другого плеера')


Вот эти две строки надо поменять местами. Сначала ставим ловушку прицела, потом даем команду, этот прицел посылающую. Всегда так, а не наоборот.
Top
   
Reply with quote  
Kenny
 Post subject:
PostPosted: 2005-04-17 08:35:56 
Offline
User avatar

Joined: 2005-03-31 19:22:32
Posts: 38
Location: +7, 095.
Fixed.
Snx.

_________________
Слухи о моей смерти сильно преувеличены.

© Марк Твен
Top
   
Reply with quote  
Destruction
 Post subject:
PostPosted: 2005-04-20 18:07:54 
Offline
Junior Expert
User avatar

Joined: 2004-06-24 22:08:56
Posts: 3220
Kenny wrote:
Fixed.
Snx.

А работало? :twisted:
Top
   
Reply with quote  
Edred
 Post subject:
PostPosted: 2005-04-20 22:56:49 
Offline
Expert!

Joined: 2004-04-03 17:36:29
Posts: 2544
Location: Saint-Petersburg
Destruction wrote:
Kenny wrote:
Fixed.
Snx.

А работало? :twisted:


Наверняка работало. Просто на первом круге выдавало ошибку, а потом на каждом круге использовало прицел от предыдущего.
Top
   
Reply with quote  
Display posts from previous:  Sort by  
Post new topic  Reply to topic  Page 1 of 1
  [ 16 posts ] 

» » »

All times are UTC+02:00

Who is online

Users browsing this forum: Bing [Bot] 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:  
Powered by phpBB® Forum Software © phpBB Limited