Плз дайте скрипт на экстреный рекол(с инвиз щитом)

Ask for scripts here

Moderators: Murderator+, Murderator

Post Reply
simple
Posts: 44
Joined: 2007-01-12 11:20:33
Location: I see You

Плз дайте скрипт на экстреный рекол(с инвиз щитом)

Post by simple »

Что бы когда инвиз щит одеваеш и пытаешся отреколится, если раздетекчиваешся то автоматом щит передёргивался и опять вставал в инвиз
Nmy
Expert!
Posts: 2152
Joined: 2005-09-14 15:31:58
Location: Latvia

Post 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
simple
Posts: 44
Joined: 2007-01-12 11:20:33
Location: I see You

Post 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



Здесь не чего вставлять не надо просто копируеш и вставляеш в инжу
Nmy
Expert!
Posts: 2152
Joined: 2005-09-14 15:31:58
Location: Latvia

Post by Nmy »

смотря где ты играеш

скрипт юзает щит если нету ищет инвизку
simple
Posts: 44
Joined: 2007-01-12 11:20:33
Location: I see You

Post by simple »

Играю на Old Oskom free


Какие и где координаты вставлять?
Nmy
Expert!
Posts: 2152
Joined: 2005-09-14 15:31:58
Location: Latvia

Post by Nmy »

simple wrote:Играю на Old Oskom free


Какие и где координаты вставлять?


тебе нужен другой скрипт... мне лень :roll:
Savage
Expert!
Posts: 1205
Joined: 2004-04-04 11:13:54
Location: Балаково, Саратовская обл.
Contact:

Post 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.

Скрипт перестает работать после смены позиции чара так что если сделал шаг или отреколился, то скрипт выключился.
Post Reply