|
on 10:text:!bnc*:#: {
if ($2 == $null) { .notice $nick %logo Commands: !bnc add <ident> <nickname> -- !bnc del <ident> -- !bnc antal -- !bnc jump <ident> -- !bnc join <ident> #chan -- !bnc part <ident> #chan -- !bnc pass <ident> <nick> %logo | HALT }
if ($2 == add) && ($lines(idents.txt) < %totalusers) && ($3 != $null) && ($4 != $null) {
set %password $remove($($str($!rand(a,z) $+ $chr(32), 3),2),$chr(32)) $+ $remove($($str($!rand(0,9) $+ $chr(32), 2),2),$chr(32)) $+ $remove($($str($!rand(a,z) $+ $chr(32), 3),2),$chr(32))
sbnc adduser $3 %password
set %bnctojoin $3
write idents.txt $3
sbnc simul $3 sbnc set realname 7,12BNC by #club-eSport
sbnc simul $3 join &partyline
sbnc simul $3 join #club-eSport
sbnc simul $3 sbnc set server de.quakenet.org 6669
timer 1 4 msg $4 %logo You have been added with ident: $3 - and password: %password %logo
timer 1 5 msg $4 %logo The hostname of the server is: bnc.quickbnc.dk - port: 6005 %logo
timer 1 6 msg $4 %logo For quickconnect, type: /server bnc.quickbnc.dk:6005 %password -i $3 $3 $+ ^ $+($3,@MoW.bnc) $3 %logo
timer 1 7 msg $4 %logo Remember to idle on #club-eSport !! %logo
timer 1 8 msg Q settopic #club-eSport #Club-eSport - www.club-esport.dk : New system for our cups and big cup - BNC-Status: $lines(idents.txt) $+ / $+ 100 slots - sBNCServ: Online - Brug !menu
.notice $nick %logo User: $3 - has been added as ident $3 with password %password and info has sent to $4 %logo
.notice $nick %logo Now $lines(idents.txt) users out of %totalusers total. %logo
.notice $nick %logo /server bnc.quickbnc.dk:6005 %password -i $3 $3 $+ ^ $+($3,@) $3 %logo
unset %password
}
if ($2 == del) && ($3) {
sbnc deluser $3
write -ds $+ $3 idents.txt
msg $chan %logo User: $3 - Has been deleted. %logo
timer 1 4 msg Q settopic #club-eSport #Club-eSport - www.club-esport.dk : New system for our cups and big cup - BNC-Status: $lines(idents.txt) $+ / $+ 100 slots - sBNCServ: Online - Brug !menu
}
if ($2 == antal) {
msg $chan %logo Numbers of users: $lines(idents.txt) out of %totalusers total. %logo
}
if ($2 == help) {
.notice $nick %logo Commands: !bnc add <ident> <nickname> -- !bnc del <ident> -- !bnc antal %logo
}
if ($2 == jump) {
sbnc simul $3 :sbnc jump
}
if ($2 == join) {
sbnc simul $3 :join $4
}
if ($2 == part) {
sbnc simul $3 :part $4
}
elseif ($2 == pass) {
if ($3 !ison $chan) { notice $nick %logo Syntax: !bnc pass <nick> <ident> %logo | halt }
var %x = $rand(10000,10000000)
msg -sbnc resetpass $4 %x
msg $3 %logo Your sBNC pass has been reset by: $nick %logo
msg $3 %logo Details: %logo
msg $3 %logo Ident: $4 %logo Pass: %x %logo IP: bnc.quickbnc.dk %logo Port: 6005 %logo
notice $nick %logo Done. %logo
}
}
|