/ScriptServ

$_banpop:{ }
$iif((($mid(%`popups.4,1,1) != 0) && ((%`popups.hideop != 1) || ($me isop #))) || ($mouse.key & 2),Quick kick):kick # $$snicks
$iif((($mid(%`popups.4,2,1) != 0) && ((%`popups.hideop != 1) || ($me isop #))) || ($mouse.key & 2),Quick ban):cb # $$snicks
-
$iif((($mid(%`popups.4,3,1) != 0) && ((%`popups.hideop != 1) || ($me isop #))) || ($mouse.key & 2),Kick...):kick # $$snicks $_rentry(kick,0,$_s2p($_msg(kick)),Reason for kick?)
$iif((($mid(%`popups.4,4,1) != 0) && ((%`popups.hideop != 1) || ($me isop #))) || ($mouse.key & 2),Bans)
.%.ban2:kb # $$snicks 032 $_rentry(kick,0,$_s2p($_msg(kick)),Reason for kickban?)
.%.ban3:kb # $$snicks 034 $_rentry(kick,0,$_s2p($_msg(kick)),Reason for kickban?)
.%.ban4:kb # $$snicks 033 $_rentry(kick,0,$_s2p($_msg(kick)),Reason for kickban?)
.%.ban5:kb # $$snicks 036 $_rentry(kick,0,$_s2p($_msg(kick)),Reason for kickban?)
.-
.%.banS:kb # $$snicks 2 $_rentry(kick,0,$_s2p($_msg(kick)),Reason for kickban?)
.-
.%.banD:kb # $$snicks 4 $_rentry(kick,0,$_s2p($_msg(kick)),Reason for kickban?)
.-
.Tempban
..20	secs:if ($1 == $null) halt | %.time = 20 | var %why = $$dialog(tempban,tempban,-4) | tempban %.time # $snicks %why
..60	secs:if ($1 == $null) halt | %.time = 60 | var %why = $$dialog(tempban,tempban,-4) | tempban %.time # $snicks %why
..-
..5	mins:if ($1 == $null) halt | %.time = 5 | var %why = $$dialog(tempban,tempban,-4) | tempban %.time # $snicks %why
..10	mins:if ($1 == $null) halt | %.time = 10 | var %why = $$dialog(tempban,tempban,-4) | tempban %.time # $snicks %why
.-
.Cloneban...:cb # $$snicks $_rentry(kick,0,$_s2p($_msg(kick)),Reason for cloneban?)
.Blacklist...:_nurple # black **
-
$iif((($mid(%`popups.4,5,1) != 0) && ($snick(#,$snick(#,0)) !isop #) && ((%`popups.hideop != 1) || ($me isop #))) || ($mouse.key & 2),Op):op # $$snicks
$iif((($mid(%`popups.4,5,1) != 0) && ($snick(#,1) isop #) && ((%`popups.hideop != 1) || ($me isop #))) || ($mouse.key & 2),Deop):deop # $$snicks
$iif((($mid(%`popups.4,5,1) != 0) && ($snick(#,$snick(#,0)) isreg #) && ((%`popups.hideop != 1) || ($me isop #))) || ($mouse.key & 2),Voice):voc # $$snicks
$iif((($mid(%`popups.4,5,1) != 0) && (($snick(#,1) isvo #) || ($snick(#,$snick(#,0)) isvo #)) && ((%`popups.hideop != 1) || ($me isop #))) || ($mouse.key & 2),Devoice):devoc # $$snicks
-
$iif(($mid(%`popups.4,6,1) != 0) || ($mouse.key & 2),User info)
.Whois:whois $$snicks
.Extended whois:ew $$snicks
.User central:uwho $$1
.Address book:abook $$1
.-
.DNS:_nurple # dns **
.Hostmask:_nurple # host **
.-
.Ping server:_nurple # sping **
$iif(($mid(%`popups.4,7,1) != 0) || ($mouse.key & 2),CTCP)
.Ping:ping $$snicks
.-
.PAGE...:ctcp $$snicks PAGE $_entry(1,$null,Reason for paging,$1?(optional))
.TIME:ctcp $$snicks TIME
.USERINFO:ctcp $$snicks USERINFO
.VERSION:ctcp $$snicks VERSION
.-
.XDCC LIST:ctcp $$snicks XDCC LIST
.XDCC SEND...:ctcp $$snicks XDCC SEND $_entry(-2,1,Packet to request?)
.-
.$_rec(ctcp,1):ctcp $$snicks %=ctcp.1
.$_rec(ctcp,2):ctcp $$snicks %=ctcp.2
.$_rec(ctcp,3):ctcp $$snicks %=ctcp.3
.$_rec(ctcp,4):ctcp $$snicks %=ctcp.4
.$_rec(ctcp,5):ctcp $$snicks %=ctcp.5
.-
.%=ctcp.clr:_recclr ctcp
.Other...:ctcp $$snicks $_entry(0,$null,CTCP to send to,$1?)
$iif(($mid(%`popups.4,8,1) != 0) || ($mouse.key & 2),DCC)
.Chat:dcc chat $$1
.Chat to IP:dcc chat . $+ $$1
.-
.Send:dcc send $$1
.Send to IP:dcc send . $+ $$1
.-
.Authorize for DCCs:_nurple # auth **
.Temp authorize:_nurple # auth ** 15
.Remove authorize:_nurple # auth -r **
$iif(($mid(%`popups.4,9,1) != 0) || ($mouse.key & 2),Query):query $$snicks
-
$iif(($mid(%`popups.4,10,1) != 0) || ($mouse.key & 2),Lists)
.Userlist...:user $$snicks
.Notify...:notif $_c2s($$snicks)
.-
.Ignore user...:_nurple # ign **
.Remove from ignore...:_nurple # ign -r **
.-
.Blacklist...:_nurple # blacklist **
$iif(($mid(%`popups.4,11,1) != 0) || ($mouse.key & 2),Notices)
.Ops...:onotice # $_entry(0,$null,Notice to send to all ops?)
.Ops + Voices...:ovnotice # $_entry(0,$null,Notice to send to all ops / voiced?)
.Non-ops...:peon # $_entry(0,$null,Notice to send to all non-ops?)
.-
.Selected...:ntc $$snicks $_entry(0,$null,Notice to send to,$iif($numtok($snicks,44) == 1,$snicks,selected users),?)
.All but selected...:allbut # $$snicks $_entry(0,$null,Notice to send to everyone but,$iif($numtok($snicks,44) == 1,$snicks,selected users),?)