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

Ошибка в ПвПшном скрипте!
http://forum.yoko.com.ua/viewtopic.php?f=20&t=7671		 Page 1 of 1
Author:  ДРВ [ 2006-05-13 13:28:57 ]
Post subject:  Ошибка в ПвПшном скрипте!
Code:
sub WoS() 
VAR scrol='0x1F44'# Òèï ñâèòêà
if uo.waiting() then 
uo.canceltarget() 
endif
UO.FindType(scrol)
If UO.FindCount() > 0 then
UO.UseObject('finditem')
UO.Print("Scroll") 
else
if uo.mana > 30 then 
UO.Exec("cast 'Wall of Stone'") 
UO.Print("Cast") 
else 
UO.Print("Ìàíà êîí÷èëàñü!!") 
endif

показывает ошибку в
Code:
VAR scrol='0x1F44'# Òèï ñâèòêà
Author:  Scripts Writer [ 2006-05-13 13:38:20 ]
Post subject: 
ну и в чём выражается твоя ошибка? =\
Author:  ДРВ [ 2006-05-13 13:44:46 ]
Post subject: 
You Must Die wrote:
ну и в чём выражается твоя ошибка? =\

Line 510: Variable already defined - SCROL
Author:  Qwart [ 2006-05-13 13:57:39 ]
Post subject: 
Может у тебя где-нидь ниже по скрипту ещё раз встречается
переменная scrol?
Из-за того, что их несколько возникает ошибка.[/code]
Author:  ДРВ [ 2006-05-13 14:04:52 ]
Post subject: 
Qwart wrote:
Может у тебя где-нидь ниже по скрипту ещё раз встречается
переменная scrol?
Из-за того, что их несколько возникает ошибка.[/code]
ну у меня 3 похожих скрипта........
Author:  Kynep [ 2006-05-13 14:15:57 ]
Post subject:  Re: Ошибка в ПвПшном скрипте!
ДРВ wrote:
Code:
sub WoS() 
VAR scrol='0x1F44'# Òèï ñâèòêà
if uo.waiting() then 
uo.canceltarget() 
endif
UO.FindType(scrol)
If UO.FindCount() > 0 then
UO.UseObject('finditem')
UO.Print("Scroll") 
else
if uo.mana > 30 then 
UO.Exec("cast 'Wall of Stone'") 
UO.Print("Cast") 
else 
UO.Print("Ìàíà êîí÷èëàñü!!") 
endif

показывает ошибку в
Code:
VAR scrol='0x1F44'# Òèï ñâèòêà


У тебя IF THEN не закрыт:
Code:
If UO.FindCount() > 0 then 
UO.UseObject('finditem') 
UO.Print("Scroll") 
else 
if uo.mana > 30 then 
UO.Exec("cast 'Wall of Stone'") 
UO.Print("Cast") 
else 
UO.Print("Ìàíà êîí÷èëàñü!!") 
endif 
endif 
end sub

во первых, а во вторых end sub не забудь ) :roll:
Author:  Qwart [ 2006-05-13 14:16:41 ]
Post subject: 
ДРВ wrote:
Qwart wrote:
Может у тебя где-нидь ниже по скрипту ещё раз встречается
переменная scrol?
Из-за того, что их несколько возникает ошибка.[/code]
ну у меня 3 похожих скрипта........


ну тогда делай var scrol, var scrol1, var scrol2.. и в скриптах тогда меняй
Uo.findtype(scrol), Uo.findtype(scrol1), Uo.findtype(scrol2)
Author:  Cant StoP [ 2006-05-14 09:25:42 ]
Post subject:  Re: Ошибка в ПвПшном скрипте!
[quote="Cooper"][/quote]

Истину глаголишь :)
Author:  Volk [ 2006-08-19 18:46:47 ]
Post subject: 
А у меня та же проблема, только таких же переменных нету нигде в скрипте, раньше работал, НО, после того, как поменял другую процедуру, эта перестала работать =(
Code:
sub findnearest()
Dim Targ[10]
Dim TEn[10]
var n,i,SerialEnemy,nearest,nearestn
UO.Exec('set finddistance 15')
UO.Ignore('self')
n=2

UO.FindType( '0x0032', '-1', 'ground' )
i=UO.FindCount()
Targ[1]=UO.GetDistance(UO.GetSerial('finditem'))
TEn[1] = UO.GetSerial('finditem')
while n<i          
         UO.FindType('0x0032', '-1', 'ground' )
                If UO.FindCount() > 0 Then
                
            
            
            SerialEnemy = UO.GetSerial('finditem')
            
            TEn[n] = SerialEnemy
            UO.Ignore('finditem')
               
            Targ[n]=UO.GetDistance(SerialEnemy)
            UO.Say(str(Targ[n]))
            else 
            UO.IgnoreReset()
            end if
n=n+1
wend
UO.IgnoreReset()
n=1
nearestn=1
while n<i and n < 9
if Targ[n]<Targ[n+1] then
nearest=Targ[n]
nearestn=n
endif
n=n+1
wend
return TEn[nearestn]
endif
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/