Laysus2007-12-23 21:38:54
And for the record, this is more streamlined than my old one.
I think that's all. It's not got anything to integrate it into your prompt with as it's more a case of me showing off my unusual approach to such things than anything else, but if you want to use it yourself, say here and I'll make an explanation of how it ties in.
CODE
#alias sipcheck {#var heal_priority "";#priority {#forall {%sort( %concat( %repeat( 0, %eval( 6-%len( @health_pcent)))@health_pcent, _health)|%concat( %repeat( 0, %eval( 6-%len( @mana_pcent)))@mana_pcent, _mana)|%concat( %repeat( 0, %eval( 6-%len( @ego_pcent)))@ego_pcent, _ego)|%concat( %repeat( 0, %eval( 6-%len( @head_pcent)))@head_pcent, _head)|%concat( %repeat( 0, %eval( 6-%len( @chest_pcent)))@chest_pcent, _chest)|%concat( %repeat( 0, %eval( 6-%len( @gut_pcent)))@gut_pcent, _gut)|%concat( %repeat( 0, %eval( 6-%len( @rleg_pcent)))@rleg_pcent, _rleg)|%concat( %repeat( 0, %eval( 6-%len( @lleg_pcent)))@lleg_pcent, _lleg)|%concat( %repeat( 0, %eval( 6-%len( @larm_pcent)))@larm_pcent, _larm)|%concat( %repeat( 0, %eval( 6-%len( @rarm_pcent)))@rarm_pcent, _rarm))} {#if (%ismember( %word( %i, 2, "_"), "health|mana|ego")) {#if (%eval( %word( %i, 1, "_")<000090)) {#additem heal_priority %db( @healing, %word( %i, 2, "_"))}} {#if (%eval( %word( %i, 1, "_")<000100)) {#additem heal_priority %db( @healing, %word( %i, 2, "_"))}}}};#priority {#forall @heal_priority {#exec %i}}}
#addkey healing health dohealth
#addkey healing mana domana
#addkey healing ego dobromide
#addkey healing gut aphg
#addkey healing chest aphc
#addkey healing head aphh
#addkey healing rarm apha
#addkey healing larm apha
#addkey healing lleg aphl
#addkey healing rleg aphl
#function health_pcent %eval((@current_stats.health*100)/@ref_stats.maxhealth)
#function mana_pcent %eval((@current_stats.mana*100)/@ref_stats.maxmana)
#function ego_pcent %eval((@current_stats.ego*100)/@ref_stats.maxego)
#function head_pcent %eval(((3200-@wounds.head*100)/3200)
#function chest_pcent %eval(((3200-@wounds.chest*100)/3200)
#function gut_pcent %eval(((3200-@wounds.gut)*100)/3200)
#function rarm_pcent %eval(((3200-@wounds.rarm)*100)/3200)
#function larm_pcent %eval(((3200-@wounds.larm)*100)/3200)
#function rleg_pcent %eval(((3200-@wounds.rleg)*100)/3200)
#function lleg_pcent %eval(((3200-@wounds.lleg)*100)/3200)
#addkey healing health dohealth
#addkey healing mana domana
#addkey healing ego dobromide
#addkey healing gut aphg
#addkey healing chest aphc
#addkey healing head aphh
#addkey healing rarm apha
#addkey healing larm apha
#addkey healing lleg aphl
#addkey healing rleg aphl
#function health_pcent %eval((@current_stats.health*100)/@ref_stats.maxhealth)
#function mana_pcent %eval((@current_stats.mana*100)/@ref_stats.maxmana)
#function ego_pcent %eval((@current_stats.ego*100)/@ref_stats.maxego)
#function head_pcent %eval(((3200-@wounds.head*100)/3200)
#function chest_pcent %eval(((3200-@wounds.chest*100)/3200)
#function gut_pcent %eval(((3200-@wounds.gut)*100)/3200)
#function rarm_pcent %eval(((3200-@wounds.rarm)*100)/3200)
#function larm_pcent %eval(((3200-@wounds.larm)*100)/3200)
#function rleg_pcent %eval(((3200-@wounds.rleg)*100)/3200)
#function lleg_pcent %eval(((3200-@wounds.lleg)*100)/3200)
I think that's all. It's not got anything to integrate it into your prompt with as it's more a case of me showing off my unusual approach to such things than anything else, but if you want to use it yourself, say here and I'll make an explanation of how it ties in.
