Mine

ON 1:INPUT:?:{
  if !$inpaste && !$ctrlenter {
    /haltdef
    var %test = $replace($1-,from,to)
    if ($left($1,1) = /) {
      $eval(%test)
    }
    else {
      /say %test
    }
  }
}