Something

alias mwhois { set %whattodo 1 | /whois $$1 | unset %whattodo }

raw 311:*:{ haltdef | $iif(%whattodo == 1, msg $active, echo -a) 4[•14 Whois for $2 ( $+ $3- $+ ) 4•] }
raw 301:*:{ haltdef | $iif(%whattodo == 1, msg $active, echo -a) 4[•14 $2 is away ( $+ $3- $+ ) 4•] }
raw 319:*:{ haltdef | $iif(%whattodo == 1, msg $active, echo -a) 4[•14 $2 is on these channels: $3- 4•] }
raw 312:*:{ haltdef | $iif(%whattodo == 1, msg $active, echo -a) 4[•14 $2 is using the server $3- 4•] }
raw 313:*:{ haltdef | $iif(%whattodo == 1, msg $active, echo -a) 4[•14 $2 is an oper - $5- 4•] }
raw 317:*:{ haltdef | $iif(%whattodo == 1, msg $active, echo -a) 4[•14 $2 has idled for: $duration($3) and has been logged on since $time($4) 4•] | halt }
raw 320:*:{ haltdef | $iif(%whattodo == 1, msg $active, echo -a) 4[•14 $2 Other: $3- 4•] | halt }
raw 310:*:{ haltdef | $iif(%whattodo == 1, msg $active, echo -a) 4[•14 $2 Other: $3- 4•] | halt }
raw 307:*:{ haltdef | $iif(%whattodo == 1, msg $active, echo -a) 4[•14 $2 has identfied themselves 4•] | halt }
raw 318:*:{ haltdef | $iif(%whattodo == 1, msg $active, echo -a) 4[•14 End of whois for $2 4•] }