@ who.kill.cnt = 0 alias whokill if ([$2]) { ^on ^who "*" { if ([$1]!=[$N]) { ^assign who.kill $1 $who.kill } } if ([$0]!=[*]) { if ([$1]!=[*]) { //who -name $0 -host $1 }{ //who -name $0 } }{ if ([$1]!=[*]) { //who -host $1 } } @ who.kill.why = [$2-] //wait -cmd ^on ^who -"*" //wait -cmd if ([$who.kill]!=[]) { while ([$word($who.kill.cnt $who.kill)]!=[]) { //kill $word($who.kill.cnt $who.kill) $who.kill.why \($who.kill.cnt\) @ who.kill.cnt = who.kill.cnt + 1 } @ who.kill.cnt = 0 ^assign -who.kill } } echo *** Usage is /whokill userid host Reason