[start]
network=1
servis.nick=Nickserv,Chanserv,Memoserv
clonemask=2
ialupd=2
idenon=3
k2b.string=*registered and protected*
k2b.command=nickserv identify <pass>
[popups]
#spopup on
menu status {
BOL-Chat
..nickserv
...info:ns info $$?="enter nick"
...status:ns info $$?="enter nick"
...-
...identify:ns identify $$?="enter password"
...-
...ghost kill:var %n = $$?="Nickname (ghost) to kill?" | if ($istok($_´(nickserv,nicks),%n,32)) var %p $_reg.pass(%n) | else var %p = $$?*="Pass?" | nickserv ghost %n %p 
...getnick:ns getnick $$?="Nick?" $$?*="Extrapassword:"
...release nick:ns RELEASE $$?="enter nick" $$?="enter password"
...recover :ns RECOVER $$?="enter nick"
...-
...registration
....register $me $+ :nickserv REGISTER $$?="Password for $me $+ ?" $?="Email?"
....drop (unregister) $me:if ($?!="Are you sure you want to drop " $+ $me $+ "?") nickserv DROP $$?="Enter extrapass"
....-
....set password:nickserv set password $$?="Enter your new password"
...-
...set nickserv settings
....ajoin
.....join chan:ns AJOIN NOW
.....list chans:ns AJOIN list
.....-
.....add chan:ns AJOIN add $$?="Enter chan tho add tho your ajoin list"
.....del chan:ns AJOIN del $$?="Enter chan tho del tho your ajoin list"
....linked nicks
.....link nick:ns LINK $$?="enter nick" $$?="enter password"
.....unlink nick:ns UNLINK $$?="enter nick" $$?="enter password"
.....-
.....list linked nicks:ns LISTLINKS
....private
.....on (your info won't appear):nickserv set private on
.....off (your info will appear):nickserv set private off
....url
.....set:nickserv set url $$?="New URL to store in NickServ for $me $+ ?"
.....clear:nickserv set url
....email
.....set:nickserv set email $$?="New email to store in NickServ for $me $+ ?"
.....clear:nickserv set email
....language
.....set:ns SET LANGUAGE $$?="number (1-5)"
....location
.....set:ns SET LOCATION $$?="location"
....icq
.....set:ns SET ICQNUMBER $$?="number"
....kill
.....on:ns set kill on
.....quick:ns set kill quick
.....immed:ns set kill immed
.....off:ns set kill off
...-
...notes
....store:ns NOTES ADD $$?="write note text"
....delete:ns NOTES DEL $$?="number to del?"
....-
....list all:ns NOTES LIST
...-
...help:ns help 
..chanserv
...register channel:cs register $$?="Channel name:" $$?*="Password?" $$?="Description of Channel:"
...drop channel:cs drop $$?="Channel name:"
...identify channel:cs identify $$?="Channel name:" $$?*="Password?"
...info channel:cs info $$?="Channel name:"
...-
...unban self:chanserv unban $$?="Channel to unban self from?"
...invite self:chanserv invite $$?="Channel to invite self to?"
...op self:cs op $$?="Channel to op self from?" $me
...deop self:cs deop $$?="Channel to deop self from?" $me
...-
...levels
....block levels set:cs levels  $$?="Channel name:" disable
....reset levels:cs levels  $$?="Channel name:" reset
....list levels sets:cs levels  $$?="Channel name:" list
....-
....set levels
.....auto-op:cs levels $$?="Channel name:" set autoop $$?="Minimum Level?"
.....auto-voice:cs levels $$?="Channel name:" set autovoice $$?="Minimum Level?"
.....auto-deop:cs levels $$?="Channel name:" set autodeop $$?="Maximum Level?"
.....-
.....no-join:cs levels $$?="Channel name:" set nojoin $$?="Maximum Level?"
.....invite:cs levels $$?="Channel name:" set invite $$?="Minimum Level?"
.....akick:cs levels $$?="Channel name:" set akick $$?="Minimum Level?"
.....-
.....set:cs levels $$?="Channel name:" set set $$?="Minimum Level?"
.....clear:cs levels $$?="Channel name:" set clear $$?="Minimum Level?"
.....unban:cs levels $$?="Channel name:" set unban $$?="Minimum Level?"
.....op-deop:cs levels $$?="Channel name:" set opdeop $$?="Minimum Level?"
.....-
.....read access List:cs levels $$?="Channel name:" set acc-list $$?="Minimum Level?"
.....change access list:cs levels $$?="Channel name:" set acc-change $$?="Minimum Level?"
.....-
.....read channel memos:cs levels $$?="Channel name:" set memo_read $$?="Minimum Level?"
.....send channel memos:cs levels $$?="Channel name:" set memo_send $$?="Minimum Level?"
.....del channel memos:cs levels $$?="Channel name:" set memo_send $$?="Minimum Level?"
....-
....channel Levels help:cs help levels
...set channel settings
....modes:cs set $$?="Channel name:" mlock $?="Enter Channel Modes (+ or - too)"
....topic:cs set $$?="Channel name:" topic $$?="Enter Topic for Channel"
....-
....keeptopic
.....on:cs set $$?="Channel name:" keeptopic ON
.....off:cs set $$?="Channel name:" keeptopic OFF
....topiclock
.....on:cs set $$?="Channel name:" topiclock ON
.....off:cs set $$?="Channel name:" topiclock OFF
....private
.....on:cs set $$?="Channel name:" private ON
.....off:cs set $$?="Channel name:" private OFF
....secure ops
.....on:cs set $$?="Channel name:" secureops ON
.....off:cs set $$?="Channel name:" secureops OFF
....restricted
.....on:cs set $$?="Channel name:" restricted ON
.....off:cs set $$?="Channel name:" restricted OFF
....secure
.....on:cs set $$?="Channel name:" secure ON
.....off:cs set $$?="Channel name:" secure off
....entrymsg
.....set:cs set $$?="Channel name:" ENTRYMSG $$?="what onjoin notice?"
.....unset:cs set $$?="Channel name:" ENTRYMSG
....leaveops
.....on:cs set $$?="Channel name:" leaveops on
.....off:cs set $$?="Channel name:" leaveops off
....opnotice
.....on:cs set $$?="Channel name:" opnotice on
.....off:cs set $$?="Channel name:" opnotice off
....nolinks
.....on:cs set $$?="Channel name:" NOLINKS on
.....off:cs set $$?="Channel name:" NOLINKS off
....-
....other
.....description:cs set $$?="Channel name:" desc $$?="Enter Channel Description"
.....url:cs set $$?="Channel name:" url $$?="Enter URL"
.....e-mail:cs set $$?="Channel name:" email $$?="Enter E-mail"
.....-
.....password:cs set $$?="Channel name:" password $$?*="Enter New Channel Password:"
.....founder:cs set $$?="Channel name:" founder $$?="Enter New Channel Founder (must identify first)"
.....sucessor:cs SET $$?="Channel name:" SUCCESSOR $$?="what nick?"
...-
...clear
....clear ops:cs clear $$?="What channel?" ops
....clear bans:cs clear $$?="What channel?" banickserv
....clear modes:cs clear $$?="What channel?" modes
....clear voices:cs clear $$?="What channel?" voices
....clear users:cs clear $$?="What channel?" users
....-
....clear all:var %clean = $$?="What channel?" | cs clear %clean ops | cs clear %clean voices | cs clear %clean modes | cs clear %clean bans | cs clear %clean users
...-
...unban user:cs unban $$?="Channel to unban from?" $$?"Please enter the nickname"
...invite user:cs invite $$?="Channel to invite to?" $$?"Please enter the nickname"
...op user:cs op $$?="Channel name:" $?="Please enter the nickname"
...deop user:cs deop $$?="Channel name:" $?="Please enter the nickname"
...-
...kick user:cs KICK $$?="enter channel" $$?="enter nick" $$?="enter reason"
...-
...add user:cs access $$?="Channel name:" ADD $$?="Nick ?" $$?="Add at what level ?"
...del user:cs access $$?="Channel name:" DEL $$?="Nick ?"
...list registered users:cs access $$?="Channel name:" list
...-
...add akick:cs AKICK $$?="Channel name:" ADD $$?="Nick or Host Mask?"
...delete akick:cs AKICK $$?="Channel name:" DEL $$?="Nick or Host Mask?"
...list akicks:cs AKICK $$?="Channel name:" LIST
...-
...help:cs help $$?="Command:"
..memoserv
...list memos:ms list
...read memo:ms read $$?="Enter message number"
...send memo:ms SEND $$?="Enter nick" $$?="Enter message"
...delete memo:ms del $$?="Enter message number"
...-
...list channel memos:ms list $$?="Channel name:"
...read channel memo:ms read  $$?="Channel name:" $?="Enter message number"
...send channel  memo:ms send $$?="Channel name:" $?="Enter message"
...delete channel memo:ms del $$?="Channel name:" $?="Enter message number"
...-
...delete all memos:ms del all
...-
...set
....limit
.....limit:ms SET LIMIT $$?=Set the maximum number of memos you can receive"
.....limit chan:ms SET LIMIT $$?="enter chan" $$?="Set the maximum number of memos chan can receive"
....notify
.....on:ms SET NOTIFY on
.....logon:ms SET NOTIFY logon
.....new:ms SET NOTIFY new
.....off:ms SET NOTIFY off
...-
...help:ms help
}
menu channel {
BOL-Chat
..$s.opserv(operserv)
...modes:os mode # $$?="enter mode parameters"
...kick:os kick # $$?="enter nick" $$?="enter reason for kick"
...-
...akill
....akill add:os akill add $$?="enter mask to add" $$?="enter reason"
....akill del:os akill del $$?="enter mask to delete"
....-
....akill list:os akill list $$?="enter masks to list"
....akill view:os akill view $$?="enter mask"
...-
...global msg:os global $$?="enter message"
...stats:os stats $$?="what stats?"
..-
..register channel:cs register # $$?="Password?" $$?="Description of Channel?"
..info on channel:cs info #
..-
..founder
...identify channel:cs identify # $inp(Enter password~Founder login~?*,1)
...channel modes:cs set # mlock $$?="Enter channel modes (+-stimpnkl)"
...change password:cs set # password $$?="Enter new channel password:"
...-
...set
....levels
.....list:cs levels # list
.....-
.....AUTO-OP:cs levels # set autoop $$?="Enter Level"
.....AUTO-VOICE:cs levels # set autovoice $$?="Enter Level"
.....AUTO-DEOP:cs levels # set autodeop $$?="Enter Level"
.....NOJOIN:cs levels # set nojoin $$?="Enter Level"
.....INVITE:cs levels # set invite $$?="Enter Level"
.....AKICK:cs levels # set akick $$?="Enter Level"
.....UNBAN:cs levels # set unban $$?="Enter Level"
.....OPDEOP:cs levels # set opdeop $$?="Enter Level"
.....ACCESS List:cs levels # set acc-list $$?="Enter Level"
.....ACCESS Change:cs levels # set acc-change $$?="Enter Level"
....-
....desc:cs set # desc $?="desc?"
....email:cs set # email $?="email?"
....url:cs set # url $?="url?"
....-
....private
.....on:cs set # private on
.....off:cs set # private off
....keep topic
.....on:cs set # keeptopic on
.....off:cs set # keeptopic off
....topic lock
.....on:cs set # topiclock on
.....off:cs set # topiclock off
....secure ops
.....on:cs set # secureops on
.....off:cs set # secureops off
....entrymsg
.....set:cs set # ENTRYMSG $$?="what onjoin notice?"
.....unset:cs set # ENTRYMSG
....leaveops
.....on:cs set # leaveops on
.....off:cs set # leaveops off
....opnotice
.....on:cs set # opnotice on
.....off:cs set # opnotice off
....nolinks
.....on:cs set # NOLINKS on
.....off:cs set # NOLINKS off
...-
...clear
....clear users:cs clear # users
....clear ops:cs clear # ops
....clear bans:cs clear # bans
....clear modes:cs clear # modes
....clear voices:cs clear # voices
...-
...set founder:cs set # founder $$?="Enter new founder"
...sucessor:cs SET # SUCCESSOR $$?="Enter successor"
...drop channel:cs drop #
..-
..AOP
...add/change:cs access # add $$?="Enter nick" $$?="Enter level"
...delete:cs access # del $$?="Enter nick"
..list AOP:cs access # list
..-
..akick
...add:cs akick # add $$?="Nick/hostmask?" $?="Reason"
...delete:cs akick # del $$?="Nick/hostmask?"
..list akick:cs akick # list
..-
..memoserv
...send:ms send # $$?="What Memo?"
...read:ms read # $$?="Memo Nē:"
...del:ms del # $$?="Memo Nē:"
...-
...list:ms list #
..-
..help:cs help $$?="Enter command to get HELP on:"
}
menu nicklist {
BOL-Chat
..$s.opserv(operserv)
...op:os mode # +o $$1
...deop:os mode # -o $$1
...-
...akill
....akill add:os akill add $$?="enter mask to add" $?="enter reason for akill"
....akill del:os akill del $$?="enter mask to delete from akill"
....-
....akill view:os akill view $$?="enter desired mask"
...akill list:os akill list $$?="enter mask(s) to list"
..-
..$iif(%§.s^c,$iif($snick(#,1) isop #,deop (chanserv),op (chanserv))):chopdeop # $snicks
..-
..AOP
...add/change:cs access # add $1 $?="Level?"
...delete:cs access # del $$1
...-
...list:.cs access # list
..-
..akick
...add:.cs akick # add $1 $?="Reason"
...delete:.cs akick # del $1
...-
...list:.cs akick # list
..-
..send memo:ms SEND $$1 $$?="Enter message"
}
#spopup end
.