Hjælp til gather

Hey m8's...
Jeg bliver meget taknemlig hvis du lige gider og lave det her script.. Man ka godt starte og det hele, men man ka ikk fjerne sig selv igen:o) Når man skriver !rem sker der ikk noget..

ON *:LOAD: {
echo -a -------------------------------------
echo -a Commands @ only:
echo -a !start MAP
echo -a !end
echo -a -------------------------------------
echo -a Commands for all:
echo -a !add
echo -a !rem
echo -a !status
echo -a -------------------------------------
set %gchan $$?=#
set %gchan.priv $$?=#
set %gchan.priv.pass $$?=
/join %gchan
/join %gchan.priv %gchan.priv.pass
if (%gtag == $null) { set %gtag 4 ¬»  }
}

ON *:TEXT:!start*:%gchan: {
if (%g.status == on) { halt }
if (%cup == on) { halt }
if ($2 == $null) { halt }
if ($2 == 2on2) { halt }
if ($2 == 5on5) { halt }
if ($2 == cs) { halt }
if ($len($2) > 12) { halt }
if ($len($2) < 5) { halt }
if ($nick !isop %gchan) { halt }
set %g.status on
set %g.map $2
set %g.admin $address($nick,1)
/msg %gchan %gtag Gather is started by:  $+ $ial(%g.admin).nick $+ 

%gtag Map: %g.map %gtag Type: !add %gtag
set %g.players $addtok(%g.players, $address($nick,1), 34)
/msg $nick %gtag Gå nu ind på  $+ %gchan.priv $+ , og skriv: '!serversetup <ip> <pass>' %gtag
}

ON *:TEXT:!add:%gchan: {
if (%g.status == off || %g.status == $null) { halt }
if ($address($nick,1) isin %g.players) { halt }
set %g.players $addtok(%g.players, $address($nick,1), 34)
if ($numtok(%g.players, 34) < 10) { gstatus } else { gendface }
}

ON *:TEXT:!rem:%gchan: {
if (%g.status == off) { halt }
if ($address($nick,1) !isin %g.players) { halt }
set %g.players $deltok(%g.players, $findtok(%g.players, $address
($nick,1),34), 34)
}

ON *:TEXT:!end:%gchan: {
if (%g.status == off || %g.status == $null) { halt }
if ($address($nick,1) != %g.admin) { halt }
/msg %gchan %gtag Gather is ended by  $+ $nick $+ ! %gtag
gend
}

ON *:TEXT:!serversetup*:%gchan.priv: {
if ($2 == $null || $3 == $null) { /notice $nick %gtag Correct usage:

'!serversetup IP PASS' %gtag | halt }
set %g.ip $2
set %g.pass $3
/msg %gchan.priv %gtag SETUP: IP: %g.ip %gtag PASS: %g.pass %gtag
/msg $nick %gtag $nick $+ : Now go in on your server and set it's pass
to:  $+ %g.pass $+  %gtag
}

ON *:TEXT:!status:%gchan: {
if (%g.status == off || %g.status == $null) { halt }
gstatus
}

alias gstatus {
if (%g.status == off || %g.status == $null) { halt }
set %showstatus %gtag Map: %g.map %gtag Players:
set %i 1
while (%i <= $numtok(%g.players, 34)) {
  set %showstatus %showstatus %i $+ . $ial($gettok(%g.players, %i, 34)).nick
  inc %i
}
set %showstatus %showstatus %gtag Type: !add or !rem %gtag
/msg %gchan %showstatus
unset %showstatus
}

alias gend {
set %g.status off
unset %g.players
unset %g.map
unset %g.admin
}

alias gendface {
/mode %gchan +m
/msg %gchan %gtag GATHER IS NOW FULL! %gtag
gstatus

/msg %gchan %gtag Team 12CT: $ial($gettok(%g.players, 1,

34)).nick

$+ , $ial($gettok(%g.players, 2, 34)).nick $+ , $ial($gettok(%

g.players, 5, 34)).nick $+ , $ial($gettok(%g.players, 8, 34)).nick $+ ,

$ial($gettok(%g.players, 9, 34)).nick %gtag
/msg %gchan %gtag Team 4T: $ial($gettok(%g.players, 3, 34)).nick $+

, $ial($gettok(%g.players, 4, 34)).nick $+ , $ial($gettok(%g.players,

6, 34)).nick $+ , $ial($gettok(%g.players, 7, 34)).nick $+ , $ial

($gettok(%g.players, 10, 34)).nick %gtag

/msg %gchan %gtag Sending serverinfo. Please wait... %gtag
set %i 1
while (%i <= $numtok(%g.players, 34)) {
  set %timersend $calc($eval(%i)*2+2)
  /timer 1 %timersend /msg $ial($gettok(%g.players, %i, 34)).nick %

gtag IP: %g.ip %gtag PASS: %g.pass %gtag
  inc %i
}
set %timersend $calc($eval(%i)*2)
/timer 1 %timersend /msg %gchan %gtag Serverinfo has been sent! GL HF!

:D %gtag
/timer 1 %timersend /mode %gchan -m
unset %i
unset %timersend
gend
}

ON *:QUIT:%gchan: {
if (%g.status == off) { halt }
if ($address($nick,1) !isin %g.players) { halt }
set %g.players $deltok(%g.players, $findtok(%g.players, $address

($nick,1),34), 34)
gstatus
}
ON *:PART:%gchan: {
if (%g.status == off) { halt }
if ($address($nick,1) !isin %g.players) { halt }
set %g.players $deltok(%g.players, $findtok(%g.players, $address

($nick,1),34), 34)
gstatus
}
ON *:KICK:%gchan: {
if (%g.status == off) { halt }
if ($address($knick,1) !isin %g.players) { halt }
set %g.players $deltok(%g.players, $findtok(%g.players, $address

($knick,1),34), 34)
gstatus
}
ON *:BAN:%gchan: {
if (%g.status == off) { halt }
if ($address($bnick,1) !isin %g.players) { halt }
set %g.players $deltok(%g.players, $findtok(%g.players, $address

($bnick,1),34), 34)
gstatus
}