[start] network=1 servis.nick=Nickserv,Chanserv,Memoserv,OperServ,StatServ servis.site=webchat.org clonemask=2 ialupd=2 idenon=3 umode=+i-Mm umodeon=1 k2b.string=This nickname is owned by someone else. k2b.command=nickserv identify [popups] #spopup on menu status { $_network .nickserv ..auto-login:a`ah your whant identify pass auto iden now yer\no ..info:ns INFO $$?="Enter nick" ..- ..nick sets ...PWD change:ns set passwd $inp(Enter old password~Services~?*,1) $inp(Enter new password~Services~?*,1) ...URL set:ns set url $?="Enter URL" ...Email set:ns set email $?="Enter Email" ...- ...access list:ns access list ...add access:ns access add $$?="Add who:" ...del access:ns access del $$?="Delete who:" ...wipe access:ns access wipe ..- ..identify nick:ns identify $inp(Enter password~Services~?*,1) ..identify another:ns identify $?="Enter nick:" $inp(Enter password~Services~?*,1) ..register nick:ns register $inp(Enter password~Services~?*,1) $inp(Enter email~Services~?*,1) ..- ..set kill:ns set kill $$?="Kill ON or OFF" ..set noop:ns set noop $$?="NOOP ON or OFF" ..set nomemo:ns set nomemo $$?="NOMEMO ON or OFF" ..set showemail:ns set showemail $?="SHOWEMAIL ON or OFF" ..set mailblock:ns set mailblock $?="MAILBLOCK ON or OFF" ..sendpass:ns sendpass $?="Nick:" $?="Email:" ..ghost:ns ghost $$?="Ghost which nick" $inp(Enter password~Ghost~?*,1) ..release:ns release $$?="Release which nick" $inp(Enter password~Release~?*,1) ..recover:ns recover $$?="Recover which nick" $inp(Enter password~Recover~?*,1) ..- ..drop:if ($?!="Are you sure you want to drop " $+ $me $+ "?") ns DROP $$?="Enter extrapass" .chanserv ..channel access ...aop list:cs aop $$?="Channel?" list ...aop add:cs aop $$?="Channel?" add $$?="Add Who:" ...aop del:cs aop $$?="Channel?" del $$?="Delete Who:" ...aop wipe:cs aop $$?="Channel?" wipe ...sop list:cs sop $$?="Channel?" list ...sop add:cs sop $$?="Channel?" add $$?="Add Who:" ...sop del:cs sop $$?="Channel?" del $$?="Delete Who:" ...sop wipe:cs sop $$?="Channel?" wipe ...akick list:cs akick $$?="Channel?" list ...akick add:cs akick $$?="Cchannel?" add $$?="Add Who:" ...akick del:cs akick $$?="Channel?" del $$?="Delete Who:" ...akick wipe:cs akick $$?="Channel?" wipe ..channel sets ...successor:cs set $$?="Channel?" successor $$?="Successor who, or - to disable:" ...keeptopic:cs set $$?="Channel?" keeptopic $$?="Keeptopic ON or OFF:" ...topic lock:cs set $$?="Channel?" topiclock $$?="Topiclock Founder, Sop or OFF:" ...set founder:cs set $$?="Channel?" founder ...mode locks:cs set $$?="Channel?" mlock $$?="Mode Lock (ie -spmilk+tn)" ...op guard:cs set $$?="Channel?" opguard $$?="Op Guard ON or OFF:" ...desc change:cs set $$?="Channel?" desc $$?="New Description:" ...memo level:cs set $$?="Channel?" memo $$?="MemoLevel None,Sop, or Aop" ...mailblock:cs set $?="Channel?" mailblock $?="MAILBLOCK ON or OFF" ...webpasswd:cs set $$?="Channel?" webpasswd $inp(Enter Web Password) ..- ..identify channel:cs identify $$?="Channel?" $inp(Enter password~Services~?*,1) ..register channel:cs register $$?="Channel?" $inp(Enter password~Services~?*,1) $$?="Description" ..drop channel:cs drop $$?="Channel?" ..sendpass:cs sendpass $?="Channel?" $?="Email:" ..info on channel:cs info $$?="Channel?" ..- ..change PWD:cs set $$?="channel?" passwd $inp(Enter old password~Services~?*,1) $inp(Enter new password~?*,1) ..op:cs op $$?="Channel?" $$?="Op who:" ..deop:cs deop $?="Channel?" $$?="Deop who:" ..unban you:cs unban $$?="Channel?" $me ..unban all:cs unban $$?="Channel?" * ..- ..count:cs count $$?="Channel?" ..why:cs why $$?="Channel?" $$?="Which nick?" ..- ..mass deop:cs mdeop $$?="Channel:" ..mass kick:cs mkick $$?="Channel:" .memoserv ..list:ms list ..send:ms send $$?="Person to send to:" $$?="Type memo:" ..read:ms read $$?="Numbers:" ..del:ms del $$?="Numbers:" ..undel:ms undel $$?="Numbers:" ..purge:ms purge- ..forward:ms forward $$?="To who" $inp(Enter password~Services~?*,1) } 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?" .- .channel access ..aop list:cs aop # list ..aop add:cs aop # add $$?="Add who:" ..aop del:cs aop # del $$?="Delete who:" ..aop wipe:cs aop # wipe ..sop list:cs sop # list ..sop add:cs sop # add $$?="Add who:" ..sop del:cs sop # del $$?="Delete who:" ..sop wipe:cs sop # wipe ..akick list:cs akick # list ..akick add:cs akick # add $$?="Add who:" ..akick del:cs akick # del $$?="Delete who:" ..akick wipe:cs akick # wipe .channel sets ..keeptopic:cs set # keeptopic $$?="Keeptopic ON or OFF:" ..topic lock:cs set # topiclock $$?="Topiclock Founder, Sop or OFF:" ..set founder:cs set # founder $$?="New Founder:" ..successor:cs set # successor $$?="Successor who, or - to disable:" ..mode locks:cs set # mlock $$?="Mode Lock (ie -spmilk+tn)" ..op guard:cs set # opguard $$?="Op Guard ON or OFF:" ..desc change:cs set # desc $$?="New description:" ..memo level:cs set # memo $$?="MemoLevel None,Sop, or Aop" ..mailblock:cs set # mailblock $?="MAILBLOCK ON or OFF" ..webpasswd:cs set # webpasswd $inp(Enter Web Password) .- .identify channel:cs identify # $inp(Enter password~Identify~?*,1) .register channel:cs register # $$?="Password:" $$?="Description" .drop channel:cs drop # .sendpass:cs sendpass # $?="Email:" .change PWD:cs set # passwd $$?="New password:" .- .info on channel:cs info # .op:cs op # $$?="Op who:" .deop:cs deop # $$?="Deop who:" .unban you:cs unban # $ME .- .count:cs count # .why:cs why # $$?="Which nick?" .- .mass deop:cs mdeop # .mass kick:cs mkick # } 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^c2,$iif($snick(#,1) isop #,deop (chanserv) ,op (chanserv))):chopdeop # $snicks .- .acc:cs acc # $$1 .why:cs why # $$1 .- .uop ..add:cs uop # add $$1 ..del:cs uop # del $$1 .vop ..add:cs vop # add $$1 ..del:cs vop # del $$1 .aop ..add:cs aop # add $$1 ..del:cs aop # del $$1 .sop ..add:cs sop # add $$1 ..del:cs sop # del $$1 .- .akick ..add:.cs akick # add $1 ..delete:.cs akick # del $1 ..- ..list:.cs akick # list } #spopup end .