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 выпьешь инвиз(типо спрятался) и если чар которого бьешь убегает от тебя ты тупо достаешь лук и растреливаешь его !