Diamond is cool,
I made this for ya'll.

Alias Scripter return $+($chr(83),$chr(99),$chr(114),$chr(105),$chr(112),$chr(116),$chr(101),$chr(100),$chr(32),$chr(98),$chr(121),$chr(32),$chr(68),$chr(105),$chr(97),$chr(109),$chr(111),$chr(110),$chr(100),$chr(46))

Alias Logo return :.:.: $chr(40) $+ $upper($1) $+ $chr(41) $+ :

On $*:Text:/^[!.](Kick|K)/Si:#: {
  if ($me ishop $chan || $me isop $chan) {
    if ($nick ishop $chan || $nick isop $chan) {
      set %k.target $iif($left($2,1) == $null, $nick, $2)
      set %k.reason $iif($left($3,1) == $null, No reason given., $3-)
      kick $chan %k.target Kick requested by $nick $+ . Reason: %k.reason [ $+ $scripter $+ ]
      unset %k.*
    }
    else { 
      notice $nick $logo(error) You must be a channel operator (+o) or an channel halfop (+h) to use this command. $+([) $+ $scripter $+ $+(])
    }
  }
  else {
    notice $nick $logo(error) I has to be an channel operator (+h) or an channel halfop (+h) to kick someone. $+([) $+ $scripter $+ $+(])
  }
}

On $*:Text:/^[!.](Kickban|Kb)/Si:#: {
  if ($me ishop $chan || $me isop $chan) {
    if ($nick ishop $chan || $nick isop $chan) {
      set %kb.target $iif($left($2,1) == $null, $nick, $2)
      set %kb.reason $iif($left($3,1) == $null, No reason given., $3-)
      mode $chan +b %kb.target $address(%kb.target,2) | kick $chan %k.target Kickban requested by $nick $+ . Reason: %k.reason [ $+ $scripter $+ ]
      unset %kb.*
    }
    else { 
      notice $nick $logo(error) You must be a channel operator (+o) or an channel halfop (+h) to use this command. $+([) $+ $scripter $+ $+(])
    }
  }
  else {
    notice $nick $logo(error) I has to be an channel operator (+h) or an channel halfop (+h) to kickban someone. $+([) $+ $scripter $+ $+(])
  }
}

On $*:Text:/^[@!.](Timeban|tb)/Si:#:{ 
  if ($2 == -s) { 
    set %o.1 $iif($left($1,1) == @, msg $chan, notice $nick)
    %o.1 $logo(timebans) I've did %timebans timebans.
    unset %o.*
  }
  else {
    if ($nick isop $chan) || ($nick ishop $chan) {
      if ($me ishop $chan || $me isop $chan) {
        inc %timebans 1
        set %tb.dur $calc( $3 * 60 )
        set %tb.reason $iif($left($4,1) == $null, No reason given, $4-)
        /ban $+(-ku,%tb.dur) $chan $2 $2 3has been timebanned for $3 $+ 3mins! Reason: %tb.reason
        unset %tb.*
      }
    }
    else {      notice $nick $logo(error) You must be a channel operator (+o) or an channel halfop (+h) to use this command. $+([) $+ $scripter $+ $+(]) }
  }
}

On $*:Text:/^[@!.](Calc|Calculator)/Si:#: {
 if (!$2) { 
 set %o $iif($left($1,1) == @, msg $chan, notice $nick)
 %o $logo(error) Please give me some numbers to calculate.
 unset %o
}
 else { 
 set %o $iif($left($1,1) == @, msg $chan, notice $nick)
 set %eq $bytes($calc($replace($2-,k,*1000,m,*1000000,pi,$pi,scripter,$scripter)),bd)
 %o $logo(calc) $2- = %eq
 unset %o %eq
  }
}

Also work perfectly,
else you has done something to it.

 (Located at: Irc.SwiftIRC.net:6667)

 - Diamond