[start] network=PTnet servis.nick=NickServ, ChanServ, MemoServ, OperServ, SockServ and CloneServ servis.site=www.PTnet.org/PThelp clonemask=2 umode=+iw ialupd=1 idenon=1 k2b.string=*registado e protegido* k2b.command=nickserv identify [popups] #spopup on menu status { $_network .NickServ ..Register:ns register $$?="Enter Password" $?="Enter E-Mail" ..Drop:if ($?!="Are you sure you want to drop?") ns drop $$?="Enter Extra Password" ..Identify:perflog ..Info:ns info $$?="Enter Nick" ..- ..Nick Sets ...Password:ns set password $$?="Enter new Password" ...- ...Private ....On (Nick info won't appear):ns set private on ....Off (Nick info will appear):ns set private off ...Url ....Set:ns set url $$?="Enter Url for $me $+ " ....Clear:ns set url ...E-Mail ....Set:ns set email $$?="Enter E-Mail for $me $+ " ....Clear:ns set email ..- ..Ghost Kill:var %n = $$?="Enter Nick" | if ($istok($_´(nickserv,nicks),%n,32)) var %p $_reg.pass(%n) | else var %p = $$?*="Enter Password" | ns ghost %n %p ..Get Nick:ns getnick $$?="Enter Nick" $$?="Enter Extra Password" ..- ..General Help:ns help ..Specific Help:ns help $$?="Enter Command" .ChanServ ..Register:cs register $$?="Enter Channel" $$?="Enter Password" $$?="Enter Description" ..Drop:if ($?!="Are you sure you want to drop?") cs drop $$?="Enter Channel" ..Identify:cs identify $$?="Enter Channel" $$?*="Enter Password" ..Info:cs info $$?="Enter Channel" ..- ..Channel Sets ...Password:cs set $$?="Enter Channel" password $$?="Enter new Password" ...Founder:cs set $$?="Enter Channel" founder $$?="Enter new Founder" ...- ...Description:cs set $$?="Enter Channel" desc $$?="Enter new Description" ...Private ....On (Channel info won't appear):cs set $$?="Enter Channel" private on ....Off (Channel info will appear):cs set $$?="Enter Channel" private off ...Url ....Set:cs set $$?="Enter Channel" url $$?="Enter Url" ....Clear:cs set $$?="Enter Channel" url ...E-Mail ....Set:cs set $$?="Enter Channel" email $$?="Enter E-Mail" ....Clear:cs set $$?="Enter Channel" email ...- ...Restricted ....On:cs set $$?="Enter Channel" restricted on ....Off:cs set $$?="Enter Channel" restricted off ...Secure Ops ....On:cs set $$?="Enter Channel" secureops on ....Off:cs set $$?="Enter Channel" secureops off ...Secure ....On:cs set $$?="Enter Channel" secure on ....Off:cs set $$?="Enter Channel" secure off ...Keep Topic ....On:cs set $$?="Enter Channel" keeptopic on ....Off:cs set $$?="Enter Channel" keeptopic off ...Topic Lock ....On:cs set $$?="Enter Channel" topiclock on ....Off:cs set $$?="Enter Channel" topiclock off ..Channel Clears ...Ops:cs clear $$?="Enter Channel" ops ...Voices:cs clear $$?="Enter Channel" voices ...Users:cs clear $$?="Enter Channel" users ...Bans:cs clear $$?="Enter Channel" bans ...Modes:cs clear $$?="Enter Channel" modes ..Channel Levels ...Auto Op:cs levels $$?="Enter Channel" set autoop $$?="Enter minimum level" ...Auto Voice:cs levels $$?="Enter Channel" set autovoice $$?="Enter minimum level" ...Auto DeOp:cs levels $$?="Enter Channel" set autodeop $$?="Enter maximum level" ...Nojoin:cs levels $$?="Enter Channel" set nojoin $$?="Enter minimum level" ...Invite:cs levels $$?="Enter Channel" set invite $$?="Enter minimum level" ...Auto Kick:cs levels $$?="Enter Channel" set akick $$?="Enter minimum level" ...Unban:cs levels $$?="Enter Channel" set unban $$?="Enter minimum level" ...Op DeOp:cs levels $$?="Enter Channel" set opdeop $$?="Enter minimum level" ...Access List:cs levels $$?="Enter Channel" set acc-list $$?="Enter minimum level" ...Access Change:cs levels $$?="Enter Channel" set acc-change $$?="Enter minimum level" ...Set:cs levels $$?="Enter Channel" set set $$?="Enter minimum level" ...Clear:cs levels $$?="Enter Channel" set clear $$?="Enter minimum level" ...Memo Read:cs levels $$?="Enter Channel" set memo_read $$?="Enter minimum level" ...Memo Send:cs levels $$?="Enter Channel" set memo_send $$?="Enter minimum level" ...Memo Del:cs levels $$?="Enter Channel" set memo_send $$?="Enter minimum level" ...- ...Able:cs levels $$?="Enter Channel" set $$?="Enter option" $$?="Enter level" ...Disable:cs levels $$?="Enter Channel" dis $$?="Enter option" ...Reset:cs levels $$?="Enter Channel" reset ...- ...List:cs levels $$?="Enter Channel" list ..Channel Modes ...Set Mlock:cs set $$?="Enter Channel" mlock $$?="Enter Modes (+Modes-Modes [ntiklpscdqj])" ...UnSet Mlock:cs set $$?="Enter Channel" mlock off ..- ..Access List ...Add Access:cs access $$?="Enter Channel" add $$?="Enter Nick to add" $$?="Enter Level (-9999/+15)" ...Remove Access:cs access $$?="Enter Channel" del $$?="Enter Nick or Number to delete" ...- ...List Accesses:cs access $$?="Enter Channel to list" list ..Auto Kick List ...Add Auto Kick:cs akick $$?="Enter Channel" add $$?="Enter Mask to add" $$?="Enter Reason" ...Remove Auto Kick:cs akick $$?="Enter Channel" del $$?="Enter Mask or Number to delete" ...- ...List Auto Kicks:cs akick $$?="Enter Channel to list" list ..- ..Op:cs op $$?="Enter Channel" $?="Enter Nick" ..DeOp:cs deop $$?="Enter Channel" $?="Enter Nick" ..Unban:cs unban $$?="Enter Channel" ..Invite:cs invite $$?="Enter Channel" ..- ..General Help:cs help ..Specific Help:cs help $$?="Enter Command" .MemoServ ..List Memos (Nick):ms list ..Read Memo (Nick):ms read $$?="Enter message number" ..Send Memo (Nick):ms send $$?="Enter Nick" $$?="Enter message" ..Delete Memo (Nick):ms del $$?="Enter message number" ..Delete all Memos (Nick):ms del all ..- ..List Memos (Channel):ms list $$?="Enter Channel" ..Read Memo (Channel):ms read $$?="Enter Channel" $?="Enter message number" ..Send Memo (Channel):ms send $$?="Enter Channel" $?="Enter message" ..Delete Memo (Channel):ms del $$?="Enter Channel" $?="Enter message number" ..- ..General Help:ms help ..Specific Help:ms help $$?="Enter Command" .$s.opserv(OperServ) ..Auto Kill ...Add Auto Kill:os akill add $$?="Enter Mask to add" $$?="Enter Reason" ...Del Auto Kill:os akill del $$?="Enter Mask to delete" ...- ...List Auto Kills:os akill list $$?="Enter Mask to list" ...View Auto Kills:os akill view $$?="Enter Mask" ..- ..Global Message:os global $$?="Enter message" ..Stats:os stats $$?="Enter stats" } ; menu channel { $_network .$s.opserv(OperServ) ..Op:os mode # +o $$?="Enter Nick" ..DeOp:os mode # -o $$?="Enter Nick" ..Modes:os mode # $$?="Enter Modes (+Modes-Modes [ntiklpscdqj])" ..Kick:os kick # $$?="Enter Nick" $$?="Enter Reason" ..- ..Auto Kill ...Add Auto Kill:os akill add $$?="Enter Mask to add" $$?="Enter Reason" ...Del Auto Kill:os akill del $$?="Enter Mask to delete" ...- ...List Auto Kills:os akill list $$?="Enter Mask to list" ...View Auto Kills:os akill view $$?="Enter Mask" ..- ..Global Message:os global $$?="Enter message" ..Stats:os stats $$?="Enter stats" .- .Register:cs register # $$?="Enter Password" $$?="Enter Description" .Drop:if ($?!="Are you sure you want to drop?") cs drop # .Identify:cs identify # $inp(Enter Password~?*,1) .Info:cs info # .- .Channel Sets ..Password:cs set # password $$?="Enter new Password" ..Founder:cs set # founder $$?="Enter new Founder" ..- ..Description:cs set # desc $$?="Enter new Description" ..Private ...On (Channel info won't appear):cs set # private on ...Off (Channel info will appear):cs set # private off ..Url ...Set:cs set # url $$?="Enter Url" ...Clear:cs set # url ..E-Mail ...Set:cs set # email $$?="Enter E-Mail" ...Clear:cs set # email ..- ..Restricted ...On:cs set # restricted on ...Off:cs set # restricted off ..Secure Ops ...On:cs set # secureops on ...Off:cs set # secureops off ..Secure ...On:cs set # secure on ...Off:cs set # secure 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 .Channel Clears ..Ops:cs clear # ops ..Voices:cs clear # voices ..Users:cs clear # users ..Bans:cs clear # bans ..Modes:cs clear # modes .Channel Levels ..Auto Op:cs levels # set autoop $$?="Enter minimum level" ..Auto Voice:cs levels # set autovoice $$?="Enter minimum level" ..Auto DeOp:cs levels # set autodeop $$?="Enter maximum level" ..Nojoin:cs levels # set nojoin $$?="Enter minimum level" ..Invite:cs levels # set invite $$?="Enter minimum level" ..Auto Kick:cs levels # set akick $$?="Enter minimum level" ..Unban:cs levels # set unban $$?="Enter minimum level" ..Op DeOp:cs levels # set opdeop $$?="Enter minimum level" ..Access List:cs levels # set acc-list $$?="Enter minimum level" ..Access Change:cs levels # set acc-change $$?="Enter minimum level" ..Set:cs levels # set set $$?="Enter minimum level" ..Clear:cs levels # set clear $$?="Enter minimum level" ..Memo Read:cs levels # set memo_read $$?="Enter minimum level" ..Memo Send:cs levels # set memo_send $$?="Enter minimum level" ..Memo Del:cs levels # set memo_send $$?="Enter minimum level" ..- ..Able:cs levels # set $$?="Enter option" $$?="Enter level" ..Disable:cs levels # dis $$?="Enter option" ..Reset:cs levels # reset ..- ..List:cs levels # list .Channel Modes ..Set Modes [Mode]:mode # $$?="Enter Modes (+Modes-Modes [ntiklpscdqj])" ..Set Modes [Mlock]:cs set # mlock $$?="Enter Modes (+Modes-Modes [ntiklpscdqj])" ..UnSet Modes [Mlock]:cs set # mlock off ..- ..View Modes:mode # .Channel Memos ..List memos:ms list # ..Read memo:ms read # $?="Enter message number" ..Send memo:ms send # $?="Enter message" ..Delete memo:ms del # $?="Enter message number" .- .Access List ..Add Access:cs access # add $$?="Enter Nick to add" $$?="Enter Level (-9999/+15)" ..Remove Access:cs access # del $$?="Enter Nick or Number to delete" ..- ..List Accesses:cs access # list .Auto Kick List ..Add Auto Kick:cs akick # add $$?="Enter Mask to add" $$?="Enter Reason" ..Remove Auto Kick:cs akick # del $$?="Enter Mask or Number to delete" ..- ..List Auto Kicks:cs akick # list .- .Op:cs op # $?="Enter Nick" .DeOp:cs deop # $?="Enter Nick" .- .General Help:cs help .Specific Help:cs help $$?="Enter Command" } ; menu nicklist { $_network .$s.opserv(OperServ) ..Op:os mode # +o $1 ..DeOp:os mode # -o $1 ..Modes:os mode # $$?="Enter Modes (+Modes-Modes [ntiklpscdqj])" ..Kick:os kick # $$1 $?="Enter Reason" ..- ..Auto Kill ...Add Auto Kill:os akill add $1 $?="Enter Reason" ...Del Auto Kill:os akill del $1 ...- ...List Auto Kills:os akill list $="Enter Mask to list" ...View Auto Kills:os akill view $?="Enter Mask" ..- .Access List ..Add Access:cs access # add $1 $?="Enter Level (-9999/+15)" ..Remove Access:cs access # del $1 ..- ..List Accesses:cs access # list .Auto Kick List ..Add Auto Kick:cs akick # add $1 $?="Enter Reason" ..Remove Auto Kick:cs akick # del $1 ..- ..List Auto Kicks:cs akick # list } #spopup end