Yoko
http://forum.yoko.com.ua/

Spirit Speak
http://forum.yoko.com.ua/viewtopic.php?f=20&t=2277		 Page 1 of 1
Author:  Irbis [ 2004-12-18 10:06:08 ]
Post subject:  Spirit Speak
Помогите! При использовании скрипта выдает ошибку "Функшн нот фоунд - 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

Заранее спасибо.
Author:  AlexeyVorotnikov [ 2004-12-18 13:25:56 ]
Post subject:  Re: Spirit Speak
Irbis wrote:
Помогите! При использовании скрипта выдает ошибку "Функшн нот фоунд - ABS". ПОдскажите, где исправить?


Функции abs нет в стандартной поставке инжекта. Её необходимо написать самому. Например, так:
Code:
sub abs(a) 
  if a < 0 then 
    return -a 
  else 
    return a 
  endif 
end sub
Author:  Oymal [ 2004-12-26 20:16:40 ]
Post subject: 
А куда это всунуть?
Author:  maximka4 [ 2005-01-13 07:30:56 ]
Post subject: 
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 мин.
Author:  fr33s [ 2005-01-13 07:45:03 ]
Post subject: 
А есть в инже какая-то команда типа "send *нажатие клавиши*" ?
ИМХО спирит легче юзать через юзскилл спирит спик )
Author:  666Man666 [ 2005-01-13 08:56:50 ]
Post subject: 
fr33s wrote:
А есть в инже какая-то команда типа "send *нажатие клавиши*" ?
ИМХО спирит легче юзать через юзскилл спирит спик )

uo.press() вроде... тока зачем тибе это?
Author:  kuviCk [ 2005-01-15 02:32:51 ]
Post subject:  Re: Spirit Speak
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:
sub SpiritSpeak()
repeat
uo.UseSkill('Spirit Speak')
wait(5000)
until uo.Dead()
end sub
Author:  Edred [ 2005-01-15 12:25:27 ]
Post subject:  Re: Spirit Speak
Cooler! wrote:
Нах те такой скрипт то вот просто и не нада париться !!
Code:
sub SpiritSpeak()
repeat
uo.UseSkill('Spirit Speak')
wait(5000)
until uo.Dead()
end sub


То есть если физл коннекта, он все равно будет ждать 5 минут прежде чем снова попытаться... Мда уж, так ты много накачаешь...
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/