Page 1 of 1

Помогите сделать скрипт для ПвП

Posted: 2009-02-11 19:20:43
by mAdy
:)

Re: Помогите сделать скрипт для ПвП

Posted: 2009-02-11 19:23:46
by mAdy
Кто может помочь в написании такого скрипта для пвп приведу пример что должен делать скрипт, так как я в этом деле не очень понимаю...

СКРИПТ ДОЛЖЕН ВЫПОЛНЯТЬ ТАКИЕ ФУНКЦИИ



if injournal You fell poison
uo.msg ,exec armor1
(wait)50
uo.msg ,exec armor2
if injournal you see name protect flame
uo.msg ,exec shield+mace
если lastattack на ростоянии дальше чем 2 клетки
uo.msg exec Bow
если lastattack ближе чем на 2 клетки
uo.msg ,exec shield+mace
если хп перса меньше 150
uo.msg ,exec invis

Posted: 2009-02-11 19:37:51
by Savage
Ну ты уже практически сам всё сделал. Осталось записать операторы как того требует синтаксис.

Posted: 2009-02-11 19:42:40
by mAdy
Savage wrote:Ну ты уже практически сам всё сделал. Осталось записать операторы как того требует синтаксис.


так вот и прошу чтобы мне помогли сделать это , так как я в этом пока мало что знаю только учюсь

Posted: 2009-02-11 20:21:43
by Savage
Тогда что то типа того должно получиться. Предварительно запомнить и записать в инже наборы оружия и одежды. Инвиз либо делаем отдельным скриптом либо юзаем бутыль или каст - хз как у вас там.

Code: Select all

sub zzz()
   Repeat

      If UO.InJournal("You fell poison") Then
         UO.Dress('armor1')
         wait(100)
         UO.Dress('armor2')
      Endif

      If UO.InJournal("you see name protect flame") Then
         UO.Arm('shield_mace')
      Endif

      If UO.GetDistance('lastattack')>2 Then
         UO.Arm('Bow')
      Else
         UO.Arm('shield_mace')
      Endif

      If UO.Life<150 Then
         invis()
      Endif

      wait(100)

   Until UO.Dead()
end sub

Posted: 2009-02-11 20:31:48
by mAdy
invis бутли

Posted: 2009-02-11 20:33:03
by mAdy
Спасибо за помощь :D

Posted: 2009-02-11 21:06:07
by Savage
Тогда вместо invis() ставь:

Code: Select all

UO.UseType('тип инвиза','цвет инвиза')
wait(3000) ; тут задержку на хил или рекол, подобрать.

Posted: 2009-02-11 22:19:03
by mAdy
Слушай тут такая трабла что он когда таргет отходит от меня то она все время пишет Bow, как сделать чтобы оно не писало может можно как-то чтобы когда он отходил оно один раз написало одеть лук когда подходит чтобы один раз писало одеть мейсу?

Posted: 2009-02-11 22:26:37
by mAdy

Code: Select all

sub zzz() 
   Repeat
      If UO.InJournal("You fell poison") Then
         UO.Say(',exec acid')
         wait(100)
         UO.Say(',exec devil')
      Endif
      If UO.InJournal("you see name protect flame") Then
         UO.Say(',exec holly')
      Endif
      If UO.GetDistance('lastattack')>2 Then
         UO.Say(',exec archery')
          Endif
          If UO.GetDistance('lastattack')<2 Then
     UO.Say(',exec mace')
         Endif   
      If UO.Life<150 Then
    uo.usetype(0x0F0E)  # invizka
      Endif
      wait(100)
   Until UO.Dead()
end sub

dвот так работает только повторяет команду одеть лук когда он отходит и повторяет команду одеть мейсу когда подходит..
можно ли сделать так чтобы оно не флудило ?

Posted: 2009-02-12 15:03:56
by Savage
Тебя только флуд парит или при этом сбивает замах?

Posted: 2009-02-12 15:31:49
by Savage

Code: Select all

sub zzz() 
   VAR Trigger=2
   Repeat
      If UO.InJournal("You fell poison") Then
         UO.Say(',exec acid')
         wait(100)
         UO.Say(',exec devil')
      Endif
      If UO.InJournal("you see name protect flame") Then
         UO.Say(',exec holly')
      Endif
      If UO.GetDistance('lastattack')>2 AND Trigger<>1 Then
         UO.Say(',exec archery')
         Trigger=1
      Endif
      If UO.GetDistance('lastattack')<2 AND Trigger<>2 Then
         UO.Say(',exec mace')
         Trigger=2
      Endif   
      If UO.Life<150 Then
         uo.usetype(0x0F0E)  # invizka
      Endif
      wait(100)
   Until UO.Dead()
end sub

Posted: 2009-02-12 19:54:23
by mAdy
Всё Работоет Агромное Спасибо тебе :) :D

Posted: 2009-02-12 20:12:02
by mAdy
А можно ли сделать так чтобы когда ластаттак отбегает за зону видимости он обратно брал щит и мечь лишь только когда он допустим на расстоянии от меня от 2 до 7 клеток он юзал лук ? если можно то этому скрипту цены нет :)

Спрашеваю потому что когда он отбегает я стою с луком и мне идет флуд не видно таргет и из за этого флуда почемуто не лечится.

Posted: 2009-02-13 10:24:57
by Savage

Code: Select all

sub zzz() 
   VAR Trigger=2
   Repeat
      If UO.InJournal("You fell poison") Then
         UO.Say(',exec acid')
         wait(100)
         UO.Say(',exec devil')
      Endif
      If UO.InJournal("you see name protect flame") Then
         UO.Say(',exec holly')
      Endif
      If UO.GetDistance('lastattack')>2 AND UO.GetDistance('lastattack')<=7 AND Trigger<>1 Then
         UO.Say(',exec archery')
         Trigger=1
      Endif
      If UO.GetDistance('lastattack')<=2 AND UO.GetDistance('lastattack')>7 AND Trigger<>2 Then
         UO.Say(',exec mace')
         Trigger=2
      Endif   
      If UO.Life<150 Then
         uo.usetype(0x0F0E)  # invizka
      Endif
      wait(100)
      While UO.GetDistance('lastattack')>7
         wait(200)
      Wend
   Until UO.Dead()
end sub

Posted: 2009-02-22 17:38:24
by mAdy
Спасибо :D

Posted: 2009-03-04 16:37:31
by SilentCry
2 mady пожалуйста об*ясни по пунктах что етот скрипт делает и чем тебе в пвп попомгает! А то ты так радуешься, иожет еще мне поможет! Плизз!

Posted: 2009-03-05 13:07:05
by +GhosT+
Как я понел скрипт на то что дерешься с чаром, хп меньше 150 выпьешь инвиз(типо спрятался) и если чар которого бьешь убегает от тебя ты тупо достаешь лук и растреливаешь его !