Really clean version:

####################################################################################################
This snippet is made by Bluepower10 Productions at http://bluepower10.webs.com/ . 
DO NOT REMOVE THIS!! Feel free to edit add, or delete anything below, but do not edit anything up here. To get help on this script, please contact me at: MSN: bluepower10@clubpenguinhq.com, AIM: Bluepower1000, EMAIL: bluepower10_productions@live.com Have fun! 1st script by Bluepower10.
You are using version 6.0 of this script. Please make sure you are using current version.
####################################################################################################

on *:TEXT:*:#: {
  var %e = !ban;!mode;!voice;!devoice;!unban;!commands;!topic;!site;!info;!kick;!pm;!opc;!time;!invite;!register
  tokenize 32 $strip($1-)
  if ($gettok(%e,1,59) == $1) { if ($nick isop $chan) mode $chan +b $$2 }
  if ($gettok(%e,2,59) == $1) {
    if ($nick isop $chan) { mode $chan + $$2- }
    msg $chan You're not oped on this channel
  }
  if ($gettok(%e,3,59) == $1) {
    if (!$2) msg $chan No nick entered | halt
    if ($nick isop $chan) mode $chan +v $$2 | halt 
    msg $nick You're not oped on this channel.
  }
  if ($gettok(%e,4,59) == $1) {
    if ($nick isop $chan) { mode $chan -v $$2 }
    elseif (!$2) { msg $chan No nick entered }
    else { .notice $nick You're not oped on this channel. }
  }
  if ($gettok(%e,5,59) == $1) {
    if ($nick isop $chan) { mode $chan -b $$2 }
    else { .notice $nick You're not oped on this channel. }
    if (!$2) { msg $nick No nick entered. Try again. }
  }
  if ($gettok(%e,6,59) == $1) { .notice $nick Regular commands for this bot are: !commands, !site, !info, !time, !invite < username > and !pm < username >. }
  if ($gettok(%e,7,59) == $1) {
    if ($nick isop $chan) { topic $chan $2- }
    else { .notice $nick You're not oped on this channel. }
  }
  if ($gettok(%e,8,59) == $1) { msg $chan Come visit us at http://www.bluepower10.webs.com/ }
  if ($gettok(%e,9,59) == $1) { msg $chan Bot made by Bluepower10. Bluepower10 Productions owns this bot at http://bluepower10.webs.com/ . }
  if ($gettok(%e,10,59) == $1) {
    if (!$2) msg $nick Please provide a name. | halt
    if ($2 !ison $target) msg $nick Who?
    if ($nick isop $chan) {
      kick $chan $2
      .notice $2 You where kicked by: $nick at $time on $date for $$3- $+ .
    }
    else { msg $nick You're not oped on this channel. }
  }
  if ($gettok(%e,11,59) == $1) {
    if ($2 ison $chan) { .notice $$2 Hello $$2 $+ ! I was asked to PM you. How are you doing today? }
    else { .notice $nick Their not in this channel. }
  }
  if ($gettok(%e,12,59) == $1)  {
    if ($nick isop $chan) { .notice $nick Op commands are: !ban < username >, !unban < username >, !kick < username >, !+m, !im, !+i, !-i, !voice < username >, !devoice < username >, and !topic. Note: These commands only work for ops and if I am oped. }
    else { .notice $nick You need to be oped to see these commands. }
  }
  if ($gettok(%e,13,59) == $1)  { .notice $nick The time is $time and the date is $date $+ . }
  if ($gettok(%e,14,59) == $1)  { invite $$2- $chan }
  if ($gettok(%e,15,59) == $1)  {
    if ($nick isop $chan) {
     if (!$2) msg $nick register what?
      join $2
      if ($me isop $2) {
        cs register $2 password $iif($3,$3-,$nick $+ 's channel.)
        cs set $2 founder $nick
        part $2
        msg $chan You now own $2 Password: password Description: $+(,$iif($3,$3-,$nick $+ 's channel.),)
        halt
      }
      msg $chan To register type /cs register (Channel) (Password) (Description), good luck!
      part $2
    }
  }
}
on *JOIN:#: { .notice $nick Welcome to $chan ! For a list of commands, type !commands.  For op commands, type !opc }

made your register more effective. this format is a loooooot cleaner than what you have.