Post Reply 
 
Thread Rating:
  • 0 Vote(s) - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
Exori / Gran WITH PARTY MEMBER ON SCREEN
11-20-2020, 06:29 PM
Post: #1
Exori / Gran WITH PARTY MEMBER ON SCREEN
I NEED A MACRO FOR GIVE EXORI / GRAN WITH PARTY MEMBER ON SCREEN BUT IF COME A PLAYER WITHOUT PARTY STOP EXORI

IS POSSIBLE?

THANK!
Give Reputation to this user
Find all posts by this user
Quote this message in a reply
11-20-2020, 06:49 PM (This post was last modified: 11-20-2020 06:51 PM by erleo.)
Post: #2
RE: Exori / Gran WITH PARTY MEMBER ON SCREEN
[Party] Exori (auto: 500ms)
500 {[Party] Exori} Wait:=1 VarMult(Wait, 6) Creatures.ByRangeName(3, Omar)==0 [EXORI] Creatures.PlayersOnRange(3)>=2 [EXORI] Time:=0 Self.Attacking()==1 Creature.DistanceToSelf(:TargetID)<=3 Self.Mana()>=80 Self.Say(exori ico) Self.Say(exori hur) Exit() Exit() {EXORI} VarAdd(Time, 1) Status.InPZ()==0 Creatures.ByRangeName(3, Omar)==1 [EXORI 2] Creatures.PlayersOnRange(3)<=2 [SPELLS RANGE] !Mobs>=2 [SPELLS RANGE] !Time!>=!Wait! Self.Mana()>=115 Self.Say(exori) Self.Mana()>=340 Self.Say(exori gran) Exit() {EXORI 2} VarAdd(Time, 1) Status.InPZ()==0 Creatures.ByRangeName(3, Omar)==0 Creatures.PlayersOnRange(3)==1 !Mobs>=2 [SPELLS RANGE] !Time!>=!Wait! Self.Mana()>=115 Self.Say(exori) Self.Mana()>=340 Self.Say(exori gran) Exit() {SPELLS RANGE} Self.Attacking()==1 Creature.DistanceToSelf(:TargetID)<=3 Self.Mana()>=80 Self.Say(exori ico) Self.Say(exori hur) Exit()


Mobs Counter (auto: 50ms)
50 {Mobs Counter} Mob1:=Creatures.ByRangeName(7, Renegade Knight) Mob2:=Creatures.ByRangeName(7, Vile Grandmaster) Mob3:=Creatures.ByRangeName(7, Vicious Squire) Mob4:=Creatures.ByRangeName(7, Blood Priest) Mob5:=Creatures.ByRangeName(7, Undead Gladiator) Mob6:=Creatures.ByRangeName(7, Lich) Mob7:=Creatures.ByRangeName(7, Hero) Mobs:=!Mob1 VarAdd(Mobs, !Mob2) VarAdd(Mobs, !Mob3) VarAdd(Mobs, !Mob4) VarAdd(Mobs, !Mob5) VarAdd(Mobs, !Mob6) VarAdd(Mobs, !Mob7)


Just edit the name "OMAR" for your second character or party member and change the monster names from mobs counter macro.
Give Reputation to this user
Find all posts by this user
Quote this message in a reply
11-22-2020, 12:17 AM (This post was last modified: 11-22-2020 12:17 AM by mostppl.)
Post: #3
RE: Exori / Gran WITH PARTY MEMBER ON SCREEN
(11-20-2020 06:49 PM)erleo Wrote:  
[Party] Exori (auto: 500ms)
500 {[Party] Exori} Wait:=1 VarMult(Wait, 6) Creatures.ByRangeName(3, Omar)==0 [EXORI] Creatures.PlayersOnRange(3)>=2 [EXORI] Time:=0 Self.Attacking()==1 Creature.DistanceToSelf(:TargetID)<=3 Self.Mana()>=80 Self.Say(exori ico) Self.Say(exori hur) Exit() Exit() {EXORI} VarAdd(Time, 1) Status.InPZ()==0 Creatures.ByRangeName(3, Omar)==1 [EXORI 2] Creatures.PlayersOnRange(3)<=2 [SPELLS RANGE] !Mobs>=2 [SPELLS RANGE] !Time!>=!Wait! Self.Mana()>=115 Self.Say(exori) Self.Mana()>=340 Self.Say(exori gran) Exit() {EXORI 2} VarAdd(Time, 1) Status.InPZ()==0 Creatures.ByRangeName(3, Omar)==0 Creatures.PlayersOnRange(3)==1 !Mobs>=2 [SPELLS RANGE] !Time!>=!Wait! Self.Mana()>=115 Self.Say(exori) Self.Mana()>=340 Self.Say(exori gran) Exit() {SPELLS RANGE} Self.Attacking()==1 Creature.DistanceToSelf(:TargetID)<=3 Self.Mana()>=80 Self.Say(exori ico) Self.Say(exori hur) Exit()


Mobs Counter (auto: 50ms)
50 {Mobs Counter} Mob1:=Creatures.ByRangeName(7, Renegade Knight) Mob2:=Creatures.ByRangeName(7, Vile Grandmaster) Mob3:=Creatures.ByRangeName(7, Vicious Squire) Mob4:=Creatures.ByRangeName(7, Blood Priest) Mob5:=Creatures.ByRangeName(7, Undead Gladiator) Mob6:=Creatures.ByRangeName(7, Lich) Mob7:=Creatures.ByRangeName(7, Hero) Mobs:=!Mob1 VarAdd(Mobs, !Mob2) VarAdd(Mobs, !Mob3) VarAdd(Mobs, !Mob4) VarAdd(Mobs, !Mob5) VarAdd(Mobs, !Mob6) VarAdd(Mobs, !Mob7)


Just edit the name "OMAR" for your second character or party member and change the monster names from mobs counter macro.

Thank BRO.. I Give Reputation
Give Reputation to this user
Find all posts by this user
Quote this message in a reply
11-28-2020, 03:56 PM
Post: #4
RE: Exori / Gran WITH PARTY MEMBER ON SCREEN
Bros, is there any way to cast exori/exori gran with Any amount of members on the screen? I tried to do the following
500 {[Party] Exori} Wait:=1 VarMult(Wait, 6) Creatures.ByRangeName(3, Scorpala)==0 Creatures.ByRangeName(3, Scorpion Danger)==0 [EXORI] Creatures.PlayersOnRange(3)>=2 [EXORI] Time:=0 Self.Attacking()==1 Creature.DistanceToSelf(:TargetID)<=3 Self.Mana()>=80 Self.Say(exori ico) Self.Say(exori hur) Exit() Exit() {EXORI} VarAdd(Time, 1) Status.InPZ()==0 Creatures.ByRangeName(3, Omar)==1 Creatures.ByRangeName(3, Scorpion Danger)==1 [EXORI 2] Creatures.PlayersOnRange(3)<=2 [SPELLS RANGE] !Mobs>=2 [SPELLS RANGE] !Time!>=!Wait! Self.Mana()>=115 Self.Say(exori) Self.Mana()>=340 Self.Say(exori gran) Exit() {EXORI 2} VarAdd(Time, 1) Status.InPZ()==0 Creatures.ByRangeName(3, Omar)==0 Creatures.ByRangeName(3, Scorpion Danger)==0 Creatures.PlayersOnRange(3)==1 !Mobs>=2 [SPELLS RANGE] !Time!>=!Wait! Self.Mana()>=115 Self.Say(exori) Self.Mana()>=340 Self.Say(exori gran) Exit() {SPELLS RANGE} Self.Attacking()==1 Creature.DistanceToSelf(:TargetID)<=3 Self.Mana()>=80 Self.Say(exori ico) Self.Say(exori hur) Exit()


Adding the following ('cause I wanted to do if there is any monster, not the written ones)

50

{Mobs Counter}
Mob1:=Creatures.Beside()>=2
Mob2:=Creatures.Beside()>=2
Mob3:=Creatures.Beside()>=2
Mob4:=Creatures.Beside()>=2
Mob5:=Creatures.Beside()>=2
Mob6:=Creatures.Beside()>=2
Mob7:=Creatures.Beside()>=2
Mobs:=!Mob1
VarAdd(Mobs, !Mob2)
VarAdd(Mobs, !Mob3)
VarAdd(Mobs, !Mob4)
VarAdd(Mobs, !Mob5)
VarAdd(Mobs, !Mob6)
VarAdd(Mobs, !Mob7)
Give Reputation to this user
Find all posts by this user
Quote this message in a reply
12-01-2020, 08:37 PM
Post: #5
RE: Exori / Gran WITH PARTY MEMBER ON SCREEN
Code:
100 {Safe Area PT EK} safe:=0 Creatures.PlayersOnRange(!range)==1 [else] safe:=1 Exit()  {else} pt:=Creatures.PlayersOnRange(!range) Creatures.ByRangeParty(!range)==!pt safe:=1 Exit()

On the killer>actions you check fullcheck for your area spells and put !safe==1

Also add range=3 to your variables. Range is if a player outside of party is within 3 sqm from you it wont cast area spell. So adjust accordingly.
Give Reputation to this user
Find all posts by this user
Quote this message in a reply
Post Reply 


Forum Jump:


User(s) browsing this thread: 1 Guest(s)