Forums mIRC Help need edit pls.

on *:start: { 
  hmake Addtrack 100 
  if ($isfile(Addtrack.hsh)) hload Addtrack Addtrack.hsh 
} 
on *:exit: if ($hget(Addtrack)) hsave -o Addtrack Addtrack.hsh 
alias violatechan return #mychannel 
on *:text:*:#: { 
  if ($1 == !commands) { 
    msg $nick 05My Commands: !addviolators <ip> <reason>, !ipcheck <ip> 
    msg $nick 05My Commands: !op <nick>, !deop <nick>, !hop <nick>, !dehop <nick>, !voice <nick>, !devoice <nick> 
    msg $nick 05My Commands: !kick <nick> (chan), !ban <nick>, !seen <nick> 
  } 
  if ($nick(#,$nick,~&@) && $nick(#,$me,~&@)) { 
    if ($1 == !op && $2) { mode # +o $2 } 
    if ($1 == !deop && $2) { mode # -o $2 } 
    if ($1 == !hop && $2) { mode # +h $2 } 
    if ($1 == !dehop && $2) { mode # -h $2 } 
    if ($1 == !voice && $2) { mode # +v $2 } 
    if ($1 == !devoice && $2) { mode # -v $2 } 
    if ($1 == !addviolators && $3) { write violatenicks.txt $2- | msg # $2- ADDED. } 
    if ($1 == !kick && $2) { kick $iif($3,$3,#) $2 } 
    if ($1 == !ban && $2) { ban -k # $2 } 
    if ($1 == !CheckNicks && $2) { CheckNicks $2 } 
  } 
  if ($1 == !seen) { 
    if ($read(seen.txt,s,$2)) { 
      if ($2 ison #) { msg # *Points to the NickList* Try looking before you ask next time. } 
      else { msg # $2 $read(seen.txt,s,$2) } 
    } 
    else { msg # I am sorry $nick $+ , I have not seen $2 before. } 
  } 
} 
on !*:join:#: { 
  if (# == #mychannel) { notice $nick 05For automated help type !commands otherwise ask in channel. } 
  if ($read(violatenicks.txt, s, $gettok($address($nick,5),2,64))) { 
    msg $violatechan [Violators List]____________________ 
    msg $violatechan [User/Lanmate Detected]: $hget(Addtrack,$gettok($address($nick,5),2,64)) 
    msg $violatechan [Under IP]: $gettok($address($nick,5),2,64) 
    msg $violatechan [Offense(s)]: $v1 
    msg $violatechan [Channel]: # 
    msg $violatechan [Full Date]: $fulldate 
    msg $violatechan [End Violators List]____________________ 
  } 
  if ($wildsite iswm $address($me,5)) return 
  var %mask = $gettok($mask($fulladdress,5),2,64) 
  if ($hget(Addtrack,%mask)) { 
    var %usednicks = $ifmatch 
    if (%usednicks != $nick) && ($group(#Addtrack) == on) echo -t $chan 4,1[N14,1ick 4,1T14,1racker4,1]4,1 $nick has also used the nicks:4,1 $remtok(%usednicks,$nick,1,44) 
    if (!$istok(%usednicks,$nick,44)) hadd -m Addtrack %mask $addtok(%usednicks,$nick,44) 
    if ($numtok(%usednicks,44) > 10) hadd -m Addtrack %mask $deltok(%usednicks,1,44) 
  } 
  else { 
    hadd -m Addtrack %mask $nick 
  } 
} 
on !*:part:#: { 
  if ($read(seen.txt,s,$2)) { write $+(-ds,",$nick,") seen.txt } 
  write seen.txt $nick was last seen parting # on $fulldate with $iif($1-,the part message:$1-,no part message.) 
} 
on !*:quit: { 
  if ($read(seen.txt,s,$2)) { write $+(-ds,",$nick,") seen.txt } 
  write seen.txt $nick was last seen quitting irc on $fulldate with $iif($1-,the quit message:$1-,no quit message.) 
} 
on !*:nick: { 
  if ($wildsite iswm $address($me,5)) return 
  var %mask = $gettok($mask($fulladdress,5),2,64) 
  if ($hget(Addtrack,%mask)) { 
    var %usednicks = $ifmatch 
    if (!$istok(%usednicks,$newnick,44)) hadd -m Addtrack %mask $addtok(%usednicks,$newnick,44) 
    if ($numtok(%usednicks,44) > 10) hadd -m Addtrack %mask $deltok(%usednicks,1,44) 
  } 
  else { 
    hadd -m Addtrack %mask $newnick 
  } 
} 
alias CheckNicks { 
  if (*!*@* iswm $1) { 
    var %mask = $1 
    if (!$hget(Addtrack,%mask)) msg $nick 4,1[N14,1ick 4,1T14,1racker4,1] No entry found for4,1 $1
    else msg $nick 4,1[N14,1ick 4,1T14,1racker4,1] Address4,1 $1 has used the nicks:4,1 $hget(Addtrack,$1) 
  } 
  elseif (!$hget(Addtrack,$1)) msg $nick 4,1[N14,1ick 4,1T14,1racker4,1] No Entry found for4,1 $1 
  elseif ($hget(Addtrack,$1) != $1) { 
    var %usednicks = $ifmatch 
    msg $nick 4,1[N14,1ick 4,1T14,1racker4,1]4,1 $1 has also used the nicks4,1 $remtok(%usednicks,$1,1,43) 
  } 
  else { 
    msg $nick 4,1[N14,1ick 4,1T14,1racker4,1]4,1 $1 has not been seen on any other nicks 
  } 
}