Page 1 of 1
Spirit Speak
Posted: 2004-12-18 10:06:08
by Irbis
Помогите! При использовании скрипта выдает ошибку "Функшн нот фоунд - ABS". ПОдскажите, где исправить?
Хочется, чтобы пытался приконектиться к миру духов, если последний удачный конект был не менее 5 минут назад.
Вот скрипт:
sub SptSpk()
var T1
var T2
T1=uo.Timer()
T2=uo.GetGlobal('spirittimer')
if abs(T1-val(T2))>600 then
uo.SetGlobal('spirittimer',str(T1))
uo.Print('>Spirit Speak.')
uo.UseSkill('Spirit Speak')
wait(3000)
end if
end sub
Заранее спасибо.
Re: Spirit Speak
Posted: 2004-12-18 13:25:56
by AlexeyVorotnikov
Irbis wrote:Помогите! При использовании скрипта выдает ошибку "Функшн нот фоунд - ABS". ПОдскажите, где исправить?
Функции abs нет в стандартной поставке инжекта. Её необходимо написать самому. Например, так:
Code: Select all
sub abs(a)
if a < 0 then
return -a
else
return a
endif
end sub
Posted: 2004-12-26 20:16:40
by Oymal
А куда это всунуть?
Posted: 2005-01-13 07:30:56
by maximka4
Oymal wrote:А куда это всунуть?
sub main()
sub NechegoDelat()
SpSpeak()
VAR SpiritTime = UO.Timer()
repeat
If ( UO.Timer() - SpiritTime ) / 600 > 5 Then
; Ïðîøëî 5 ìèíóò ñ ìîìåíòà ïîñëåäíåé ïðîêà÷êè Spirit Speak
SpSpeak()
SpiritTime = UO.Timer()
Else
wait(500)
Endif
until UO.Dead()
endsub
; Spirit Speak v.1.00b (c) Edred
;
; Ðàçîâàÿ ïðîêà÷êà ñïèðèò ñïèêà. Ïðåäíàçíà÷åíà äëÿ âûçîâà èç äðóãèõ ñêðèïòîâ.
;
Sub SpSpeak()
VAR mod = UO.WarMode(), num1
VAR fizzle = 'You fail your attempt'
VAR success = 'You establish a connection'
UO.WarMode( 0 )
uo.DeleteJournal()
repeat
uo.DeleteJournal( fizzle )
UO.UseSkill( 'Spirit Speak' )
num1 = 1
repeat
wait(100)
num1 = num1 + 1
until UO.InJournal( fizzle ) OR UO.InJournal( success ) OR num1 > 600
until UO.InJournal( success )
UO.WarMode( mod )
endsub
[code][/code]вот супер скрипт, конектится к духам черезкаждые 5 мин.
Posted: 2005-01-13 07:45:03
by fr33s
А есть в инже какая-то команда типа "send *нажатие клавиши*" ?
ИМХО спирит легче юзать через юзскилл спирит спик )
Posted: 2005-01-13 08:56:50
by 666Man666
fr33s wrote:А есть в инже какая-то команда типа "send *нажатие клавиши*" ?
ИМХО спирит легче юзать через юзскилл спирит спик )
uo.press() вроде... тока зачем тибе это?
Re: Spirit Speak
Posted: 2005-01-15 02:32:51
by kuviCk
Irbis wrote:Помогите! При использовании скрипта выдает ошибку "Функшн нот фоунд - ABS". ПОдскажите, где исправить?
Хочется, чтобы пытался приконектиться к миру духов, если последний удачный конект был не менее 5 минут назад.
Вот скрипт:
sub SptSpk()
var T1
var T2
T1=uo.Timer()
T2=uo.GetGlobal('spirittimer')
if abs(T1-val(T2))>600 then
uo.SetGlobal('spirittimer',str(T1))
uo.Print('>Spirit Speak.')
uo.UseSkill('Spirit Speak')
wait(3000)
end if
end sub
Заранее спасибо.
Нах те такой скрипт то вот просто и не нада париться !!
Code: Select all
sub SpiritSpeak()
repeat
uo.UseSkill('Spirit Speak')
wait(5000)
until uo.Dead()
end sub
Re: Spirit Speak
Posted: 2005-01-15 12:25:27
by Edred
Cooler! wrote:Нах те такой скрипт то вот просто и не нада париться !!
Code: Select all
sub SpiritSpeak()
repeat
uo.UseSkill('Spirit Speak')
wait(5000)
until uo.Dead()
end sub
То есть если физл коннекта, он все равно будет ждать 5 минут прежде чем снова попытаться... Мда уж, так ты много накачаешь...