Page 1 of 1
Плз дайте скрипт на экстреный рекол(с инвиз щитом)
Posted: 2007-01-17 11:09:22
by simple
Что бы когда инвиз щит одеваеш и пытаешся отреколится, если раздетекчиваешся то автоматом щит передёргивался и опять вставал в инвиз
Posted: 2007-01-17 12:55:16
by Nmy
Code: Select all
sub main()
UO.FindType('0x1B7A','0x0427','backpack')
If UO.FindCount() then
UO.Print(' Hameleon Shield ')
UO.UseObject('finditem')
Else
UO.FindType('0x182D','0x08FA','backpack')
If UO.FindCount() then
UO.Print(' Invisibility ')
UO.UseObject('finditem')
Endif
end sub
Posted: 2007-01-17 13:13:17
by simple
NMY wrote:Code: Select all
sub main()
UO.FindType('0x1B7A','0x0427','backpack')
If UO.FindCount() then
UO.Print(' Hameleon Shield ')
UO.UseObject('finditem')
Else
UO.FindType('0x182D','0x08FA','backpack')
If UO.FindCount() then
UO.Print(' Invisibility ')
UO.UseObject('finditem')
Endif
end sub
Здесь не чего вставлять не надо просто копируеш и вставляеш в инжу
Posted: 2007-01-17 13:34:38
by Nmy
смотря где ты играеш
скрипт юзает щит если нету ищет инвизку
Posted: 2007-01-17 13:37:44
by simple
Играю на Old Oskom free
Какие и где координаты вставлять?
Posted: 2007-01-17 14:09:27
by Nmy
simple wrote:Играю на Old Oskom free
Какие и где координаты вставлять?
тебе нужен другой скрипт... мне лень
Posted: 2007-01-17 15:54:51
by Savage
Если реколишься руками то вот те инвизилка:
Code: Select all
sub pipec()
VAR X,Y
UO.Arm('inviz')
X=UO.GetX()
Y=UO.GetY()
While X==UO.GetX() AND Y==UO.GetY()
While NOT UO.Hidden()
; UO.DisArm()
wait(300)
UO.Arm('inviz')
; wait(300)
Wend
wait(300)
Wend
end sub
одеваешь свой щит и пишешь в клиенете: ,setarm inviz потом сэйв на майн вкладке.
Если передергивать не будет то убери точку с запятой перед командой disarm.
Скрипт перестает работать после смены позиции чара так что если сделал шаг или отреколился, то скрипт выключился.