/ScriptServ

$iif(($_connected) && ($chan(#).ial == $false),update ial):{ _scanial }
&setup
.&setup:{ chansetup }
.&protection:{ cprot }
-
$iif(($me isop #) || $_not($_ischanmode(#,t)),&topic)
.&topic:{ .quote topic # : $+ $_rparameter($null,1,Channel Topic [/topic],normal,$chan(#).topic,topic,#,Topic for [ # ] ) }
.&clear:{ topic # - }
$iif($me isop #,&modes)
.+nt:{
  var %m
  if ($gettok($chan(#).mode,1,32) != $null) {
    if ($removecs($ifmatch,+,n,t) != $null) { %m = - $+ $ifmatch }
  }
  mode # +tn $+ %m $chan(#).key
}
.+smitnkl...:{ mode # +smitnkl $_param(1,$null,Channel Key:) $_param(isint,$null,Max users in channel:) }
.m&odes...:{ mode # $_param(normal,$chan(#).mode,Enter modes: (sug:+nt-iklm)) }
.$iif($_ischanmode(#,l),change limit...):{ mode # +l $_param(isint,$chan(#).limit,Max users in channel:) }
.$iif($_ischanmode(#,k),change key...):{
  var %k = $_parameterpass($null,1,$null,1,$chan(#).key,Channel Key:)
  mode # -k $chan(#).key
  mode # +k %k
}
.-
.$`ifmm($_ischanmode(#,i)) &invite only	+i:{ _togglechanmodes # i }
.$`ifmm($_ischanmode(#,l)) &limit	+l:{ _togglechanmodes # l }
.$`ifmm($_ischanmode(#,p)) &private	+p:{ _togglechanmodes # p }
.$`ifmm($_ischanmode(#,s)) &secret	+s:{ _togglechanmodes # s }
.$`ifmm($_ischanmode(#,k)) &key	+k:{ _togglechanmodes # k }
.$`ifmm($_ischanmode(#,m)) &moderated	+m:{ _togglechanmodes # m }
.$`ifmm($_ischanmode(#,n)) &no external messages	+n:{ _togglechanmodes # n }
.$`ifmm($_ischanmode(#,t)) restricted &topic	+t:{ _togglechanmodes # t }
$iif($_connected,&bans)
.&unban...:{ unban }
.unban &all:{ unban * }
.-
.&enforce:{ enforcebans }
$iif(($_connected) && ($me !isop #),&mass)
.&msg
..&chan...:{ msg # }
..$iif(%.maxtargs == 0,&nono.ps...):{ dmsg # }
..&ops...:{ omsg # }
..ops && &voices...:{ ovmsg # }
.&notice
..&chan...:{ notice # }
..$iif(%.maxtargs == 0,&nonops...):{ dnotice # }
..&ops...:{ onotice # }
..ops && &voices...:{ ovnotice # }
.-
.&invite
..&all...:{ minvite }
..&nonops...:{ minvite $_parameter($null,1,Mass Invite [/minvite],ischan,$null,Channel:) nop }
..&ops...:{ minvite $_parameter($null,1,Mass Invite [/minvite],ischan,$null,Channel:) op }
;
$iif(($_connected) && ($me isop #),&mass)
.&msg
..&all...:{ msg # }
..$iif(%.maxtargs == 0,&nonops...):{ dmsg # }
..&ops...:{ omsg # }
..ops && &voices...:{ ovmsg # }
.&notice
..&all...:{ notice # }
..$iif(%.maxtargs == 0,&nonops...):{ dnotice # }
..&ops...:{ onotice # }
..ops && &voices...:{ ovnotice # }
.-
.&op:{ mop }
.&voice:{ mvoice }
.deop:{ mdeop }
.devoice:{ mdevoice }
.&deop/devoice:{ mdeov }
.-
.&kick
..&all:{ mk }
..&nonops:{ mk nop }
..&ops:{ mk op }
.&ban
..&all:{ mb }
..&nonops:{ mb nop }
..&ops:{ mb op }
.kick/ban
..&all:{ mbk }
..nonops:{ mbk nop }
..ops:{ mbk op }
.-
.&invite
..&all...:{ minvite }
..&nonops...:{ minvite $_parameter($null,1,Mass Invite [/minvite],ischan,$null,Channel:) nop }
..&ops...:{ minvite $_parameter($null,1,Mass Invite [/minvite],ischan,$null,Channel:) op }
$iif($_connected,c&tcp)
.&ping:{ ctcp # ping }
.&version:{ ctcp # version }
.&clientinfo:{ ctcp # clientinfo }
.&finger:{ ctcp # finger }
.&time:{ ctcp # time }
.&userinfo:{ ctcp # userinfo }
.&xdcc
..&list:{ ctcp # xdcc list }
..&help:{ ctcp # xdcc help }
.-
.c&tcp ?...:{ ctcp # $_param(normal,$null,< CTCP > [ Parameters ]) }
$iif($_connected,&scans)
.&mask:{ scanmask # }
.&aways:{ awayscan }
.&clones:{ clones }
.&ircops:{ ircopscan }
.-
.$iif($_portscan.addonver,&ftps [21]):{ portscan # 21 }
.$iif($_portscan.addonver,&webs [80]):{ portscan # 80 }
.$iif($_portscan.addonver,win&gates [1080]):{ portscan # 1080 }
.$iif($_portscan.addonver,&port ?...):{ portscan # }
&info
.&log:{ logs # }
.$iif($_connected,&stats):{ chanstats }
.-
.$iif($_connected,&bans):{ mode # +b }
.$iif($_connected,&names):{ names # }
.$iif($_connected,&topic):{ topic # }
.$iif($_connected,&who):{ who # }
$iif($_connected,&channel)
.invite...:{ invite $_param(1,$null,Invite user:) # }
.channel central...:{ channel }
.-
.cycle:{ rejoin }
.part:{ part }
;