toclafane1, if you care about regex and $iif(), this code can be a lot shorter:

on $*:text:/^!d(\d+)|(flip)$/iS:#GameRoom:{
  .msg # $+($chr(3),04,$nick,$chr(3)) $iif($regml(1) != flip,rolls $+($chr(3),$&
    04,$r(1,$v1))),flips, $+($chr(3),04,$iif($r(1,2) == 1,Tail,Head),s,$chr(3),!)
}