// AUTOPATY
L Autoparty Sunny Iceman Empath Light abi Cyjaa Renevan Entalphy Zami
T(500, 5000) isMember("Renevan") and partyLeader == (me) : Command /changepartyleader Renevan
T(500, 5000) isMember("Empath") and partyLeader == (me) : Command /changepartyleader Empath
//T(1000, 10000) not isMember(me) : say "empath inv
//T(1000, 10000) not isMember(me) : say "renevan inv
@CreatureSay (aname == "Renevan" or aname == "abi" or aname == "Empath" or aname == "Sunny" or aname == "Iceman" or aname == "Novikov" or aname == "Zext" or aname == "Zami") and text == "inv" and not isMember(actor) and partyLeader==me : invite looter (aname)
+I say "Renevan inv
+I (1500) say "Empath inv

// AUTODISPEL
L AutoDispelInterval 1000 3000
L AutoDispel $Invigor $ResistPoison $ImprovedMagic $ResistFire $ResistWind $ResistWater $ElementalProtection $Regeneration $ResistAqua $BlessShield $AdvancedBlock $WildMagic $ResistHoly  $ImproveShieldDefense $Concentration $Empower $ChantOfEagle $EyeOfPaagrio $RageOfPaagrio $PaagriosFist
//$KissOfEva
//CP&HP
S EnableGroup HPCP off
?HPCP T(100,15000) alive(me) and php(me)<70 and ItemCount(1061) >= 1 : UseItem 1061
?HPCP T(100,60000) alive(me) and pcp(me)<5 and ItemCount(22031) >= 1 : UseItem 22031
?HPCP T(100,60000) alive(me) and php(me)<15 and ItemCount(22036) >= 1 : UseItem 22036

// RES & ALARM
@Resurrection isMember(actor) or actor == (me) or name(actor) == "Sunny" or name(actor) == "Novikov" : (1200) Revive 1
/////@Teleport actor == me and zone ~= 12 : AutoFollow Me 0 0 ; Come(me) 0 0 ; AutoPickup 0 0 mine; EnableGroup DS off; EnableGroup ASIST off; EnableGroup PVP off; EnableGroup REST off; EnableGroup FOLLOW off; EnableGroup HPCP off; EnableGroup BOT off; EnableGroup ALARM off; EnableGroup NOBL off; EnableGroup PickUP off

@CreatureSay aname == "admin" : PlaySound teleport
@Item item == 1 or item == 2 or item == 3 or item == 4 or item == 5 or item == 6 or item == 7 or item == 8 or item == 9 or item == 10 : PlaySound teleport ; Eval ("GM HERE")
@CharInfo name(actor) == "admin" : PlaySound enemy ; eval ("ADMIN")
@CharInfo name(actor) == "JoscelinVerreuil" : PlaySound enemy ; eval ("GM verre")
@Disconnect : PlaySound enemy

//ALARM
S EnableGroup ALARM off
?ALARM @CharInfo isEnemy(actor) and distance(actor) < 3000 and zone ~=12 : PlaySound enemy
?ALARM T(3000) alive(me) and isSitting(me) : (4000) actionuse stand ; PlaySound teleport ; Notice 0 GM SIT

// CHAT COMMAND
@CreatureSay isMember(actor) and alive(me) and text=="shadow": Cast $DanceOfShadows
@CreatureSay isMember(actor) and alive(me) and text == "medusa" : Cast $DanceOfMedusa

@CreatureSay isMember(actor) and text == "pvp1" : EnableGroup PVP on
@CreatureSay isMember(actor) and text == "pvp0" : EnableGroup PVP off

@CreatureSay isMember(actor) and text == "start1" : EnableGroup DS on
@CreatureSay isMember(actor) and text == "stop1" : EnableGroup DS off; EnableGroup ASIST off

@CreatureSay isMember(actor) and text == "af1" : AutoFollow (aname) 0 100
@CreatureSay isMember(actor) and text == "af0" : AutoFollow (aname) 0 0

@CreatureSay isMember(actor) and text == "as1" : EnableGroup ASIST on
@CreatureSay isMember(actor) and text == "as0" : EnableGroup ASIST off

//FOLLOW
S EnableGroup FOLLOW off
+W EnableGroup FOLLOW
?FOLLOW T(1000) AutoFollow Renevan 0 100
!FOLLOW T(1000) AutoFollow (0) 0 0

// PAKI SOSOK
//T(1000,30000) ItemCount(22085) < 1000 and ItemCount(22107) >= 1 : UseItem 22107 // SSA paki

// EXPOMETR
S Assign sdamage = damage
S Assign sexp = exp
S Assign ssp = sp
+N Assign sexp = exp ; Assign ssp = sp ; Assign snow = now ; Assign sdamage = damage ; Assign mobco = 0 ; Assign SS = ItemCount(1467)
+B Eval (exp-env("sexp"))*60*60/(now - env("snow")).." | "..(now - env("snow"))/60000.." min ".."dps: "..(damage-env("sdamage"))*1000/(now-env("snow"))

// FOLLOW
+W AutoFollow (name(target(me))) 0 200
+Q AutoFollow (me) 0 0; AutoPickup 0 0 mine; Come(me) 0 0 ;

S EnableGroup PVP off
+G EnableGroup PVP ; EnableGroup HPCP
// AGR если хиллеров атачат враги LIFE VERSION
//and (class(actor)==114 or class(actor)==113 or class(actor)==110 or class(actor)==109 or class(actor)==108 or class(actor)==103 or class(actor)==102 or class(actor)==101 or class(actor)==95 or class(actor)==94 or class(actor)==93 or class(actor)==92 or class(actor)==88)
?PVP @TargetSelected alive(me) and not isMedused(me) and nowcasting(me)==0 and skillCoolTime($Aggression)==0 and Alive(actor) and not isFriend(actor) and not isMember(actor) and not isMedused(actor) and (target(actor)=="Sunny" or target(actor)=="Entalphy") and distance(actor) <= 600 : select(actor) > Cast forced $Aggression
// REDS HILAM i DD
F: NA=nowcasting(me)==0 and alive(me) and effectTime(actor,$DayOfDoom)==0 and not isMedused(actor) and not isMedused(me)
?PVP P(100, 2000) NA and pmp(me)>10 and pmp(actor)>5 and (class(actor)==105 or class(actor)==97 or class(actor)==116) and effectTime(actor,$DanceOfConcentration)==0 and not isdead(actor) and distance(actor) < 900 : Cast $DanceOfConcentration
?PVP P(100, 2000) NA and pmp(me)>10 and (class(actor)==93 or class(actor)==101) and effectTime(actor,$DanceOfFire)==0 and not isdead(actor) and distance(actor) < 900 : Cast $DanceOfFire
?PVP P(100, 2000) NA and pmp(me)>50 and (class(actor)==93 or class(actor)==101) and effectTime(actor,$DanceOfFury)==0 and not isdead(actor) and distance(actor) < 900 : Cast $DanceOfFury
// RESTOK
S EnableGroup REST off
?REST P(100, 2000) NA and pmp(me)>25 and (class(actor)==105 or class(actor)==97 or class(actor)==116) and effectTime(actor,$DanceOfConcentration)==0 and not isdead(actor) and distance(actor) < 900 : Cast $DanceOfConcentration
// ASSIST
S EnableGroup ASIST off
+R EnableGroup ASIST
?ASIST T(500) alive(me) and (target(me) == 0 or not alive(target(me))) or target(me) ~= target("lililllillill") : assist lililllillill safe
?ASIST T(500) alive(me) and npc(target(me)) and alive(target(me)) and not acting : come(target(me)) 0 40 R > attack
//?ASIST T(1000,20000) not alive(me) : PlaySound enemy
//?ASIST @CharInfo isEnemy(actor) and distance(actor) < 3000 : PlaySound enemy

//DANCE
S EnableGroup DS off
+D EnableGroup DS
%1 $DanceOfFury
%2 $DanceOfFire
%3 $DanceOfTheWarrior
%4 $DanceOfTheVampire
%5 $SongOfChampion
%6 $SongOfRenewal
%7 $SongOfMeditation
%8 $SongOfEarth
%9 $DanceOfConcentration
%10 $SongOfHunter
%11 $SongOfWarding
%12 $SongOfWind
%13 310
%14 272

?DS PT(100, 2000) effectTime(%6) > 100000 and effectTime(%1) == 0 : Cast %1
?DS @MagicSkillUser isMember(actor) and skill == %6 : Cast %1
?DS PT(100, 2000) effectTime(%7) > 100000 and effectTime(%2) == 0 : Cast %2
?DS @MagicSkillUser isMember(actor) and skill == %7 : Cast %2
?DS PT(100, 2000) effectTime(%8) > 100000 and effectTime(%9) == 0 : Cast %9
?DS @MagicSkillUser isMember(actor) and skill == %8 : Cast %9
?DS PT(100, 2000) effectTime(%10) > 100000 and effectTime(%3) == 0 : Cast %3
?DS @MagicSkillUser isMember(actor) and skill == %10 : Cast %3
?DS PT(100, 2000) effectTime(%11) > 100000 and effectTime(%13) == 0 : Cast %13
?DS @MagicSkillUser isMember(actor) and skill == %11 : Cast %13

S EnableGroup BOT off
+B EnableGroup BOT
?BOT PT(100, 1000) effectTime(%1) == 0 and effectTime(%2) == 0 and effectTime(%3) == 0 and effectTime(%4) == 0 and effectTime(%5) == 0 and effectTime(%6) == 0 and effectTime(%9) == 0 : Cast %1
?BOT PT(100, 1000) effectTime(%1) > 110000 and effectTime(%2) == 0 : Cast %2
?BOT @MagicSkillUser actor == me and skill == %1 : Cast %2
?BOT PT(100, 1000) effectTime(%2) > 110000 and effectTime(%3) == 0 : Cast %3
?BOT @MagicSkillUser actor == me and skill == %2 : Cast %3
?BOT PT(100, 1000) effectTime(%3) > 110000 and effectTime(%9) == 0 : Cast %9
?BOT @MagicSkillUser actor == me and skill == %3 : Cast %9

S EnableGroup NOBL off
+J EnableGroup NOBL
F: MyMember(actor) = actor==me or name(actor)=="Renevan" or name(actor)=="Iceman" or name(actor)=="Sunny" or name(actor)=="Zami" or name(actor)=="Zext" or name(actor)=="abi" or name(actor)=="Novikov" or name(actor)=="Empath" or name(actor)=="Ibanez" or name(actor)=="Qisa" or name(actor)=="ilIllijlflIjl" or name(actor)=="AloneInTheDark"  or name(actor)=="Const"  or name(actor)=="gRek"  or name(actor)=="e1fy"  or name(actor)=="Rico"  or name(actor)=="Dok"  or name(actor)=="AzzI"  or name(actor)=="N"

?NOBL PT(500,10000) MyMember(actor) and not isMedused(actor) and alive(actor) and alive(me) and sdistance(actor)<600*600 and nowCasting==0 and effectTime(actor,$NoblesseBlessing)<900000 and ItemCount(3031)>200 and effectTime(actor,$DayOfDoom)==0 and effecttime ($MagicalBackfire)==0 and pmp(me) > 5 : Select (actor) safe > Cast $NoblesseBlessing

>_` Select (listAt("healer_targeters", 0))

S EnableGroup PickUP off
+P EnableGroup PickUP
?PickUP T(500) alive(me): AutoPickup 500 70 mine 3 DROP PickUP
?PickUP T(5000) currentLoad * 100 > maxLoad * 45 : DestroyItem 1344 ((currentLoad - maxLoad * 2 / 5) / 3)