[start] network=NitroNet servis.nick=Nickserv,Chanserv,Memoserv servis.site= clonemask=2 ialupd=2 idenon=3 k2b.string=*registado e protegido* k2b.command=nickserv identify [popups] #spopup on menu status { $_network .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:/set %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:/memoserv list ..read memo:/memoserv read $$?="Enter message number" ..send memo:/memoserv SEND $$?="Enter nick" $$?="Enter message" ..delete memo:/memoserv del $$?="Enter message number" ..- ..list channel memos:/memoserv list $$?="Channel name:" ..read channel memo:/memoserv read $$?="Channel name:" $?="Enter message number" ..send channel memo:/memoserv send $$?="Channel name:" $?="Enter message" ..delete channel memo:/memoserv del $$?="Channel name:" $?="Enter message number" ..- ..delete all memos:/memoserv del all ..- ..set ...limit ....limit:/memoserv SET LIMIT $$?=Set the maximum number of memos you can receive" ....limit chan://memoserv SET LIMIT $$?="enter chan" $$?="Set the maximum number of memos chan can receive" ...notify ....on:/memoserv SET NOTIFY on ....logon:/memoserv SET NOTIFY logon ....new:/memoserv SET NOTIFY new ....off:/memoserv SET NOTIFY off ..- ..help:/memoserv help } ; menu channel { $_network .$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 .- .help:cs help $$?="Enter command to get HELP on:" } ; menu nicklist { $_network .$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 } #spopup end