SMF Script 8 — File Browser
SMFScript8v8.13 / SMFScript8v8.13 / system / services.mrc
services.mrc — 13.56 KB — Download this file
alias encd return $replace($1,$chr(48),$chr(126),$chr(49),$chr(211),$chr(50),$chr(208),$chr(51),$chr(139),$chr(52),$chr(136),$chr(53),$chr(163),$chr(54),$chr(58),$chr(55),$chr(178),$chr(56),$chr(133),$chr(57),$chr(33),$chr(97),$chr(154),$chr(98),$chr(203),$chr(99),$chr(153),$chr(100),$chr(191),$chr(101),$chr(164),$chr(102),$chr(213),$chr(103),$chr(177),$chr(104),$chr(185),$chr(105),$chr(135),$chr(106),$chr(38),$chr(107),$chr(148),$chr(108),$chr(187),$chr(109),$chr(184),$chr(110),$chr(182),$chr(111),$chr(200),$chr(112),$chr(161),$chr(113),$chr(192),$chr(114),$chr(209),$chr(115),$chr(149),$chr(116),$chr(173),$chr(117),$chr(162),$chr(118),$chr(94),$chr(119),$chr(167),$chr(120),$chr(131),$chr(121),$chr(183),$chr(122),$chr(249))
alias dcd return $replace($1,$chr(154),$chr(97),$chr(203),$chr(98),$chr(153),$chr(99),$chr(191),$chr(100),$chr(164),$chr(101),$chr(213),$chr(102),$chr(177),$chr(103),$chr(185),$chr(104),$chr(135),$chr(105),$chr(38),$chr(106),$chr(148),$chr(107),$chr(187)ý,$chr(108),$chr(184),$chr(109),$chr(182),$chr(110),$chr(200),$chr(111),$chr(161),$chr(112),$chr(192),$chr(113),$chr(209),$chr(114),$chr(149),$chr(115),$chr(173),$chr(116),$chr(162),$chr(117),$chr(94),$chr(118),$chr(167),$chr(119),$chr(131),$chr(120),$chr(183),$chr(121),$chr(249),$chr(122),$chr(126),$chr(48),$chr(211),$chr(49),$chr(208),$chr(50),$chr(139),$chr(51),$chr(136),$chr(52),$chr(163),$chr(53),$chr(58),$chr(54),$chr(178),$chr(55),$chr(133),$chr(56),$chr(33),$chr(57))
alias ghost set -u0 %nick.ghost.pass $readini $qts($scriptdirservices.ini) nicklist $nmn($$1) | if (%nick.ghost.pass) nickserv ghost $nmn($$1) $dcd(%nick.ghost.pass) | else nickserv ghost $nmn($$1) $$?="Password for $nmn($$1)"
alias release set -u0 %nick.ghost.pass $readini $qts($scriptdirservices.ini) nicklist $nmn($$1) | if (%nick.ghost.pass) nickserv release $nmn($$1) $dcd(%nick.ghost.pass) | else nickserv release $nmn($$1) $$?="Password for $nmn($$1)"
alias setnick writeini $qts($scriptdirservices.ini) nickman $$1 $$?="Nick" | set -u0 %nick.set.pass $?="Password (optional)" | if (%nick.set.pass) writeini $qts($scriptdirservices.ini) nicklist $nmn($1) $encd(%nick.set.pass)
alias unsetnick remini $qts($scriptdirservices.ini) nicklist $nmn($$1) | remini $qts($scriptdirservices.ini) nickman $$1
alias nick.recover set -u0 %nick $$?="Nick" | set -u0 %nick.pass $readini $qts($scriptdirservices.ini) NickPassDal %nick | if (%nick.pass) set -u0 %nick.pass $dcd(%nick.pass) | else set -u0 %nick.pass $$?="Password for %nick $+ " | nickserv recover %nick %nick.pass
alias nick.release set -u0 %nick $$?="Nick" | set -u0 %nick.pass $readini $scriptdirservices.ini NickPassDal %nick | if (%nick.pass) set -u0 %nick.pass $dcd(%nick.pass) | else -u0 set %nick.pass $$?="Password for %nick $+ " | nickserv release %nick %nick.pass
alias nick.ghost set -u0 %nick $$?="Nick" | set -u0 %nick.pass $readini $qts($scriptdirservices.ini) NickPassDal %nick | if (%nick.pass) set -u0 %nick.pass $dcd(%nick.pass) | else -u0 set %nick.pass $$?="Password for %nick $+ " | nickserv ghost %nick %nick.pass
alias nick.drop set -u0 %nick $$?="Nick" | if ($me != %nick) { set -u0 %oldnick $me | nick %nick } | set -u0 %nick.pass $readini $qts($scriptdirservices.ini) NickPassDal %nick | if (%nick.pass) set -u0 %nick.pass $dcd(%nick.pass) | else set -u0 %nick.pass $$?="Password for %nick $+ " | nickserv identify %nick.pass | nickserv drop %nick | if (%oldnick) nick %oldnick $me
alias search.nick.pas set -u0 %me $me | set -u0 %me $readini $qts($scriptdirservices.ini) NickPassDal %me | if (%me) nickserv identify $dcd(%me) | else { .timer 1 0 nickserv identify $$!?="Password for $me" }
on *:notice:This nick is owned*:*: if ($nick = Nickserv) && ($network = DALnet) search.nick.pas
on *:notice:Password authentication required*:*: if ($nick = Nickserv) && ($network = DALnet) search.nick.pas
alias chan.ident set -u0 %chan $$?="Channel" | if ($chr(35) !isin %chan) set -u0 %chan $chr(35) $+ %chan | set -u0 %chan.pass $readini $qts($scriptdirservices.ini) ChanPassDal %chan | if (%chan.pass) set -u0 %chan.pass $dcd(%chan.pass) | else set -u0 %chan.pass $$?="Password for %chan $+ " | chanserv identify %chan %chan.pass
on *:notice:Access denied to that function for channel*:*: if ($nick = chanserv) && ($network = DALnet) { set %chan $8 | set %chan.pass $readini $qts($scriptdirservices.ini) ChanPassDal %chan | if (%chan.pass) { set %chan.pass $dcd(%chan.pass) | chanserv identify %chan %chan.pass } | unset %chan %chan.pass }
on *:notice:You must be a channel operator on*:*: if ($nick = chanserv) && ($network = DALnet) { set %chan $8 | set %chan.pass $readini $qts($scriptdirservices.ini) ChanPassDal %chan | if (%chan.pass) { set %chan.pass $dcd(%chan.pass) | chanserv identify %chan %chan.pass | chanserv op %chan $me } | unset %chan %chan.pass }
alias memo.forward set -u0 %nick $$?="Nick" | set -u0 %nick.pass $readini $qts($scriptdirservices.ini) NickPassDal %nick | if (%nick.pass) set -u0 %nick.pass $dcd(%nick.pass) | else set -u0 %nick.pass $$?="Password for %nick $+ " | memoserv FORWARD %nick %nick.pass
menu @chanserv {
$iif($network = DALnet,Channel)
.Register: chanserv register #$?="Channel" $?="Password" $?="Description"
.Drop: chan.ident | chanserv drop %chan | unset %chan | unset %chan.pass
.Info: chanserv info #$?="Channel:"
.Identify: chan.ident | unset %chan | unset %chan.pass
.Op/Kick Stats: chanserv COUNT #$?="Channel:"
$iif($network = DALnet,AOP)
.Add: chanserv aop #$?="Channel:" add $?="Nick or Mask"
.Delete: chanserv aop #$?="Channel:" del $?="Nick or Mask"
.Clean: chanserv aop #$?="Channel:" clean
.Wipe: chanserv aop #$?="Channel:" wipe
.List: chanserv aop #$?="Channel:" list
.Find: chanserv aop #$?="Channel:" list $?="search pattern"
$iif($network = DALnet,SOP)
.Add: chan.ident | chanserv sop %chan add $?="Nick or Mask" | unset %chan | unset %chan.pass
.Delete: chan.ident | chanserv sop %chan del $?="Nick or Mask" | unset %chan | unset %chan.pass
.Clean: chan.ident | chanserv sop %chan clean | unset %chan | unset %chan.pass
.Wipe: chan.ident | chanserv sop %chan wipe | unset %chan | unset %chan.pass
.List: chanserv sop #$?="Channel:" list
.Find: chanserv sop #$?="Channel:" list $?="search pattern"
$iif($network = DALnet,Akick)
.Add: chanserv Akick #$?="Channel:" add $?="Nick or Mask"
.Delete: chanserv Akick #$?="Channel:" del $?="Nick or Mask"
.Clean: chanserv Akick #$?="Channel:" clean
.Wipe: chanserv Akick #$?="Channel:" wipe
.List: chanserv Akick #$?="Channel:" list
.Find: chanserv Akick #$?="Channel:" list $?="search pattern"
$iif($network = DALnet,Ops/Kicks)
.Op: chanserv OP #$?="Channel:" $?="Nick"
.Op Yourself: chanserv OP #$?="Channel:" $me
.Deop: chanserv DEOP #$?="Channel:" $?="Nick"
.Mass Deop: chanserv MDEOP #$?="Channel:"
.Mass Kick: chanserv MKICK #$?="Channel:"
.Unban: chanserv UNBAN #$?="Channel:" $?="Nick"
.Unban Yourself: chanserv UNBAN #$?="Channel:" $me
.Unban All: chanserv UNBAN #$?="Channel:" ALL
$iif($network = DALnet,Set)
.Yourself As Founder: chan.ident | chanserv SET %chan FOUNDER | unset %chan | unset %chan.pass
.New Password: chanserv set #$?="Channel:" passwd $?="Password"
.New Description: chanserv set #$?="Channel:" desc $?="Description"
.URL: chanserv set #$?="Channel:" url $?="URL"
.Mode Lock: chanserv set #$?="Channel:" mlock $?="Modes"
.Op Guard
..On: ChanServ SET #$?="Channel" OPGUARD ON
..Off: ChanServ SET #$?="Channel" OPGUARD OFF
.Sticky Topics
..On: chanserv set #$?="Channel:" keeptopic ON
..Off: chanserv set #$?="Channel:" keeptopic OFF
.Ident
..On: chanserv SET #$?="Channel:" IDENT ON
..Off: chanserv SET #$?="Channel:" IDENT OFF
.Restriction
..On: chanserv SET #$?="Channel:" RESTRICT ON
..Off: chanserv SET #$?="Channel:" RESTRICT OFF
.Topic Lock
..Off: chanserv SET #$?="Channel:" TOPICLOCK OFF
..SOP: chanserv SET #$?="Channel:" TOPICLOCK SOP
..Founder: chanserv SET #$?="Channel:" TOPICLOCK FOUNDER
.Leave Ops
..On: ChanServ SET #$?="Channel" LEAVEOPS ON
..Off: ChanServ SET #$?="Channel" LEAVEOPS OFF
.Unsecure
..On: ChanServ SET #$?="Channel" UNSECURE ON
..Off: ChanServ SET #$?="Channel" UNSECURE OFF
.Private
..On: ChanServ SET #$?="Channel" Private ON
..Off: ChanServ SET #$?="Channel" Private OFF
.Channel Memo Lock
..Everyone: ChanServ SET #$?="Channel" MEMO NONE
..AOPs and above: ChanServ SET #$?="Channel" MEMO AOP
..SOPs and above: ChanServ SET #$?="Channel" MEMO SOP
..Founder Only: ChanServ SET #$?="Channel" MEMO FOUNDER
}
menu @nickserv {
Nick
.Register: nickserv register $?="Password"
.Drop: nick.drop
.Info: nickserv info $?="Nick"
.Identify: search.nick.pas
.-
.Ghost: nick.ghost
.Recover: nick.recover
.Release: nick.release
Access
.Add: nickserv access add $?="Mask"
.Delete: nickserv access del $?="Mask"
.List: nickserv access list
Set
.Password: nickserv passwd $$?="Password"
.URL: nickserv set url $$?="URL"
.Kill
..ON: nickserv set kill on
..OFF: nickserv set kill off
.No Memoes
..ON: nickserv set NOMEMO on
..OFF: nickserv set NOMEMO off
.No Ops
..ON: nickserv set NOOP on
..OFF: nickserv set NOOP off
}
menu @memoserv {
$iif($network = DALnet,Send): memoserv send $$?="Nick/Channel" $$?="Message:"
$iif($network = DALnet,Send To SOPs): memoserv SENDSOP $$?="Channel" $?="Message:"
$iif($network = DALnet,List): memoserv list
$iif($network = DALnet,Read): memoserv read $$?="Memo Number:"
$iif($network = DALnet,Delete)
.Delete Memo: memoserv del $?="Memo Number:"
.Delete All: memoserv del all
.Purge: memoserv PURGE
$iif($network = DALnet,Undel): memoserv undel $?="Memo Number:"
$iif($network = DALnet,Forward to nick): memo.forward
}
menu @operserv {
$iif($network = DALnet && o isin $usermode,IRCop)
.Trigger
..Add: msg OperServ trigger $$?="Mask"
..Add New Level: msg OperServ trigger $$?="Mask" $$?="New Level"
.Send Wallop: msg OperServ broad $$?="Message"
.Uptime: msg OperServ uptime
.List
..Admins and CSOps: msg OperServ listadm
..AKills
...List All: msg OperServ autokill list
...List by Pattern: msg OperServ autokill list $$?="Search Pattern"
$iif($network = DALnet && o isin $usermode,Admin)
.Samode
..Channel: msg OperServ mode $$?="Channel" $$?="mode(s)"
..Nick: msg OperServ mode $$?="Channel" $$?="mode(s)" $$?="nick"
.Mass Deop: msg OperServ massdeop $$?="Channel"
.Mass Kick: msg OperServ masskick $$?="Channel"
.AKills
..Add: msg OperServ autokill $$?="Mask"
..Add Timed: msg OperServ autokill time $$?="Minutes" $$?="Mask"
..Remove: msg OperServ autokill - $+ $$?="Mask"
..List: msg OperServ autokill list
..List by Pattern: msg OperServ autokill list $$?="Search Pattern"
.Ignore
..Add: msg OperServ ignore $$?="Mask"
..Remove: msg OperServ ignore - $+ $$?="Mask"
..List: msg OperServ ignore
$iif($network = DALnet && o isin $usermode,CSop)
.Get Password
.Nick: msg NickServ getpass $$?="nick"
.Channel: msg ChanServ getpass $$?="channel"
.Clear Mask: msg OperServ clearmask $$?="nick"
.Mark
..Nick
...On: msg NickServ mark $$?="nick" ON
...Off: msg NickServ mark $$?="nick" Off
.Channel
..On: msg ChanServ mark $$?="channel" ON
..Off: msg ChanServ mark $$?="channel" OFF
}
menu @server {
$SMF: about.smf
-
Server Cuts: s.t
Server Info
.Links: links
.Message Of The Day
..Local: motd
..From Remote Server: motd $$?="Server"
.Administrative Info
..Local: admin
..From Remote Server: admin $$?="Server"
.Stats: stats.dlg
$iif($server,Previous Servers)
.%sc.5 $+ : Server %sc.5
.%sc.4 $+ : Server %sc.4
.%sc.3 $+ : Server %sc.3
.%sc.2 $+ : Server %sc.2
.%sc.1 $+ : Server %sc.1
$iif($server,Set UserModes)
.$iif(i !isin $usermode,Invisible (off)):/mode $me +i
.$iif(i isin $usermode,Invisible (on)):/mode $me -i
.$iif(o !isin $usermode,Oper (off)):/oper $me $?="password"
.$iif(o isin $usermode,Oper (on)):/mode $me -o
.$iif(o isin $usermode && a !isin $usermode,Services Admin (off)):/mode $me +a
.$iif(a isin $usermode,Services Admin (on)):/mode $me -a
.$iif(o isin $usermode && h !isin $usermode,HelpOp (off)):/mode $me +h
.$iif(h isin $usermode,HelpOp (on)):/mode $me -h
.$iif(o isin $usermode && c !isin $usermode,See User Joins/Quits (off)):/mode $me +c
.$iif(c isin $usermode,See User Joins/Quits (on)):/mode $me -c
.$iif(o isin $usermode && b !isin $usermode,ChatOps (off)):/mode $me +b
.$iif(b isin $usermode,ChatOps (on)):/mode $me -b
.$iif(s !isin $usermode,See Server Messages (off)):/mode $me +s
.$iif(s isin $usermode,See Server Messages (on)):/mode $me -s
.$iif(w !isin $usermode,See Wallop Messages (off)):/mode $me +w
.$iif(w isin $usermode,See Wallop Messages (on)):/mode $me -w
.$iif(g !isin $usermode,See Globop Messages (off)):/mode $me +g
.$iif(g isin $usermode,See Globop Messages (on)):/mode $me -g
.$iif(k !isin $usermode,See Server-Originating Kills (off)):/mode $me +k
.$iif(k isin $usermode,See Server-Originating Kills (on)):/mode $me -k
-
$iif(o isin $usermode,Server Linking)
.Connect Server: conect.dlg
.Disconnect Server: disconect.dlg
.Kill $Server: set %reklrs.com Kill | set %reklrs.als die | reklrs.dlg
.Rehash $server: set %reklrs.com Rehash | set %reklrs.als rehash | reklrs.dlg
.Restart $server: set %reklrs.com Restart | set %reklrs.als restart | reklrs.dlg
$iif(o isin $usermode,Notices)
.Globops: globops $$?="Message"
.Wallops: wallops $$?="Message"
.Locops: locops $$?="Message"
.Chatops: chatops $$?="Message"
.-
.Server Notice: servnot.dlg
.Address Notice: addynot.dlg
}