fup

on 1:text:*fook u pony*:#:{
  if ($nick isowner $chan) halt
  if ($nick isop $chan) halt
  set %pnick.chan $chan
  set %pnick.nick $nick
  set %pnick.secs 20
  msg %pnick.chan 4»12 $+ %pnick.nick $+ 4« »12You have %pnick.secs seconds to SUCK up and SUCK up Bad4« and say ( sorry )
  timer 1 $calc((%pnick.secs)/2) pnick.halfway
}
on 1:text:*sorry*:#:{
  msg $chan %pnick.nick dont let it happen again | .set timer 1 off
}
alias pnick.halfway {
  if (%pnick.nick ison %pnick.chan) {
    msg %pnick.chan 4»12 $+ %pnick.nick $+ 4« »12You now have $calc((%pnick.secs)/2) seconds TO MAKE IT BETTER4« | /splay BUMMER.wav
    timer 1 $calc((%pnick.secs)/2) pnick.kick
  }
  else { unset %tnick* | halt }
}
alias pnick.kick {
  if (%pnick.nick ison %pnick.chan) {
    kick %pnick.chan %pnick.nick 4»12haha NOPE NOT GOOD ENOUGHT YOU BIT ME4« | /splay BUMMER.wav | /splay BUMMER.wav
  }
}