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
  }
}