Re: помогите пжслта с атакои
Posted: 2010-03-31 22:41:12
Спасибо. Регистр имеет значение Sub sub вчем разница он и так и так читает? Если Sub писать он их просто прячет
Code: Select all
until ((timeLeft>0) OR (timeout<=0)) AND (UO.GetSerial(name)=='0x00000000')### Я NOT убрал нафига он, есть ведь '==' +)Ж
Code: Select all
until ((timeLeft>0) OR (timeout<=0)) AND (UO.GetSerial(name)<>'0x00000000')
Code: Select all
Sub addObjectWait(name,timeout)
var timeLeft
repeat
UO.AddObject(name,0)
if UO.waiting() then
UO.canceltarget()
endif
uo.AddObject(name)
timeLeft = timeout
while (NOT UO.Targeting()) AND (timeLeft>0)
wait(50)
timeLeft = timeLeft -50
wend
while (UO.Targeting()) AND (timeLeft>0)
wait(50)
timeLeft = timeLeft -50
wend
until (timeLeft>0) OR (timeout<=0) AND (UO.GetSerial(name)<>'0x00000000')
return UO.GetSerial(name)
Endsub
Code: Select all
Sub addOrGetObject(name,distance,timeout)
var oldObject = UO.GetSerial(name)
if (( oldObject<>('0x00000000')) AND (UO.GetDistance(oldObject)<=distance) OR (distance==-1)) then
return oldObject
else
return addObjectWait(name,timeout)
endif
Endsub