|**
* Consider.mac
* by EvenLessSpam
**|
#Event Consider "#1# scowls at you, ready to attack -- #2#"
#Event Consider "#1# glares at you threateningly -- #2#"
#Event Consider "#1# glowers at you dubiously -- #2#"
#Event Consider "#1# looks your way apprehensively -- #2#"
#Event Consider "#1# regards you indifferently -- #2#"
#Event Consider "#1# judges you amiably -- #2#"
#Event Consider "#1# kindly considers you -- #2#"
#Event Consider "#1# looks upon you warmly -- #2#"
#Event Consider "#1# regards you as an ally -- #2#"
Sub Main(int Radius)
/declare Considered bool outer false
/declare ConAlert int outer 4
/declare SeeAlert int outer 5
/declare KoSAlert int outer 6
/declare SpawnSearch string local npc${If[${Defined[Radius]}, radius ${Radius},]} noalert ${ConAlert}
/alert clear ${ConAlert}
/alert clear ${SeeAlert}
/alert clear ${KoSAlert}
:Loop
:WaitTarget
/squelch target ${SpawnSearch}
/delay 1
/if (!${Target.ID}) /goto :WaitTarget
/varset Considered false
/consider
:WaitConsider
/delay 1
/doevents Consider
/if (!${Considered}) /goto :WaitConsider
/delay 5
/if (${SpawnCount[${SpawnSearch}]}) /goto :Loop
/return
Sub_Consider(string Line, string NPC, string Difficulty)
| Gray You could probably win this fight.
| Green? You would probably win this fight..it's not certain though.
| Light blue looks kind of dangerous.
| Dark blue it appears to be quite formidable.
| he appears to be quite formidable.
| she appears to be quite formidable.
| White looks like quite a gamble.
| Red what would you like your tombstone to say?
/alert add ${ConAlert} npc id ${Target.ID}
/if (!${Line.Find[regards you indifferently]}) {
/alert add ${SeeAlert} npc id ${Target.ID}
/echo ${Target.CleanName} (${Target.ID}) can see you.
/popup ${Target.CleanName} (${Target.ID}) can see you.
/if (${Line.Find[scowls at you, ready to attack]}) {
/alert add ${KoSAlert} npc id ${Target.ID}
/echo ${Target.CleanName} (${Target.ID}) is KoS!
/popup ${Target.CleanName} (${Target.ID}) is KoS!
}
}
/varset Considered true
/return