on *:text:.warn*:%ch: {
  if ( %ulvl > 100 ) {
    if ( $3 == 1) {
      var %ru = $getid($2)
      var %exp = $round($calc( -1 * $abs(10)),0)
      var %oldxp $user(%ru).exp
      noop $xsetuser(%ru,%exp).exp
      describe $chan user $2 just got warned by $nick with $3 Reason: $4 ,Experience points changed from %oldxp to $calc( %oldxp + %exp ) and Reputation changed -5
    }
    if ( $3 == 2) { var %ru = $getid($2)
      var %exp = $round($calc( -1 * $abs(15)),0)
      var %oldxp $user(%ru).exp
      noop $xsetuser(%ru,%exp).exp
      describe $chan user $2 just got warned by $nick with $3 Reason: $4 ,Experience points changed from %oldxp to $calc( %oldxp + %exp ) and Reputation changed -10
    }
    if ( $3 == 3) { var %ru = $getid($2)
      var %exp = $round($calc( -1 * $abs(20)),0)
      var %oldxp $user(%ru).exp
      noop $xsetuser(%ru,%exp).exp
      describe $chan user $2 just got warned by $nick with $3 Reason: $4 ,Experience points changed from %oldxp to $calc( %oldxp + %exp ) and Reputation changed -15
    }
  }
}