[start]
network=1
servis.site=austnet.org
servis.nick=NickOp,ChanOp,NoteOp,HelpOp,LoveOp,ASD,OperOp,Sprint
clonemask=2
ialupd=1
k2b.string=*is a registered nickname*
k2b.command=.msg NickOP@austnet.org identify <pass>
idenon=3
[popups]
#spopup on
menu status {
Austnet
.NickOp
..identify:.msg NickOP@austnet.org identify $inp(Enter password~Identify~?*,1)
..kill:.msg NickOP@austnet.org kill $inp(Which nick?~Kill,1) $inp(Enter password~Kill~?*,1)
..info:.msg NickOP@austnet.org info $inp(Which nick?~Info,1)
..access:.msg NickOP@austnet.org access $inp(Which nick?~Access,1)
..-
..register:var %.nick.pass.temp.reg $inp(Enter password~Register~?*,1) | var %.nick.pass.temp.reg2 $inp(Reenter password~Register~?*,1) | if (%.nick.pass.temp.reg == %.nick.pass.temp.reg2) .msg NickOP@austnet.org register %.nick.pass.temp.reg $inp(Enter e-mail (ie SeiferAlmasy@hotmail.com)~Register,1) | else sr -t Error Your password not confirm 
..unregister:{ if ($?!="Are you sure you want to drop $me $+ ?" = $true ) { .msg NickOP@austnet.org drop } | else { sr -t Info You own $me still :) } }
..set
...pass:var %.nick.pass.temp.pass $inp(Enter new password~Set pass~?*,1) | var %.nick.pass.temp.pass2 $inp(Reenter new password~Set pass~?*,1) | if (%.nick.pass.temp.pass == %.nick.pass.temp.pass2) .msg NickOP@austnet.org set pass %.nick.pass.temp.pass | else sr -t Error Your password not confirm
...kill:{ if ($?!="Do you want to set it on?" = $true ) { .msg NickOP@austnet.org set kill on } | else { .msg NickOP@austnet.org set kill off } }
...email:.msg NickOP@austnet.org set email $inp(Enter new email (ie SeiferAlmasy@hotmail.com)~Email,1)
...url:.msg NickOP@austnet.org set url $inp(Enter URL (ie http://www.SeiferAlmasy.com)~URL,1)
...usemsg:{ if ($?!="Do you want use query notice you?" = $true ) { .msg NickOP@austnet.org set usemsg on } | else { .msg NickOP@austnet.org set usemsg off } }
...aop:{ if ($?!="Do you want auto Op you in #Channel?" = $true ) { .msg NickOP@austnet.org set aop on } | else { .msg NickOP@austnet.org set aop off } }
...showemail:{ if ($?!="Do you want show E-m@il?" = $true ) { .msg NickOP@austnet.org set showemail on } | else { .msg NickOP@austnet.org set showemail off } }
...showhost:{ if ($?!="Do you want show host?" = $true ) { .msg NickOP@austnet.org set showhost on } | else { .msg NickOP@austnet.org set showhost off } }
...autoadd:{ if ($?!="Do you want auto comfirm to #Channel?" = $true ) { .msg NickOP@austnet.org set autoadd on } | else { .msg NickOP@austnet.org set autoadd off } }
...noteonadd:{ if ($?!="Do you want ChanOP send note to you when added to #Channel?" = $true ) { .msg NickOP@austnet.org set noteonadd on } | else { .msg NickOP@austnet.org set noteonadd off } }
..link
...list:.msg NickOP@austnet.org link list
...add:.msg NickOP@austnet.org link add $inp(Which nick?~Add Link,1) $inp(Enter password~Add Link~?*,1)
...del:.msg NickOP@austnet.org link del $inp(Which nick?~Del Link,1)
...remove:.msg NickOP@austnet.org link remove $inp(Which nick?~Remove Link,1)
..host
...list:.msg NickOP@austnet.org host list
...add:.msg NickOP@austnet.org host add $inp(Enter Mask (ie *!*@SeiferAlmasy.com)~Add Host,1)
...del:.msg NickOP@austnet.org host del $inp(Enter Mask (ie *!*@SeiferAlmasy.com)~Del Host,1)
...addcurrent:.msg NickOP@austnet.org host add current
..commands:.msg NickOP@austnet.org commands
.NoteOp
..list:.msg NoteOP list
..read:.msg NoteOP read $inp(Which note? (ie 1,2,3 or all)~Read Note,1)
..send:.msg NoteOP send $inp(Which nicks or #Channel? (ie SeiferAlmasy SeiferAlmasy,^yueling^ #kluang)~Send Note,1) $inp(Type your note~Send Note,1)
..-
..erase:.msg NoteOP del $inp(Which note? (ie 1,2,3 or all)~Erase Note,1)
..purge:{ if ($?!="Are you sure you want to purge?" = $true ) { .msg NoteOP purge } | else { sr -t Info Your note still in } } 
..block
...list:.msg NoteOP block list
...add:.msg NoteOP block add $inp(Which nick, #Channel or mask?~Add Block,1)
...del:.msg NoteOP block del $inp(Which nick, #Channel or mask?~Del Block,1)
.ChanOp
..info:.msg ChanOP info $inp(Which #Channel?~Info,1)
..-
..channel access
...checkaccess:.msg ChanOP access $inp(Which #Channel?~Check Access,1) $inp(Switch (ie * -ls -lm) .optional~Check Access)
...suspend:.msg ChanOP setuser $inp(Which #Channel?~Suspend Database User,1) $inp(Which nick?~Suspend Database User,1) suspend $inp(mins? (ie 15),1)
...unsuspend:.msg ChanOP setuser $inp(Which #Channel?~Unsuspend Database User,1) $inp(Which nick?~Unsuspend Database User,1) suspend off
..commands:.msg ChanOP commands $inp(Which #Channel? (What commands you can use in this #Channel)~Commands,1)
..list:.msg ChanOP list $inp(Which nick? (Look user registered #Channel)~List,1)
..invite:.msg ChanOP invite $inp(Which #Channel? (Invite yourself into a #Channel)~Invite,1)
..-
..clean:.msg ChanOP clean $inp(Which #Channel? (Clean up modes)~Clean,1)
..op,voice
...op:.msg ChanOP op $inp(Which #Channel?~Op,1) $inp(Which Nick?~Op,1)
...deop:.msg ChanOP deop $inp(Which #Channel?~DeOp,1) $inp(Which Nick?~DeOp,1)
...mass deop:.msg ChanOP mdeop $inp(Which #Channel?~Mass DeOp,1)
...voice:.msg ChanOP voice $inp(Which #Channel?~Voice,1) $inp(Which Nick?~Voice,1)
...devoice:.msg ChanOP devoice $inp(Which #Channel?~Devoice,1) $inp(Which Nick?~Devoice,1)
..kickban
...kick:.msg ChanOP kick $inp(Which #Channel?~Kick,1) $inp(Which Nick?~Kick,1) $inp(Reason? .optional~Kick)
...ban:.msg ChanOP ban $inp(Which #Channel?~Ban,1) $inp(Which Nick?~Ban,1) $inp(Switch? (ie -level (level) -hours (value) -mins (value) -noexpire -nokick) .optional~Ban) $inp(Reason? .optional~Ban)
...ban host:.msg ChanOP ban $inp(Which #Channel?~Ban Host,1) $inp(Host? (ie *!*@SeiferAlmasy.com)~Ban Host,1) $inp(Switch? (ie -level (level) -hours (value) -mins (value) -noexpire -nokick) .optional~Ban Host) $inp(Reason? .optional~Ban Host)
...unban:.msg ChanOP unban $inp(Which #Channel?~Unban,1) $inp(Host? (ie *!*@SeiferAlmasy.com)~Unban,1)
...unban you:.msg ChanOP unban $inp(Which #Channel?~Unban you,1) me
...listban:.msg ChanOP listban $inp(Which #Channel?~List Ban,1) $inp(Switch? (ie -whoset -whenset -reason) .optional~List Ban)
.LoveOp
..block
...list:.msg LoveOP block list
...add:.msg LoveOP block add $inp(Which user?~Add Block,1)
...del:.msg LoveOP block del $inp(Which user?~Del Block,1)
...host:.msg LoveOP block add $inp(Host? (ie *!*@SeiferAlmasy.com)~Block Host,1)
..-
..netcouple
...list
....waiting:.msg LoveOP netcouple list waiting
....couple:.msg LoveOP netcouple list couple
....engaged:.msg LoveOP netcouple list engaged
....married:.msg LoveOP netcouple list married
...add:.msg LoveOP netcouple add $inp(Add Who to be your couple?~NetCouple,1)
..book:.msg LoveOP book $inp(Who?~Book Wedding,1) $inp(With who?~Book Wedding,1)
..wedding:.msg LoveOP wedding $inp(Who?~Wedding,1) $inp(With who?~Wedding,1) $inp(Which #Channel?~Wedding,1)
..divorce:{ if ($?!="Are you sure you want to divorce?" = $true ) { .msg LoveOP divorce $inp(Who?~Divorce,1) $inp(With who?~Divorce,1) } | else { sr -t Info You still with your lover :) } }
.-
.Seek!
..IRCOp:.msg OperOP listadmin $inp(Switch? (ie -Online) .optional~IRCOp)
..ASDHelper:.msg ASD listadmin $inp(Switch? (ie -Online) .optional~ASD Helper)
..Sprint:.msg Sprint listadmin $inp(Switch? (ie -Online) .optional~Sprint)
}
menu channel {
Austnet
.info:.msg ChanOP info #
.topic:.msg ChanOP topic # $inp(Type message here~Topic,1)
.seek:.msg ChanOP seek # $inp(Type message here~Seek,1)
.-
.channel sets
..keeptopic:.msg ChanOP keeptopic # $inp(Level? (Level to Lock Topic)~Keep Topic,1)
..mode:.msg ChanOP set # mode $inp(Level? (Level to Lock Mode)~Mode,1) $inp(Mode Lock? (ie +tn-psmiklre)~Mode,1) | sr -t Info +e for can't change nick in #Channel, +r for only op/voice can see what users type :)
..url:.msg ChanOP set # url $inp(Enter URL (ie http://www.SeiferAlmasy.com)~URL,1)
..hideaccess:{ if ($?!="Do you want hide access?" = $true ) { .msg ChanOP set # hideaccess on } | else { .msg ChanOP set # hideaccess off } }
..`command:{ if ($?!="Do you want disable `command?" = $true ) { .msg ChanOP set # nochanmsg on } | else { .msg ChanOP set # nochanmsg off } }
..oprestrict:{ if ($?!="Do you want only user in database can Op?" = $true ) { .msg ChanOP set # oprestrict on } | else { .msg ChanOP set # oprestrict off } }
..mustid:{ if ($?!="Do you want only user identify before Oped?" = $true ) { .msg ChanOP set # mustid on } | else { .msg ChanOP set # mustid off } }
..nonote:.msg ChanOP set # nonote $inp(Level? (Only user who have level to send note to #Channel)~Nonote,1)
..telladd:{ if ($?!="Do you want # tell you when people add user?" = $true ) { .msg ChanOP set # telladd on } | else { .msg ChanOP set # telladd off } }
..telldel:{ if ($?!="Do you want # tell you when people del user?" = $true ) { .msg ChanOP set # telldel on } | else { .msg ChanOP set # telldel off } }
..tellset:{ if ($?!="Do you want # tell you when people set user?" = $true ) { .msg ChanOP set # tellset on } | else { .msg ChanOP set # tellset off } }
..log:{ if ($?!="Do you want # email the log that are relevant to your channel?" = $true ) { .msg ChanOP set # log on } | else { .msg ChanOP set # log off } }
..ChanOp
...$iif(ChanOp ison #,part,join):if (ChanOP ison #) .msg ChanOP part # | else .msg ChanOP join #
..restrict:{ if ($?!="Do you want to set minimum level to join # $+ ?" = $true ) { .msg ChanOP set # restrict $inp(Level (Minimum level required to join in)~Restrict,1) } | else { .msg ChanOP set # restrict 0 } }
..fun
...8ball:{ if ($?!="Do you want to set it on?" = $true ) { .msg ChanOP game # 8ball on } | else { .msg ChanOP game # 8ball off } }
...funmsg:{ if ($?!="Do you want to set it on?" = $true ) { .msg ChanOP set # funmsg on } | else { .msg ChanOP set # funmsg off } }
.channel access
..checkaccess:.msg ChanOP access # $inp(Switch? (ie * -ls -lm) .optional~Check Access)
..suspend:.msg ChanOP setuser # $inp(Which nick?~Suspend Database User,1) suspend $inp(mins? (ie 15)~Suspend Database User,1)
..unsuspend:.msg ChanOP setuser # $inp(Which nick?~Unsuspend Database User,1) suspend off
.register channel:.msg ChanOP register #
.drop channel:{ if ($?!="Are you sure you want to drop # $+ ?" = $true ) { .msg ChanOP drop # } | else { sr -t Info You own # still :) } }
.mass deop:.msg ChanOP mdeop #
.listban:.msg ChanOP listban # $inp(Switch? (ie -whoset -whenset -reason) .optional~List Ban)
.unban you:.msg ChanOP unban # me
.unban all:.msg ChanOP unban # all
}
menu nicklist {
Austnet
.NickOp
..identify:.msg NickOP@austnet.org identify $inp(Enter password~Identify~?*,1)
..kill:.msg NickOP@austnet.org kill $$1 $inp(Enter password~Kill~?*,1)
..info:.msg NickOP@austnet.org info $$1
..access:.msg NickOP@austnet.org access $$1
.ChanOp
..access
...check:.msg ChanOP access # -check $$1
...add:.msg ChanOP adduser # $$1 $inp(Access level?~Add User,1)
...change level:.msg ChanOP setuser # $$1 level $inp(New level~Change User Level,1)
...remove:{ if ($?!="Are you sure you want to remove $$1 $+ ?" = $true ) { .msg ChanOP deluser # $$1 } | else { sr -t Info $$1 still in # database :) } }
...suspend:.msg ChanOP setuser # $$1 suspend $inp(mins? (ie 15)~Suspend Database User,1)
...unsuspend:.msg ChanOP setuser # $$1 suspend off
..control
...$iif($snick(#,1) isvoice #, devoice, voice):var %tr = $chr(44) | var %tr2 = $chr(32) | set %newstuff $replace($snicks,%tr,%tr2) { if ($snick(#,1) isvoice $active) { .msg chanop devoice # %newstuff } | else { .msg chanop voice # %newstuff } | unset %newstuff }
...$iif($snick(#,1) isop #, deop, op):var %i = $numtok($snicks,44) | while (%i >= 1 ) { if ($snick(#,%i) isop $chan) { .msg chanop deop # $snick(#,%i) } | else { .msg chanop op # $snick(#,%i) } | dec %i }
...$iif($_icancontrol,$iif($snick(#,1) isop #,deop/voice)):changemode # o+v $snicks $snicks
...set
....aop:{ if ($?!="Do you want set $$1 AutoOp?" = $true ) { .msg ChanOP setuser # $$1 aop on } | else { .msg ChanOP setuser # $$1 aop off } }
....aov:{ if ($?!="Do you want set $$1 AutoVoice?" = $true ) { .msg ChanOP setuser # $$1 aov on } | else { .msg ChanOP setuser # $$1 aov off } }
....protect:{ if ($?!="Do you want set $$1 Protect ON?" = $true ) { .msg ChanOP setuser # $$1 protect on } | else { .msg ChanOP setuser # $$1 protect off } }
..kickban
...$iif($snick(#,2),multifastkick,fastkick):var %i = $numtok($snicks,44) | while (%i >= 1 ) { .msg chanop kick # $snick(#,%i) $read(sys\kicks.txt) | dec %i }
...$iif($snick(#,2),multifastkickban,fastkickban):var %i = $numtok($snicks,44) | while (%i >= 1 ) { .msg chanop ban # $snick(#,%i) $read(sys\kicks.txt) | dec %i }
...$iif($snick(#,2),multifastbanhost,fastbanhost):var %i = $numtok($snicks,44) | while (%i >= 1 ) { .msg chanop ban # $address($snick(#,%i),2) $read(sys\kicks.txt) | dec %i }
...-
...$iif($snick(#,2),multikick,kick):var %reason $inp(Reason~Kick,1) | var %i = $numtok($snicks,44) | while (%i >= 1 ) { .msg chanop kick # $snick(#,%i) %reason | dec %i }
...$iif($snick(#,2),multikickban,kickban):var %switch $inp(Switch? (ie -level (level) -hours (value) -mins (value) -noexpire -nokick) .optional~Kickban) | var %reason $inp(Reason~Kickban,1) | var %i = $numtok($snicks,44) | while (%i >= 1 ) { .msg chanop ban # $snick(#,%i) %switch %reason | dec %i }
...$iif($snick(#,2),multibanhost,banhost):var %switch $inp(Switch? (ie -level (level) -hours (value) -mins (value) -noexpire) .optional~Banhost) | var %reason $inp(Reason~Banhost,1) | var %i = $numtok($snicks,44) | while (%i >= 1 ) { .msg chanop ban # $address($snick(#,%i),2) %switch %reason | dec %i }
...-
...$iif($snick(#,2),multiunban,unban):var %i = $numtok($snicks,44) | while (%i >= 1 ) { .msg chanop unban # $snick(#,%i) | dec %i }
...unbanhost:.msg ChanOP unban # $inp(Host (ie *!*@SeiferAlmasy.com)~Unban Host,1)
.LoveOp
..action
...smooch
....butterfly:.msg LoveOP smooch $$1 butterfly
....nip:.msg LoveOP smooch $$1 nip
....surprise:.msg LoveOP smooch $$1 surprise
...hug
....distant:.msg LoveOP hug $$1 distant
....squish:.msg LoveOP hug $$1 squish
....tight:.msg LoveOP hug $$1 tight
..give
...candy:.msg LoveOP candy $$1
...chocolate:.msg LoveOP chocolate $$1
...cookie:.msg LoveOP cookie $$1
...flower
....RedRose:.msg LoveOP flower $$1 redrose
....PinkRose:.msg LoveOP flower $$1 pinkrose
....WhiteRose:.msg LoveOP flower $$1 whiterose
....Daisy:.msg LoveOP flower $$1 daisy
....SunFlower:.msg LoveOP flower $$1 sunflower
...present:.msg LoveOP present $$1 $inp(What present?~Present,1)
..vote:.msg LoveOP vote $$1 $inp(About what? (ie best channel manager)~Vote,1)
..admire:.msg LoveOP admire $$1
..love:.msg LoveOP love $$1
..lovenote:.msg LoveOP lovenote $$1 $inp(Type your love message~Love Note,1)
..apology:.msg LoveOP apology $$1 $inp(Apology regarding what? (ie I forgot to join #Channel)~Apology,1)
..birthday:.msg LoveOP birthday $$1
..-
..block
...list:.msg LoveOP block list
...add:.msg LoveOP block add $$1
...del:.msg LoveOP block del $$1
...host:.msg LoveOP block add $inp(Host (ie *!*@SeiferAlmasy.com)~Block Host,1)
..-
..netcouple
...list
....waiting:.msg LoveOP netcouple list waiting
....couple:.msg LoveOP netcouple list couple
....engaged:.msg LoveOP netcouple list engaged
....married:.msg LoveOP netcouple list married
...add:.msg LoveOP netcouple add $$1
..book:.msg LoveOP book $me $inp(With who?~Book Wedding,1)
..wedding:.msg LoveOP wedding $me $inp(With who?~Wedding,1) $inp(Which #Channel?~Wedding,1)
..divorce:{ if ($?!="Are you sure you want to divorce?" = $true ) { .msg LoveOP divorce $me $inp(With who?~Divorce,1) } | else { sr -t Info You still with your lover :) } }
}
menu query {
Austnet
.NickOp
..info:.msg NickOP@austnet.org info $$1
..access:.msg NickOP@austnet.org access $$1
.LoveOp
..action
...smooch
....butterfly:.msg LoveOP smooch $$1 butterfly
....nip:.msg LoveOP smooch $$1 nip
....surprise:.msg LoveOP smooch $$1 surprise
...hug
....distant:.msg LoveOP hug $$1 distant
....squish:.msg LoveOP hug $$1 squish
....tight:.msg LoveOP hug $$1 tight
..give
...candy:.msg LoveOP candy $$1
...chocolate:.msg LoveOP chocolate $$1
...cookie:.msg LoveOP cookie $$1
...flower
....RedRose:.msg LoveOP flower $$1 redrose
....PinkRose:.msg LoveOP flower $$1 pinkrose
....WhiteRose:.msg LoveOP flower $$1 whiterose
....Daisy:.msg LoveOP flower $$1 daisy
....SunFlower:.msg LoveOP flower $$1 sunflower
...present:.msg LoveOP present $$1 $inp(What present?~Present,1)
..vote:.msg LoveOP vote $$1 $inp(About what? (ie best channel manager)~Vote,1)
..admire:.msg LoveOP admire $$1
..love:.msg LoveOP love $$1
..lovenote:.msg LoveOP lovenote $$1 $inp(Type your love message~Love Note,1)
..apology:.msg LoveOP apology $$1 $inp(Apology regarding what? (ie I forgot to join #Channel)~Apology,1)
..birthday:.msg LoveOP birthday $$1
..-
..block
...list:.msg LoveOP block list
...add:.msg LoveOP block add $$1
...del:.msg LoveOP block del $$1
...host:.msg LoveOP block add $inp(Host (ie *!*@SeiferAlmasy.com)~Block Host,1)
..-
..netcouple
...list
....waiting:.msg LoveOP netcouple list waiting
....couple:.msg LoveOP netcouple list couple
....engaged:.msg LoveOP netcouple list engaged
....married:.msg LoveOP netcouple list married
...add:.msg LoveOP netcouple add $$1
..book:.msg LoveOP book $me $$1
..wedding:.msg LoveOP wedding $me $$1 $inp(Which #Channel?~Wedding,1)
..divorce:{ if ($?!="Are you sure you want to divorce?" = $true ) { .msg LoveOP divorce $me $$1 } | else { sr -t Info You still with your lover :) } }
}
#spopup end