By BackoffJackson on Feb 09, 2007Someone delete this... it was apparently to much text to use.
dialog chan1 {
title "ServScript"
size -1 -1 121 181
box "Server's",2, 5 0 110 158
button "ChanServ",3, 10 15 100 20
button "NickServ",4, 10 35 100 20
button "MemoServ",5, 10 55 100 20
button "BotServ",6, 10 75 100 20
button "HostServ",7, 10 95 100 20
button "HelpServ",8, 10 115 100 20
button "OperServ",10, 10 135 100 20
button "Credit",9, 10 160 100 20
}
on *:dialog:chan1:sclick:*: {
if ($did == 3) {
dialog -m chan chan
}
if ($did == 4) {
dialog -m nick nick
}
if ($did == 5) {
dialog -m memo memo
}
if ($did == 6) {
dialog -m bot bot
}
if ($did == 7) {
dialog -m host host
}
if ($did == 8) {
dialog -m help help
}
if ($did == 9) {
dialog -m credit credit
}
if ($did == 10) {
dialog -m operserv operserv
}
}
dialog operserv {
title "OperServ"
size -1 -1 220 470
box "OperServ(For IRCops only)",1, 5 5 210 460
button "Global",2, 10 20 100 20, size drop
button "Stats",3, 10 40 100 20
button "Oper",4, 10 60 100 20
button "Admin",5, 10 80 100 20, TAB 1
button "Staff",6, 10 100 100 20
button "Logonnews",7, 10 120 100 20
button "Randomnews",8, 10 140 100 20
button "Opernews",9, 10 160 100 20
button "Modlist",10, 10 180 100 20
button "Mode",11, 10 200 100 20
button "Kick",12, 10 220 100 20
button "Clearmodes",13, 10 240 100 20
button "Killclones",14, 10 260 100 20
button "Akill",15, 10 280 100 20
button "SGline",16, 10 300 100 20
button "SQline",17, 10 320 100 20
button "SZline",18, 10 340 100 20
button "Oper",19, 10 360 100 20
button "Ignore",20, 10 380 100 20
button "Logonnews",21, 10 400 100 20
button "Randomnews",22, 110 20 100 20
button "Opernews",23, 110 40 100 20
button "Set",24, 110 60 100 20
button "Noop",25, 110 80 100 20
button "Jupe",26, 110 100 100 20
button "Raw",27, 110 120 100 20
button "Update",28, 110 140 100 20
button "Reload",29, 110 160 100 20
button "Quit",30, 110 180 100 20
button "Shutdown",31, 110 200 100 20
button "Restart",32, 110 220 100 20
button "Chanlist",33, 110 240 100 20
button "Userlist",34, 110 260 100 20
button "Exception",35, 110 280 100 20
button "Session",36, 110 300 100 20
button "Chankill",37, 110 320 100 20
button "DEFCON",38, 110 340 100 20
button "Umode",39, 110 360 100 20
button "Oline",40, 110 380 100 20
button "Svsnick",41, 110 400 100 20
button "Admin",42, 110 420 100 20
button "Modinfo",43, 110 440 100 20
button "Modload",44, 10 420 100 20
button "Modunload",45, 10 440 100 20
}
on *:dialog:operserv:sclick:*: {
if ($did == 2) {
dialog -m global global
}
if ($did == 3) {
dialog -m stats stats
}
if ($did == 4) {
dialog -m oper oper
}
if ($did == 5) {
dialog -m admin admin
}
if ($did == 6) {
operserv staff
}
if ($did == 7) {
dialog -m logonnews logonnews
}
if ($did == 8) {
dialog -m randomnews randomnews
}
if ($did == 9) {
dialog -m opernews opernews
}
if ($did == 10) {
operserv modlist
}
if ($did == 11) {
dialog -m mode mode
}
if ($did == 12) {
dialog -m kick kick
}
if ($did == 13) {
dialog -m clearmodes clearmodes
}
if ($did == 14) {
dialog -m killclones killclones
}
if ($did == 15) {
dialog -m akill akill
}
if ($did == 16) {
dialog -m sgline sgline
}
if ($did == 17) {
dialog -m sqline sqline
}
if ($did == 18) {
dialog -m szline szline
}
if ($did == 19) {
dialog -m oper2 oper2
}
if ($did == 20) {
dialog -m ignore ignore
}
if ($did == 21) {
dialog -m logonnews2 logonnews2
}
if ($did == 22) {
dialog -m randomnews2 randomnews2
}
if ($did == 23) {
dialog -m opernews2 opernews2
}
if ($did == 24) {
dialog -m oset oset
}
if ($did == 25) {
dialog -m noop noop
}
if ($did == 26) {
dialog -m jupe jupe
}
if ($did == 27) {
dialog -m raw raw
}
if ($did == 28) {
operserv update
}
if ($did == 29) {
operserv reload
}
if ($did == 30) {
operserv quit
}
if ($did == 31) {
operserv shutdown
}
if ($did == 32) {
operserv restart
}
if ($did == 33) {
dialog -m chanlist chanlist
}
if ($did == 34) {
dialog -m userlist userlist
}
if ($did == 35) {
dialog -m exception exception
}
if ($did == 36) {
dialog -m session session
}
if ($did == 37) {
dialog -m chankill chankill
}
if ($did == 38) {
dialog -m defcon defcon
}
if ($did == 39) {
dialog -m umode umode
}
if ($did == 40) {
dialog -m oline oline
}
if ($did == 41) {
dialog -m svsnick svsnick
}
if ($did == 42) {
dialog -m operadmin operadmin
}
if ($did == 43) {
dialog -m modinfo modinfo
}
if ($did == 44) {
dialog -m modload modload
}
if ($did == 45) {
dialog -m modunload modunload
}
}
dialog global {
title "Global"
size -1 -1 200 100
box "Global",1, 5 5 190 65
edit "",3, 60 30 1000 20
text "Message:",4, 10 30 45 20
button "Ok",2, 50 75 100 20
}
on *:dialog:global:sclick:*: {
if ($did == 2) {
operserv global $did(3,1,text)
}
}
dialog stats {
title "Stats"
size -1 -1 120 130
box "Stats",1, 5 5 110 120
button "Akill",2, 10 20 100 20
button "Memory",3, 10 40 100 20
button "Uplink",4, 10 60 100 20
button "All",5, 10 80 100 20
button "Reset",6, 10 100 100 20
}
on *:dialog:stats:sclick:*: {
if ($did == 2) {
operserv stats akill
}
if ($did == 3) {
operserv stats memory
}
if ($did == 4) {
operserv stats uplink
}
if ($did == 5) {
operserv stats all
}
if ($did == 6) {
operserv stats reset
}
}
dialog oper {
title "Oper"
size -1 -1 120 50
box "Oper",1, 5 5 110 40
button "List",2, 10 20 100 20
}
on *:dialog:oper:sclick:*: {
if ($did == 2) {
dialog -m operlist operlist
}
}
dialog operlist {
title "Oper List"
size -1 -1 200 80
box "Oper List",1, 5 5 190 45
edit "",2, 75 20 110 20
text "Parameters:",3, 10 20 60 20
button "Ok",4, 50 55 100 20
}
on *:dialog:operlist:sclick:*: {
if ($did == 4) {
operserv oper list $did(2,1,text)
}
}
dialog admin {
title "Admin"
size -1 -1 120 50
box "Admin",1, 5 5 110 40
button "List",2, 10 20 100 20
}
on *:dialog:admin:sclick:*: {
if ($did == 2) {
dialog -m adminlist adminlist
}
}
dialog adminlist {
title "Admin List"
size -1 -1 200 80
box "Admin List",1, 5 5 190 45
edit "",2, 75 20 110 20
text "Parameters:",3, 10 20 60 20
button "Ok",4, 50 55 100 20
}
on *:dialog:adminlist:sclick:*: {
if ($did == 4) {
operserv admin list $did(2,1,text)
}
}
dialog logonnews {
title "Logon News"
size -1 -1 120 50
box "Logon News",1, 5 5 110 40
button "List",2, 10 20 100 20
}
on *:dialog:logonnews:sclick:*: {
if ($did == 2) {
operserv logonnews list
}
}
dialog randomnews {
title "Random News"
size -1 -1 120 50
box "Random News",1, 5 5 110 40
button "List",2, 10 20 100 20
}
on *:dialog:randomnews:sclick:*: {
if ($did == 2) {
operserv randomnews list
}
}
dialog opernews {
title "Oper News"
size -1 -1 120 50
box "Oper News",1, 5 5 110 40
button "List",2, 10 20 100 20
}
on *:dialog:opernews:sclick:*: {
if ($did == 2) {
operserv opernews list
}
}
dialog mode {
title "Mode"
size -1 -1 200 105
box "Mode",1, 5 5 190 70
edit "",2, 60 20 130 20
edit "",3, 60 45 130 20
text "Channel:",4, 10 20 45 20
text "Modes:",5, 18 45 35 20
button "Ok",6, 50 80 100 20
}
on *:dialog:mode:sclick:*: {
if ($did == 6) {
operserv mode $did(2,1,text) $did(3,1,text)
}
}
dialog kick {
title "Kick"
size -1 -1 220 130
box "Kick",1, 5 5 210 95
edit "",2, 60 20 150 20
edit "",3, 60 45 150 20
edit "",4, 60 70 150 20
text "Channel:",5, 10 20 50 20
text "Nick:",6, 30 45 25 20
text "Reason:",7, 13 70 45 20
button "Ok",8, 60 105 100 20
}
on *:dialog:kick:sclick:*: {
if ($did == 8) {
operserv kick $did(2,1,text) $did(3,1,text) $did(4,1,text)
}
}
dialog clearmodes {
title "Clear Modes"
size -1 -1 187 73
text "All?",1, 81 15 20 20
button "Yes",2, 14 41 75 23
button "No",3, 99 41 75 23
}
on *:dialog:clearmodes:sclick:*: {
if ($did == 2) {
dialog -m clearyes clearyes
}
if ($did == 3) {
operserv clearmodes
}
}
dialog clearyes {
title "Clear Modes"
size -1 -1 200 85
box "Clear all modes from channel",4, 5 5 190 50
edit "",1, 55 20 110 20
text "Channel:",2, 10 20 45 20
button "Ok",3, 50 60 100 20
}
on *:dialog:clearyes:sclick:*: {
if ($did == 3) {
operserv clearmodes $did(2,1,text)
}
}
dialog killclones {
title "Kill clones from user"
size -1 -1 190 80
box "Kill Clones from -",1, 5 5 180 45
edit "",2, 40 20 130 20
text "User:",3, 10 20 25 20
button "Ok",4, 40 55 100 20
}
on *:dialog:killclones:sclick:*: {
if ($did == 4) {
operserv killclones $did(2,1,text)
}
}
dialog akill {
title "Akill"
size -1 -1 120 130
box "Auto-Kill",1, 5 5 110 120
button "Add",2, 10 20 100 20
button "Del",3, 10 40 100 20
button "List",4, 10 60 100 20
button "View",5, 10 80 100 20
button "Clear",6, 10 100 100 20
}
on *:dialog:akill:sclick:*: {
if ($did == 2) {
dialog -m akilladd akilladd
}
if ($did == 3) {
dialog -m akilldel akilldel
}
if ($did == 4) {
dialog -m akilllist akilllist
}
if ($did == 5) {
dialog -m akillview akillview
}
if ($did == 6) {
operserv akill clear
}
}
dialog akilladd {
title "Akill Add"
size -1 -1 200 140
box "Auto-Kill add user -",1, 5 5 190 100
edit "",2, 50 25 140 20
edit "",4, 50 50 1300 20
edit "",6, 50 75 1300 20
text "Expiry:",3, 10 25 35 20
text "Mask:",5, 16 50 30 20
text "Reason:",7, 10 75 40 20
button "Ok",8, 50 110 100 20
}
on *:dialog:akilladd:sclick:*: {
if ($did == 8) {
operserv akill add $did(2,1,text) $did(4,1,text) $did(6,1,text)
}
}
dialog akilldel {
title "Akill Del"
size -1 -1 200 90
box "Auto-Kill Del -",1, 5 5 190 55
edit "",2, 45 25 1000 20
text "Mask:",3, 10 25 30 20
button "Ok",4, 50 65 100 20
}
on *:dialog:sclick:*: {
if ($did == 4) {
operserv akill del $did(2,1,text)
}
}
dialog akilllist {
title "Akill List"
size -1 -1 200 80
box "Auto-Kill List",1, 5 5 190 45
edit "",2, 70 20 120 20
text "Parameters:",3, 10 20 60 20
button "Ok",4, 50 55 100 20
}
on *:dialog:akilllist:sclick:*: {
if ($did == 4) {
operserv akill list $did(2,1,text)
}
}
dialog akillview {
title "View Akill"
size -1 -1 200 80
box "View Auto-Kill",1, 5 5 190 45
edit "",2, 70 20 120 20
text "Parameters:",3, 10 20 60 20
button "Ok",4, 50 55 100 20
}
on *:dialog:akillview:sclick:*: {
if ($did == 4) {
operserv akill view $did(2,1,text)
}
}
dialog sgline {
title "SGline"
size -1 -1 120 130
box "SGline",1, 5 5 110 120
button "Add",2, 10 20 100 20
button "Del",3, 10 40 100 20
button "List",4, 10 60 100 20
button "View",5, 10 80 100 20
button "Clear",6, 10 100 100 20
}
on *:dialog:sgline:sclick:*: {
if ($did == 2) {
dialog -m sglineadd sglineadd
}
if ($did == 3) {
dialog -m sglinedel sglinedel
}
if ($did == 4) {
dialog -m sglinelist sglinelist
}
if ($did == 5) {
dialog -m sglineview sglineview
}
if ($did == 6) {
operserv sgline clear
}
}
dialog sglineadd {
title "SGline Add"
size -1 -1 200 140
box "SGline add user -",1, 5 5 190 100
edit "",2, 50 25 140 20
edit "",4, 50 50 1300 20
edit "",6, 50 75 1300 20
text "Expiry:",3, 10 25 35 20
text "Mask:",5, 16 50 30 20
text "Reason:",7, 10 75 40 20
button "Ok",8, 50 110 100 20
}
on *:dialog:sglineadd:sclick:*: {
if ($did == 8) {
operserv sgline add $did(2,1,text) $did(4,1,text) $did(6,1,text)
}
}
dialog sglinedel {
title "SGline Del"
size -1 -1 200 90
box "SGline Del -",1, 5 5 190 55
edit "",2, 45 25 1000 20
text "Mask:",3, 10 25 30 20
button "Ok",4, 50 65 100 20
}
on *:dialog:sglinedel:sclick:*: {
if ($did == 4) {
operserv sgline del $did(2,1,text)
}
}
dialog sglinelist {
title "SGline List"
size -1 -1 200 80
box "SGline List",1, 5 5 190 45
edit "",2, 70 20 120 20
text "Parameters:",3, 10 20 60 20
button "Ok",4, 50 55 100 20
}
on *:dialog:sglinelist:sclick:*: {
if ($did == 4) {
operserv sgline list $did(2,1,text)
}
}
dialog sglineview {
title "View SGline"
size -1 -1 200 80
box "View SGline",1, 5 5 190 45
edit "",2, 70 20 120 20
text "Parameters:",3, 10 20 60 20
button "Ok",4, 50 55 100 20
}
on *:dialog:sglineview:sclick:*: {
if ($did == 4) {
operserv sgline view $did(2,1,text)
}
}
dialog sqline {
title "SQline"
size -1 -1 120 130
box "SQline",1, 5 5 110 120
button "Add",2, 10 20 100 20
button "Del",3, 10 40 100 20
button "List",4, 10 60 100 20
button "View",5, 10 80 100 20
button "Clear",6, 10 100 100 20
}
on *:dialog:sqline:sclick:*: {
if ($did == 2) {
dialog -m sqlineadd sqlineadd
}
if ($did == 3) {
dialog -m sqlinedel sqlinedel
}
if ($did == 4) {
dialog -m sqlinelist sqlinelist
}
if ($did == 5) {
dialog -m sqlineview sqlineview
}
if ($did == 6) {
operserv sqline clear
}
}
dialog sqlineadd {
title "SQline Add"
size -1 -1 200 140
box "SQline add user -",1, 5 5 190 100
edit "",2, 50 25 140 20
edit "",4, 50 50 1300 20
edit "",6, 50 75 1300 20
text "Expiry:",3, 10 25 35 20
text "Mask:",5, 16 50 30 20
text "Reason:",7, 10 75 40 20
button "Ok",8, 50 110 100 20
}
on *:dialog:sqlineadd:sclick:*: {
if ($did == 8) {
operserv sqline add $did(2,1,text) $did(4,1,text) $did(6,1,text)
}
}
dialog sqlinedel {
title "SQline Del"
size -1 -1 200 90
box "SQline Del -",1, 5 5 190 55
edit "",2, 45 25 1000 20
text "Mask:",3, 10 25 30 20
button "Ok",4, 50 65 100 20
}
on *:dialog:sqlinedel:sclick:*: {
if ($did == 4) {
operserv sqline del $did(2,1,text)
}
}
dialog sqlinelist {
title "SQline List"
size -1 -1 200 80
box "SQline List",1, 5 5 190 45
edit "",2, 70 20 120 20
text "Parameters:",3, 10 20 60 20
button "Ok",4, 50 55 100 20
}
on *:dialog:sqlinelist:sclick:*: {
if ($did == 4) {
operserv sqline list $did(2,1,text)
}
}
dialog sqlineview {
title "View SQline"
size -1 -1 200 80
box "View SQline",1, 5 5 190 45
edit "",2, 70 20 120 20
text "Parameters:",3, 10 20 60 20
button "Ok",4, 50 55 100 20
}
on *:dialog:sqlineview:sclick:*: {
if ($did == 4) {
operserv sqline view $did(2,1,text)
}
}
dialog szline {
title "SZline"
size -1 -1 120 130
box "SZline",1, 5 5 110 120
button "Add",2, 10 20 100 20
button "Del",3, 10 40 100 20
button "List",4, 10 60 100 20
button "View",5, 10 80 100 20
button "Clear",6, 10 100 100 20
}
on *:dialog:szline:sclick:*: {
if ($did == 2) {
dialog -m szlineadd szlineadd
}
if ($did == 3) {
dialog -m szlinedel szlinedel
}
if ($did == 4) {
dialog -m szlinelist szlinelist
}
if ($did == 5) {
dialog -m szlineview szlineview
}
if ($did == 6) {
operserv szline clear
}
}
dialog szlineadd {
title "SZline Add"
size -1 -1 200 140
box "SZline add user -",1, 5 5 190 100
edit "",2, 50 25 140 20
edit "",4, 50 50 1300 20
edit "",6, 50 75 1300 20
text "Expiry:",3, 10 25 35 20
text "Mask:",5, 16 50 30 20
text "Reason:",7, 10 75 40 20
button "Ok",8, 50 110 100 20
}
on *:dialog:szlineadd:sclick:*: {
if ($did == 8) {
operserv szline add $did(2,1,text) $did(4,1,text) $did(6,1,text)
}
}
dialog szlinedel {
title "SZline Del"
size -1 -1 200 90
box "SZline Del -",1, 5 5 190 55
edit "",2, 45 25 1000 20
text "Mask:",3, 10 25 30 20
button "Ok",4, 50 65 100 20
}
on *:dialog:szlinedel:sclick:*: {
if ($did == 4) {
operserv szline del $did(2,1,text)
}
}
dialog szlinelist {
title "SZline List"
size -1 -1 200 80
box "SZline List",1, 5 5 190 45
edit "",2, 70 20 120 20
text "Parameters:",3, 10 20 60 20
button "Ok",4, 50 55 100 20
}
on *:dialog:szlinelist:sclick:*: {
if ($did == 4) {
operserv szline list $did(2,1,text)
}
}
dialog szlineview {
title "View SZline"
size -1 -1 200 80
box "View SZline",1, 5 5 190 45
edit "",2, 70 20 120 20
text "Parameters:",3, 10 20 60 20
button "Ok",4, 50 55 100 20
}
on *:dialog:szlineview:sclick:*: {
if ($did == 4) {
operserv szline view $did(2,1,text)
}
}
dialog oper2 {
title "Oper"
size -1 -1 120 110
box "Oper",1, 5 5 110 100
button "Add",2, 10 20 100 20
button "Del",3, 10 40 100 20
button "List",4, 10 60 100 20
button "Clear",5, 10 80 100 20
}
on *:dialog:oper2:sclick:*: {
if ($did == 2) {
dialog -m operadd operadd
}
if ($did == 3) {
dialog -m operdel operdel
}
if ($did == 4) {
dialog -m operlist operlist
}
if ($did == 5) {
operserv oper clear
}
}
dialog operadd {
title "Add user"
size -1 -1 200 80
box "Add user -",1, 5 5 190 45
edit "",2, 40 20 150 20
text "User:",3, 10 20 30 20
button "Ok",4, 50 55 100 20
}
on *:dialog:operadd:sclick:*: {
if ($did == 4) {
operserv oper add $did(2,1,text)
}
}
dialog operdel {
title "Del user"
size -1 -1 200 80
box "Del user -",1, 5 5 190 45
edit "",2, 40 20 150 20
text "User:",3, 10 20 30 20
button "Ok",4, 50 55 100 20
}
on *:dialog:operdel:sclick:*: {
if ($did == 4) {
operserv oper del $did(2,1,text)
}
}
dialog operlist {
title "Oper List"
size -1 -1 200 80
box "Oper List",1, 5 5 190 45
edit "",2, 70 20 120 20
text "Parameters:",3, 10 20 60 20
button "Ok",4, 50 55 100 20
}
on *:dialog:operlist:sclick:*: {
if ($did == 4) {
operserv oper list $did(2,1,text)
}
}
dialog ignore {
title "Ignore"
size -1 -1 120 110
box "Ignore",1, 5 5 110 100
button "Add",2, 10 20 100 20
button "Del",3, 10 40 100 20
button "List",4, 10 60 100 20
button "Clear",5, 10 80 100 20
}
on *:dialog:ignore:sclick:*: {
if ($did == 2) {
dialog -m ignoreadd ignoreadd
}
if ($did == 3) {
dialog -m ignoredel ignoredel
}
if ($did == 4) {
dialog -m ignorelist ignorelist
}
if ($did == 5) {
operserv ignore clear
}
}
dialog ignoreadd {
title "Ignore user"
size -1 -1 200 80
box "Ignore user -",1, 5 5 190 45
edit "",2, 40 20 150 20
text "User:",3, 10 20 30 20
button "Ok",4, 50 55 100 20
}
on *:dialog:ignoreadd:sclick:*: {
if ($did == 4) {
operserv ignore add $did(2,1,text)
}
}
dialog ignoredel {
title "Ignore"
size -1 -1 200 80
box "Del user from Ignore -",1, 5 5 190 45
edit "",2, 40 20 150 20
text "User:",3, 10 20 30 20
button "Ok",4, 50 55 100 20
}
on *:dialog:ignoredel:sclick:*: {
if ($did == 4) {
operserv ignore del $did(2,1,text)
}
}
dialog ignorelist {
title "Ignore List"
size -1 -1 200 80
box "Ignore List",1, 5 5 190 45
edit "",2, 70 20 120 20
text "Parameters:",3, 10 20 60 20
button "Ok",4, 50 55 100 20
}
on *:dialog:ignorelist:sclick:*: {
if ($did == 4) {
operserv ignore list $did(2,1,text)
}
}
dialog logonnews2 {
size -1 -1 120 90
title "Logon News"
box "Logon News",1, 5 5 110 80
button "Add",2, 10 20 100 20
button "Del",3, 10 40 100 20
button "List",4, 10 60 100 20
}
on *:dialog:logonnews2:sclick:*: {
if ($did == 2) {
dialog -m logonnews2add logonnews2add
}
if ($did == 3) {
dialog -m logonnews2del logonnews2del
}
if ($did == 4) {
operserv logonnews list
}
}
dialog logonnews2add {
title "Logon News"
size -1 -1 200 80
box "Logon News Add",1, 5 5 190 45
edit "",2, 40 20 1200 20
text "News:",3, 10 20 30 20
button "Ok",4, 50 55 100 20
}
on *:dialog:logonnews2add:sclick:*: {
if ($did == 4) {
operserv logonnews add $did(2,1,text)
}
}
dialog logonnews2del {
title "Logon News"
size -1 -1 200 80
box "Logon News Del",1, 5 5 190 45
edit "",2, 40 20 1200 20
text "News:",3, 10 20 30 20
button "Ok",4, 50 55 100 20
}
on *:dialog:logonnews2del:sclick:*: {
if ($did == 4) {
operserv logonnews del $did(2,1,text)
}
}
dialog randomnews2 {
size -1 -1 120 90
title "Random News"
box "Random News",1, 5 5 110 80
button "Add",2, 10 20 100 20
button "Del",3, 10 40 100 20
button "List",4, 10 60 100 20
}
on *:dialog:randomnews2:sclick:*: {
if ($did == 2) {
dialog -m randomnews2add randomnews2add
}
if ($did == 3) {
dialog -m randomnews2del randomnews2del
}
if ($did == 4) {
operserv randomnews list
}
}
dialog randomnews2add {
title "Random News"
size -1 -1 200 80
box "Random News Add",1, 5 5 190 45
edit "",2, 40 20 1200 20
text "News:",3, 10 20 30 20
button "Ok",4, 50 55 100 20
}
on *:dialog:randomnews2add:sclick:*: {
if ($did == 4) {
operserv randomnews add $did(2,1,text)
}
}
dialog randomnews2del {
title "Random News"
size -1 -1 200 80
box "Random News Del",1, 5 5 190 45
edit "",2, 40 20 1200 20
text "News:",3, 10 20 30 20
button "Ok",4, 50 55 100 20
}
on *:dialog:randomnews2del:sclick:*: {
if ($did == 4) {
operserv randomnews2 del $did(2,1,text)
}
}
dialog opernews2 {
size -1 -1 120 90
title "Oper News"
box "Oper News",1, 5 5 110 80
button "Add",2, 10 20 100 20
button "Del",3, 10 40 100 20
button "List",4, 10 60 100 20
}
on *:dialog:opernews2:sclick:*: {
if ($did == 2) {
dialog -m opernews2add opernews2add
}
if ($did == 3) {
dialog -m opernews2del opernews2del
}
if ($did == 4) {
operserv opernews list
}
}
dialog opernews2add {
title "Oper News"
size -1 -1 200 80
box "Oper News Add",1, 5 5 190 45
edit "",2, 40 20 1200 20
text "News:",3, 10 20 30 20
button "Ok",4, 50 55 100 20
}
on *:dialog:opernews2add:sclick:*: {
if ($did == 4) {
operserv opernews add $did(2,1,text)
}
}
dialog opernews2del {
title "Oper News"
size -1 -1 200 80
box "Oper News Del",1, 5 5 190 45
edit "",2, 40 20 1200 20
text "News:",3, 10 20 30 20
button "Ok",4, 50 55 100 20
}
on *:dialog:opernews2del:sclick:*: {
if ($did == 4) {
operserv opernews2 del $did(2,1,text)
}
}
dialog oset {
title "Set"
size -1 -1 120 190
box "Set -",1, 5 5 110 180
button "Readonly",2, 10 20 100 20
button "Logchan",3, 10 40 100 20
button "Debug",4, 10 60 100 20
button "Noexpire",5, 10 80 100 20
button "SuperAdmin",6, 10 100 100 20
button "SQL",7, 10 120 100 20
button "Ignore",8, 10 140 100 20
button "List",9, 10 160 100 20
}
on *:dialog:oset:sclick:*: {
if ($did == 2) {
dialog -m setreadonly setreadonly
}
if ($did == 3) {
dialog -m setlogchan setlogchan
}
if ($did == 4) {
dialog -m setdebug setdebug
}
if ($did == 5) {
dialog -m setnoexpire setnoexpire
}
if ($did == 6) {
dialog -m setsuperadmin setsuperadmin
}
if ($did == 7) {
dialog -m setsql setsql
}
if ($did == 8) {
dialog -m osetignore osetignore
}
if ($did == 9) {
dialog -m osetlist osetlist
}
}
dialog setreadonly {
title "Set -"
size -1 -1 200 80
box "Set - Readonly",1, 5 5 190 45
edit "",2, 55 20 130 20
text "Settings:",3, 10 20 45 20
button "Ok",4, 50 55 100 20
}
on *:dialog:setreadonly:sclick:*: {
if ($did == 4) {
operserv set readonly $did(2,1,text)
}
}
dialog setlogchan {
title "Set -"
size -1 -1 200 80
box "Set - Logchan",1, 5 5 190 45
edit "",2, 55 20 130 20
text "Settings:",3, 10 20 45 20
button "Ok",4, 50 55 100 20
}
on *:dialog:setlogchan:sclick:*: {
if ($did == 4) {
operserv set logchan $did(2,1,text)
}
}
dialog setdebug {
title "Set -"
size -1 -1 200 80
box "Set - Debug",1, 5 5 190 45
edit "",2, 55 20 130 20
text "Settings:",3, 10 20 45 20
button "Ok",4, 50 55 100 20
}
on *:dialog:setdebug:sclick:*: {
if ($did == 4) {
operserv set debug $did(2,1,text)
}
}
dialog setnoexpire {
title "Set -"
size -1 -1 200 80
box "Set - Noexpire",1, 5 5 190 45
edit "",2, 55 20 130 20
text "Settings:",3, 10 20 45 20
button "Ok",4, 50 55 100 20
}
on *:dialog:setnoexpire:sclick:*: {
if ($did == 4) {
operserv set noexpire $did(2,1,text)
}
}
dialog setsuperadmin {
title "Set -"
size -1 -1 200 80
box "Set - Superadmin",1, 5 5 190 45
edit "",2, 55 20 130 20
text "Settings:",3, 10 20 45 20
button "Ok",4, 50 55 100 20
}
on *:dialog:setsuperadmin:sclick:*: {
if ($did == 4) {
operserv set superadmin $did(2,1,text)
}
}
dialog setsql {
title "Set -"
size -1 -1 200 80
box "Set - SQL",1, 5 5 190 45
edit "",2, 55 20 130 20
text "Settings:",3, 10 20 45 20
button "Ok",4, 50 55 100 20
}
on *:dialog:setsql:sclick:*: {
if ($did == 4) {
operserv set sql $did(2,1,text)
}
}
dialog osetignore {
title "Set -"
size -1 -1 200 80
box "Set - Ignore",1, 5 5 190 45
edit "",2, 55 20 130 20
text "Settings:",3, 10 20 45 20
button "Ok",4, 50 55 100 20
}
on *:dialog:osetignore:sclick:*: {
if ($did == 4) {
operserv set ignore $did(2,1,text)
}
}
dialog osetlist {
title "Set -"
size -1 -1 200 80
box "Set - List",1, 5 5 190 45
edit "",2, 55 20 130 20
text "Settings:",3, 10 20 45 20
button "Ok",4, 50 55 100 20
}
on *:dialog:osetlist:sclick:*: {
if ($did == 4) {
operserv set list $did(2,1,text)
}
}
dialog noop {
title "Noop"
size -1 -1 120 70
box "Noop",1, 5 5 110 60
button "Set",2, 10 20 100 20
button "Revoke",3, 10 40 100 20
}
on *:dialog:noop:sclick:*: {
if ($did == 2) {
dialog -m noopset noopset
}
if ($did == 3) {
dialog -m revoke revoke
}
}
dialog noopset {
title "Noop"
size -1 -1 200 80
box "Noop - Set",1, 5 5 190 45
edit "",2, 55 20 130 20
text "Server -:",3, 10 20 45 20
button "Ok",4, 50 55 100 20
}
on *:dialog:noopset:sclick:*: {
if ($did == 4) {
operserv noop set $did(2,1,text)
}
}
dialog revoke {
title "Noop"
size -1 -1 200 80
box "Noop - Revoke",1, 5 5 190 45
edit "",2, 55 20 130 20
text "Server -:",3, 10 20 45 20
button "Ok",4, 50 55 100 20
}
on *:dialog:revoke:sclick:*: {
if ($did == 4) {
operserv noop revoke $did(2,1,text)
}
}
dialog jupe {
title "Jupe"
size -1 -1 210 110
box "Jupe",1, 5 5 200 75
edit "",2, 55 25 135 20
edit "",3, 55 50 135 20
text "Server:",4, 10 25 45 20
text "Reason:",5, 10 50 45 20
button "Ok",6, 55 85 100 20
}
on *:dialog:jupe:sclick:*: {
if ($did == 6) {
operserv jupe $did(2,1,text) $did(3,1,text)
}
}
dialog raw {
title "Raw"
size -1 -1 200 80
box "Raw",1, 5 5 190 45
edit "",2, 55 20 130 20
text "String -:",3, 10 20 45 20
button "Ok",4, 50 55 100 20
}
on *:dialog:raw:sclick:*: {
if ($did == 4) {
operserv raw $did(2,1,text)
}
}
dialog chanlist {
title "Chan List"
size -1 -1 200 80
box "Chan List",1, 5 5 190 45
edit "",2, 75 20 110 20
text "Parameters:",3, 10 20 60 20
button "Ok",4, 50 55 100 20
}
on *:dialog:chanlist:sclick:*: {
if ($did == 4) {
operserv chanlist $did(2,1,text)
}
}
dialog userlist {
title "User List"
size -1 -1 200 80
box "User List",1, 5 5 190 45
edit "",2, 75 20 110 20
text "Parameters:",3, 10 20 60 20
button "Ok",4, 50 55 100 20
}
on *:dialog:userlist:sclick:*: {
if ($did == 4) {
operserv userlist $did(2,1,text)
}
}
dialog chankill {
title "Chankill"
size -1 -1 190 145
box "Channel Kill",1, 5 10 180 105
edit "",2, 55 30 120 20
edit "",3, 55 55 120 20
edit "",4, 55 80 120 20
text "Expiry:",5, 20 30 32 20
text "Channel:",6, 11 55 42 20
text "Reason:",7, 14 80 40 20
button "Ok",8, 45 120 100 20
}
on *:dialog:chankill:sclick:*: {
if ($did == 8) {
operserv chankill $did(2,1,text) $did(3,1,text) $did(4,1,text)
}
}
dialog exception {
title "Exception"
size -1 -1 120 130
box "Exception",1, 5 5 110 120
button "Add",2, 10 20 100 20
button "Del",3, 10 40 100 20
button "Move",4, 10 60 100 20
button "List",5, 10 80 100 20
button "View",6, 10 100 100 20
}
on *:dialog:exception:sclick:*: {
if ($did == 2) {
dialog -m exceptionadd exceptionadd
}
if ($did == 3) {
dialog -m exceptiondel exceptiondel
}
if ($did == 4) {
dialog -m exceptionmove exceptionmove
}
if ($did == 5) {
dialog -m exceptionlist exceptionlist
}
if ($did == 6) {
dialog -m exceptionview exceptionview
}
}
dialog exceptionadd {
title "Exception"
size -1 -1 200 155
box "Exception - Add",1, 5 5 190 120
edit "",2, 50 20 120 20
edit "",3, 50 45 1200 20
edit "",4, 50 70 120 20
edit "",8, 50 95 1200 20
text "Expiry:",5, 16 20 32 15
text "Mask:",6, 22 45 27 20
text "Limit:",7, 25 70 25 20
text "Reason:",9, 10 95 40 20
button "Ok",10, 50 130 100 20
}
on *:dialog:exceptionadd:sclick:*: {
if ($did == 10) {
operserv exception add $did(2,1,text) $did(3,1,text) $did(4,1,text)
$did(8,1,text)
}
}
dialog exceptiondel {
title "Exception"
size -1 -1 200 80
box "Exception - Del",1, 5 5 190 45
edit "",2, 40 20 1200 20
text "Mask:",3, 10 20 30 20
button "Ok",4, 50 55 100 20
}
on *:dialog:exceptiondel:sclick:*: {
if ($did == 4) {
operserv exception del $did(2,1,text)
}
}
dialog exceptionmove {
title "Exception - Move"
size -1 -1 210 120
box "Exception - Move",3, 5 10 200 80
edit "",4, 55 35 120 20
edit "",5, 55 60 120 20
text "Position:",8, 10 36 45 20
text "Number:",6, 10 62 40 70
button "Ok",7, 50 93 100 20
}
on *:dialog:exceptionmove:sclick:*: {
if ($did == 7) {
operserv exception move $did(4,1,text) $did(5,1,text)
}
}
dialog exceptionlist {
title "Exception"
size -1 -1 200 80
box "Exception - List",1, 5 5 190 45
edit "",2, 75 20 110 20
text "Parameters:",3, 10 20 60 20
button "Ok",4, 45 55 100 20
}
on *:dialog:exceptionlist:sclick:*: {
if ($did == 4) {
operserv exception list $did(2,1,text)
}
}
dialog exceptionview {
title "Exception"
size -1 -1 200 80
box "Exception - View",1, 5 5 190 45
edit "",2, 75 20 110 20
text "Parameters:",3, 10 20 60 20
button "Ok",4, 45 55 100 20
}
on *:dialog:exceptionview:sclick:*: {
if ($did == 4) {
operserv exception view $did(2,1,text)
}
}
dialog session {
title "Session"
size -1 -1 120 70
box "Session",1, 5 5 110 60
button "List",2, 10 20 100 20
button "View",3, 10 40 100 20
}
on *:dialog:session:sclick:*: {
if ($did == 2) {
dialog -m sessionlist sessionlist
}
if ($did == 3) {
dialog -m sessionview sessionview
}
}
dialog sessionview {
title "Session"
size -1 -1 200 80
box "Session - View",1, 5 5 190 45
edit "",2, 40 20 1200 20
text "Host:",3, 10 20 30 20
button "Ok",4, 50 55 100 20
}
on *:dialog:sessionview:sclick:*: {
if ($did == 4) {
operserv session view $did(2,1,text)
}
}
dialog sessionlist {
title "Session"
size -1 -1 200 80
box "Session - List",1, 5 5 190 45
edit "",2, 75 20 110 20
text "Threshold:",3, 10 20 60 20
button "Ok",4, 45 55 100 20
}
on *:dialog:sessionlist:sclick:*: {
if ($did == 4) {
operserv session list $did(2,1,text)
}
}
dialog defcon {
title "DEFCON"
size -1 -1 200 80
box "DEFCON",1, 5 5 190 45
edit "",2, 55 20 130 20
text "Setting:",3, 10 20 45 20
button "Ok",4, 50 55 100 20
}
on *:dialog:defcon:sclick:*: {
if ($did == 4) {
operserv defcon $did(2,1,text)
}
}
dialog umode {
title "Umode"
size -1 -1 200 100
box "Umode",1, 5 5 190 65
edit "",2, 50 20 130 20
edit "",3, 50 45 130 20
text "Nick:",4, 22 20 25 20
text "Modes:",5, 10 45 40 20
button "Ok",6, 50 75 100 20
}
on *:dialog:umode:sclick:*: {
if ($did == 6) {
operserv umode $did(2,1,text) $did(3,1,text)
}
}
dialog oline {
title "Oline"
size -1 -1 200 100
box "Oline",1, 5 5 190 65
edit "",2, 50 20 130 20
edit "",3, 50 45 130 20
text "Nick:",4, 22 20 25 20
text "Flags:",5, 16 45 30 20
button "Ok",6, 50 75 100 20
}
on *:dialog:oline:sclick:*: {
if ($did == 6) {
operserv oline $did(2,1,text) $did(3,1,text)
}
}
dialog svsnick {
title "SVSnick"
size -1 -1 210 120
box "SVSnick",1, 5 10 200 80
edit "",2, 60 35 120 20
edit "",3, 60 60 120 20
text "Nick:",4, 34 36 25 20
text "New Nick:",5, 10 60 50 20
button "Ok",8, 55 95 100 20
}
on *:dialog:svsnick:sclick:*: {
if ($did == 8) {
operserv svsnick $did(2,1,text) $did(3,1,text)
}
}
dialog operadmin {
title "Operadmin"
size -1 -1 120 110
box "Operadmin",1, 5 5 110 100
button "Add",2, 10 20 100 20
button "Del",3, 10 40 100 20
button "List",4, 10 60 100 20
button "Clear",5, 10 80 100 20
}
on *:dialog:operadmin:sclick:*: {
if ($did == 2) {
dialog -m operadminadd operadminadd
}
if ($did == 3) {
dialog -m operadmindel operadmindel
}
if ($did == 4) {
dialog -m operadminlist operadminlist
}
if ($did == 5) {
operserv operserv admin clear
}
}
dialog operadminadd {
title "Operadmin"
size -1 -1 200 80
box "Opderadmin - Add",1, 5 5 190 45
edit "",2, 40 20 150 20
text "User:",3, 10 20 30 20
button "Ok",4, 50 55 100 20
}
on *:dialog:operadminadd:sclick:*: {
if ($did == 4) {
operserv admin add $did(2,1,text)
}
}
dialog operadmindel {
title "Operadmin"
size -1 -1 200 80
box "Opderadmin - Del",1, 5 5 190 45
edit "",2, 40 20 150 20
text "User:",3, 10 20 30 20
button "Ok",4, 50 55 100 20
}
on *:dialog:operadmindel:sclick:*: {
if ($did == 4) {
operserv admin del $did(2,1,text)
}
}
dialog operadminlist {
title "Operadmin"
size -1 -1 200 80
box "Operadmin - List",1, 5 5 190 45
edit "",2, 75 20 110 20
text "Parameters:",3, 10 20 60 20
button "Ok",4, 45 55 100 20
}
on *:dialog:operadminlist:sclick:*: {
if ($did == 4) {
operserv admin list $did(2,1,text)
}
}
dialog modinfo {
title "Mod Info"
size -1 -1 200 80
box "Mod Info",1, 5 5 190 45
edit "",2, 35 20 1450 20
text "File:",3, 10 20 25 20
button "Ok",4, 50 55 100 20
}
on *:dialog:modinfo:sclick:*: {
if ($did == 4) {
operserv modinfo $did(2,1,text)
}
}
dialog modload {
title "Mod Load"
size -1 -1 200 80
box "Mod Load",1, 5 5 190 45
edit "",2, 35 20 1450 20
text "File:",3, 10 20 25 20
button "Ok",4, 50 55 100 20
}
on *:dialog:modload:sclick:*: {
if ($did == 4) {
operserv modload $did(2,1,text)
}
}
dialog modunload {
title "Mod Unload"
size -1 -1 200 80
box "Mod Unload",1, 5 5 190 45
edit "",2, 35 20 1450 20
text "File:",3, 10 20 25 20
button "Ok",4, 50 55 100 20
}
on *:dialog:modunload:sclick:*: {
if ($did == 4) {
operserv modunload $did(2,1,text)
}
}
dialog credit {
title "Credit"
size -1 -1 120 130
box "Credit",1, 5 5 110 120
button "Made by?",2, 10 20 100 20
button "Idea?",3, 10 40 100 20
button "Why?",4, 10 60 100 20
button "Help?",5, 10 80 100 20
button "Where?",6, 10 100 100 20
}
on *:dialog:credit:sclick:*: {
if ($did == 2) {
dialog -m madeby madeby
}
if ($did == 3) {
dialog -m idea idea
}
if ($did == 4) {
dialog -m why why
}
if ($did == 5) {
dialog -m chelp chelp
}
if ($did == 6) {
dialog -m where where
}
}
dialog where {
title "Where can I find you?"
size -1 -1 200 100
text "I will not give away my email but you can find me on the server
Darkstar.Caelestia.net with the name Ralfy or a name with Ralfy in it. I
will aslo be in alot of channels. You can find me in the #Igneus
channel.",1, 5 10 190 200
}
dialog chelp {
title "Did you get help?"
size -1 -1 200 85
text "I tried getting help from others the first day I started making this
script but nobody would help me so I had to make it on my own without
anybody helping me",1, 10 10 170 100
}
dialog why {
title "Why arent you posting this on hawkee yourself?"
size -1 -1 350 60
text "The reason why I'm(Ralfy) not posting this dialog script on
hawkee.com is because I screwed up my registration. I am to lazy to fix that
so I had somebody else post this dialog script for me instead",1, 5 10 340
200
}
dialog madeby {
title "Made by:"
size -1 -1 180 50
text "This dialog script was created by a person named Ralfy. ",1, 5 10
200 50
}
dialog idea {
title "Got idea from:"
size -1 -1 300 60
text "I got the idea of making this script starting with sean's post on
the Apole snippet made by nfield38
(http://www.hawkee.com/snippet.php?snippet_id=1965).",1, 10 10 290 100
}
dialog help {
title "HelpServ"
size -1 -1 121 141
box "Server's",2, 5 0 110 138
button "ChanServ",3, 10 15 100 20
button "NickServ",4, 10 35 100 20
button "MemoServ",5, 10 55 100 20
button "BotServ",6, 10 75 100 20
button "HostServ",7, 10 95 100 20
button "HelpServ",8, 10 115 100 20
}
on *:dialog:help:sclick:*: {
if ($did == 3) {
chanserv help
}
if ($did == 4) {
nickserv help
}
if ($did == 5) {
memoserv help
}
if ($did == 6) {
botserv help
}
if ($did == 7) {
hostserv help
}
if ($did == 8) {
helpserv help
}
}
dialog host {
title "HostServ"
size -1 -1 120 135
box "HostServ",1, 5 5 110 100
button "On",2, 10 20 100 20
button "Off",3, 10 40 100 20
button "Group",4, 10 60 100 20
button "Request",5, 10 80 100 20
button "Help",6, 10 110 100 20
}
on *:dialog:host:sclick:*: {
if ($did == 2) {
hostserv on
}
if ($did == 3) {
hostserv off
}
if ($did == 4) {
hostserv group
}
if ($did == 5) {
dialog -m request request
}
if ($did == 6) {
hostserv help
}
}
dialog request {
title "Request"
size -1 -1 180 100
box "Request",1, 5 10 165 65
edit "",2, 40 35 125 20
text "Host:",4, 10 36 25 20
button "Ok",8, 35 78 100 20
}
on *:dialog:request:sclick:*: {
if ($did == 8) {
hostserv request $did(2,1,text)
}
}
dialog bot {
title "BotServ"
size -1 -1 120 245
box "BotServ",1, 5 5 110 210
button "Botlist",2, 10 25 100 20
button "Assign",3, 10 45 100 20
button "Set",4, 10 65 100 20
button "Kick",5, 10 85 100 20
button "Badwords",6, 10 105 100 20
button "Act",7, 10 125 100 20
button "Say",8, 10 145 100 20
button "Info",9, 10 165 100 20
button "Unassign",10, 10 185 100 20
button "Help",11, 10 220 100 20
}
on *:dialog:bot:sclick:*: {
if ($did == 2) {
botserv botlist
}
if ($did == 3) {
dialog -m bassign bassign
}
if ($did == 4) {
dialog -m bset bset
}
if ($did == 5) {
dialog -m kbolds kbolds
}
if ($did == 6) {
dialog -m badwords badwords
}
if ($did == 7) {
dialog -m bact bact
}
if ($did == 8) {
dialog -m bsay bsay
}
if ($did == 9) {
dialog -m binfo binfo
}
if ($did == 10) {
dialog -m bunassign bunassign
}
if ($did == 11) {
botserv help
}
}
dialog bunassign {
title "Unassign Bot"
size -1 -1 200 100
box "Unassign Bot",1, 5 10 185 65
edit "",2, 60 35 120 20
text "Channel:",4, 10 36 45 20
button "Ok",8, 50 78 100 20
}
on *:dialog:bunassign:sclick:*: {
if ($did == 8) {
botserv unassign $did(2,1,text)
}
}
dialog binfo {
title "Bot Info"
size -1 -1 190 100
box "Bot Info",1, 5 10 175 65
edit "",2, 75 35 100 20
text "Bot\Channel:",4, 10 36 60 20
button "Ok",8, 40 78 100 20
}
on *:dialog:binfo:sclick:*: {
if ($did == 8) {
botserv info $did(2,1,text)
}
}
dialog bsay {
title "Say"
size -1 -1 200 130
box "Say",1, 5 10 185 90
edit "",3, 70 65 10000 20
edit "",2, 70 35 110 20
text "Channel:",4, 10 35 60 20
text "Say:",5, 20 65 30 20
button "Ok",8, 45 105 100 20
}
on *:dialog:bsay:sclick:*: {
if ($did == 8) {
botserv say $did(2,1,text) $did(3,1,text)
}
}
dialog bact {
title "Act"
size -1 -1 200 130
box "Act",1, 5 10 185 90
edit "",3, 70 65 10000 20
edit "",2, 70 35 110 20
text "Channel:",4, 10 35 60 20
text "Act:",5, 20 65 30 20
button "Ok",8, 45 105 100 20
}
on *:dialog:bact:sclick:*: {
if ($did == 8) {
botserv act $did(2,1,text) $did(3,1,text)
}
}
dialog badwords {
title "Badwords"
size -1 -1 120 120
box "Add\Del badwords",1, 5 5 110 110
button "Add",2, 10 25 100 20
button "Del",3, 10 45 100 20
button "List",4, 10 65 100 20
button "Clear",5, 10 85 100 20
}
on *:dialog:badwords:sclick:*: {
if ($did == 2) {
dialog -m badd badd
}
if ($did == 3) {
dialog -m bdel bdel
}
if ($did == 4) {
dialog -m blist blist
}
if ($did == 5) {
dialog -m bclear bclear
}
}
dialog bclear {
title "Clear badwords list"
size -1 -1 200 100
box "Clear badwords",1, 5 10 185 65
edit "",2, 70 35 100 20
text "Channel:",4, 10 36 60 20
button "Ok",8, 45 78 100 20
}
on *:dialog:bclear:sclick:*: {
if ($did == 8) {
botserv badwords $did(2,1text) clear
}
}
dialog blist {
title "Badword List"
size -1 -1 250 120
box "Badword List",1, 5 10 240 85
edit "",2, 70 35 150 20
edit "",3, 70 60 150 20
text "Channel:",4, 10 35 45 20
text "Parameters:",5, 10 60 58 50
button "Ok",8, 75 97 100 20
}
on *:dialog:blist:sclick:*: {
if ($did == 8) {
botserv badwords $did(2,1,text) list $did(3,1,text)
}
}
dialog bdel {
title "Delete - from Badwords list"
size -1 -1 210 110
box "Delete word from badwords List",1, 5 5 200 75
edit "",2, 55 25 135 20
edit "",3, 55 50 135 20
text "Channel:",4, 10 25 45 20
text "Del -:",5, 27 50 27 20
button "Ok",6, 55 85 100 20
}
on *:dialog:bdel:sclick:*: {
if ($did == 6) {
botserv badwords $did(2,1,text) del $did(3,1,text)
}
}
dialog badd {
title "Add to Badwords list"
size -1 -1 210 110
box "Add to Badwords List",1, 5 5 200 75
edit "",2, 55 25 135 20
edit "",3, 55 50 135 20
text "Channel:",4, 10 25 45 20
text "Add -:",5, 23 50 30 20
button "Ok",6, 55 85 100 20
}
on *:dialog:badd:sclick:*: {
if ($did == 6) {
botserv badwords $did(2,1,text) add $did(3,1,text)
}
}
dialog kbolds {
title "Kick"
size -1 -1 200 170
box "Kick",1, 5 10 185 130
edit "",2, 70 35 100 20
edit "",3, 70 60 100 20
edit "",4, 70 85 100 20
edit "",5, 70 110 100 20
text "Channel:",6, 18 35 50 20
text "Kick Type:",8, 12 60 50 20
text "On or Off:",9, 11 85 59 20
text "Settings:",10, 18 110 45 20
button "Ok",7, 45 145 100 20
}
on *:dialog:kbolds:sclick:*: {
if ($did == 7) {
botserv kick $did(2,1,text) $did(3,1,text) $did(4,1,text) $did(5,1,text)
}
}
dialog bassign {
title "AssignBot"
size -1 -1 250 110
box "Assign Bot -",1, 5 5 240 75
edit "",2, 60 25 150 20
text "Channel:",3, 15 25 45 20
edit "",4, 60 50 150 20
text "Bot Name:",5, 10 50 50 20
button "Ok",6, 70 85 100 20
}
on *:dialog:bassign:sclick:*: {
if ($did == 6) {
botserv assign $did(2,1,text) $did(4,1,text)
}
}
dialog bset {
title "Set"
size -1 -1 120 135
box "Set",1, 5 5 110 125
button "Dontkickops",2, 10 20 100 20
button "Dontkickvoices",3, 10 40 100 20
button "Greet",4, 10 60 100 20
button "Fantasy",5, 10 80 100 20
button "Symboisis"6, 10 100 100 20
}
on *:dialog:bset:sclick:*: {
if ($did == 2) {
dialog -m bdontkickops bdontkickops
}
if ($did == 3) {
dialog -m bdontkickvoices bdontkickvoices
}
if ($did == 4) {
dialog -m bgreet bgreet
}
if ($did == 5) {
dialog -m bfantasy bfantasy
}
if ($did == 6) {
dialog -m bsym bsym
}
}
dialog bsym {
title "Set - Symboisis"
size -1 -1 200 110
box "Set - Symboisis",1, 5 5 190 75
edit "",2, 55 25 130 20
text "Channel:",3, 10 25 45 20
edit "",4, 55 50 130 20
text "Setting:",5, 15 50 40 20
button "Ok",6, 50 85 100 20
}
on *:dialog:bsym:sclick:*: {
if ($did == 6) {
botserv set $did(2,1,text) symbiosis $did(4,1,text)
}
}
dialog bfantasy {
title "Set - Fantasy"
size -1 -1 200 110
box "Set - Fantasy",1, 5 5 190 75
edit "",2, 55 25 130 20
text "Channel:",3, 10 25 45 20
edit "",4, 55 50 130 20
text "Setting:",5, 15 50 40 20
button "Ok",6, 50 85 100 20
}
on *:dialog:bfantasy:sclick:*: {
if ($did == 6) {
botserv set $did(2,1,text) fantasy $did(4,1,text)
}
}
dialog bgreet {
title "Set - Greet"
size -1 -1 200 110
box "Set - Greet",1, 5 5 190 75
edit "",2, 55 25 130 20
text "Channel:",3, 10 25 45 20
edit "",4, 55 50 130 20
text "Setting:",5, 15 50 40 20
button "Ok",6, 50 85 100 20
}
on *:dialog:bgreet:sclick:*: {
if ($did == 6) {
botserv set $did(2,1,text) greet $did(4,1,text)
}
}
dialog bdontkickvoices {
title "Set - DontKickVoices"
size -1 -1 200 110
box "Set - DontKickVoices",1, 5 5 190 75
edit "",2, 55 25 130 20
text "Channel:",3, 10 25 45 20
edit "",4, 55 50 130 20
text "Setting:",5, 15 50 40 20
button "Ok",6, 50 85 100 20
}
on *:dialog:bdontkickvoices:sclick:*: {
if ($did == 6) {
botserv set $did(2,1,text) dontkickvoices $did(4,1,text)
}
}
dialog bdontkickops {
title "Set - DontKickOps"
size -1 -1 200 110
box "Set - DontKickOps",1, 5 5 190 75
edit "",2, 55 25 130 20
text "Channel:",3, 10 25 45 20
edit "",4, 55 50 130 20
text "Setting:",5, 15 50 40 20
button "Ok",6, 50 85 100 20
}
on *:dialog:bdontkickops:sclick:*: {
if ($did == 6) {
botserv set $did(2,1,text) dontkickops $did(4,1,text)
}
}
dialog memo {
title "MemoServ"
size -1 -1 100 280
box "MemoServ",1, 5 5 90 245
button "Send",2, 10 25 80 20
button "Sendall",3, 10 45 80 20
button "Cancel",4, 10 65 80 20
button "List",5, 10 85 80 20
button "Read",6, 10 105 80 20
button "Rsend",7, 10 125 80 20
button "Del",8, 10 145 80 20
button "Set",9, 10 165 80 20
button "Info",10, 10 185 80 20
button "Check",11, 10 205 80 20
button "Staff",12, 10 225 80 20
button "Help",13, 10 255 80 20
}
on *:dialog:memo:sclick:*: {
if ($did == 13) {
memoserv help
}
if ($did == 2) {
dialog -m send send
}
if ($did == 3) {
dialog -m sendall sendall
}
if ($did == 4) {
dialog -m cancel cancel
}
if ($did == 5) {
dialog -m list3 list3
}
if ($did == 6) {
dialog -m read read
}
if ($did == 7) {
dialog -m rsend rsend
}
if ($did == 8) {
dialog -m del del
}
if ($did == 9) {
dialog -m mset mset
}
if ($did == 10) {
dialog -m minfo minfo
}
if ($did == 11) {
dialog -m mcheck mcheck
}
if ($did == 12) {
dialog -m mstaff mstaff
}
}
dialog mstaff {
title "Staff"
size -1 -1 180 100
box "Staff",1, 5 10 165 65
edit "",2, 55 35 100 20
text "Memo:",4, 10 36 40 20
button "Ok",8, 35 78 100 20
}
on *:dialog:mstaff:sclick:*: {
if ($did == 8) {
memoserv staff $did(2,1,text)
}
}
dialog mcheck {
title "Check"
size -1 -1 180 100
box "Memo Check",1, 5 10 165 65
edit "",2, 55 35 100 20
text "Users:",4, 10 36 40 20
button "Ok",8, 35 78 100 20
}
on *:dialog:mcheck:sclick:*: {
if ($did == 8) {
memoserv check $did(2,1,text)
}
}
dialog minfo {
size -1 -1 190 73
button "Yes",1, 15 40 70 22
button "No",2, 105 40 70 22
text "Channel?",3, 75 22 50 12
}
on *:dialog:minfo:sclick:*: {
if ($did == 1) {
dialog -m yes6 yes6
}
if ($did == 2) {
memoserv info
}
}
dialog yes6 {
title "Info"
size -1 -1 200 100
box "Info",1, 5 10 185 65
edit "",2, 70 35 100 20
text "Channel:",4, 10 36 60 20
button "Ok",8, 45 78 100 20
}
on *:dialog:yes6:sclick:*: {
if ($did == 8) {
memoserv info $did(2,1,text)
}
}
dialog mset {
title "Set"
size -1 -1 125 75
box "Set",1, 5 5 115 65
button "Notify",2, 10 20 100 20
button "Limit",3, 10 40 100 20
}
on *:dialog:mset:sclick:*: {
if ($did == 2) {
dialog -m mset1 mset1
}
if ($did == 3) {
dialog -m mset2 mset2
}
}
dialog mset2 {
size -1 -1 190 73
button "Yes",1, 15 40 70 22
button "No",2, 105 40 70 22
text "Channel?",3, 75 22 50 12
}
on *:dialog:mset2:sclick:*: {
if ($did == 1) {
dialog -m yes4 yes4
}
if ($did == 2) {
dialog -m no4 no4
}
}
dialog no4 {
title "Set"
size -1 -1 220 85
box "Set",1, 5 10 210 45
edit "",3, 45 25 150 20
text "Limit:",5, 10 25 30 50
button "Ok",8, 55 60 100 20
}
on *:dialog:no4:sclick:*: {
if ($did == 8) {
memoserv set limit $did(3,1,text)
}
}
dialog yes4 {
title "Limit"
size -1 -1 210 115
box "Limit",1, 5 5 200 80
edit "",2, 55 49 140 20
edit "",4, 55 24 140 20
text "Limit:",3, 28 49 25 20
text "Channel:",5, 10 24 44 20
button "Ok",6, 50 90 100 20
}
on *:dialog:yes4:sclick:*: {
if ($did == 6) {
memoserv set limit $did(4,1,text) $did(2,1,text)
}
}
dialog mset1 {
title "Notify"
size -1 -1 120 115
box "Notify",1, 5 5 110 105
button "On",2, 10 20 100 20
button "Off",3, 10 40 100 20
button "New",4, 10 60 100 20
button "Logon",5, 10 80 100 20
}
on *:dialog:mset1:sclick:*: {
if ($did == 2) {
memoserv set notify on
}
if ($did == 3) {
memoserv set notify off
}
if ($did == 4) {
memoserv set notify new
}
if ($did == 5) {
memoserv set notify logon
}
}
dialog del {
size -1 -1 190 73
button "Yes",1, 15 40 70 22
button "No",2, 105 40 70 22
text "Channel?",3, 75 22 50 12
}
on *:dialog:del:sclick:*: {
if ($did == 1) {
dialog -m yes3 yes3
}
if ($did == 2) {
dialog -m no3 no3
}
}
dialog no3 {
title "Parameters"
size -1 -1 250 90
box "Parameters",1, 5 10 240 50
edit "",3, 75 25 150 20
text "Parameters:",5, 10 25 58 50
button "Ok",8, 75 65 100 20
}
on *:dialog:no3:sclick:*: {
if ($did == 8) {
memoserv del $did(3,1,text)
}
}
dialog yes3 {
title "Delete Memo From -"
size -1 -1 200 130
box "Delete Memo",1, 5 10 185 90
edit "",3, 70 65 100 20
edit "",2, 70 35 100 20
text "Channel:",4, 10 35 60 20
text "Memo:",5, 20 65 30 20
button "Ok",8, 45 105 100 20
}
on *:dialog:yes3:sclick:*: {
if ($did == 8) {
memoserv del $did(2,1,text) $did(3,1,text)
}
}
dialog rsend {
title "Rsend"
size -1 -1 200 130
box "Rsend",1, 5 10 185 90
edit "",3, 70 65 100 20
edit "",2, 70 35 100 20
text "User/Chan:",4, 10 35 60 20
text "Memo:",5, 35 65 30 20
button "Ok",8, 45 105 100 20
}
on *:dialog:rsend:sclick:*: {
if ($did == 8) {
memoserv rsend $did(2,1,text) $did(3,1,text)
}
}
dialog read {
size -1 -1 190 73
button "Yes",1, 15 40 70 22
button "No",2, 105 40 70 22
text "Channel?",3, 75 22 50 12
}
on *:dialog:read:sclick:*: {
if ($did == 1) {
dialog -m yes2 yes2
}
if ($did == 2) {
dialog -m no2 no2
}
}
dialog no2 {
title "Parameters"
size -1 -1 220 90
box "Parameters",1, 5 10 210 50
edit "",3, 45 25 150 20
text "Memo:",5, 10 25 30 50
button "Ok",8, 55 65 100 20
}
on *:dialog:no2:sclick:*: {
if ($did == 8) {
memoserv read $did(3,1,text)
}
}
dialog yes2 {
title "Channel"
size -1 -1 250 120
box "Channel",1, 5 10 240 85
edit "",2, 70 35 150 20
edit "",3, 70 60 150 20
text "Channel:",4, 10 35 45 20
text "Memo:",5, 20 60 50 50
button "Ok",8, 75 97 100 20
}
on *:dialog:yes2:sclick:*: {
if ($did == 8) {
memoserv read $did(2,1,text) $did(3,1,text)
}
}
dialog no {
title "Parameters"
size -1 -1 250 90
box "Channel",1, 5 10 240 50
edit "",3, 75 25 150 20
text "Parameters:",5, 10 25 58 50
button "Ok",8, 75 65 100 20
}
on *:dialog:no:sclick:*: {
if ($did == 8) {
memoserv list $did(3,1,text)
}
}
dialog list3 {
size -1 -1 190 73
button "Yes",1, 15 40 70 22
button "No",2, 105 40 70 22
text "Channel?",3, 75 22 50 12
}
on *:dialog:list3:sclick:*: {
if ($did == 1) {
dialog -m yes yes
}
if ($did == 2) {
dialog -m no no
}
}
dialog yes {
title "Channel"
size -1 -1 250 120
box "Channel",1, 5 10 240 85
edit "",2, 70 35 150 20
edit "",3, 70 60 150 20
text "Channel:",4, 10 35 45 20
text "Parameters:",5, 10 60 58 50
button "Ok",8, 75 97 100 20
}
on *:dialog:yes:sclick:*: {
if ($did == 8) {
memoserv list $did(2,1,text) $did(3,1,text)
}
}
dialog cancel {
title "Cancel "
size -1 -1 200 100
box "Cancel",1, 5 10 185 65
edit "",2, 70 35 100 20
text "User/Chan:",4, 10 36 60 20
button "Ok",8, 45 78 100 20
}
on *:dialog:cancel:sclick:*: {
if ($did == 8) {
memoserv cancel $did(2,1,text)
}
}
dialog sendall {
title "Send All"
size -1 -1 180 100
box "Send All",1, 5 10 165 65
edit "",2, 55 35 10000 20
text "Memo:",4, 10 36 40 20
button "Ok",8, 35 78 100 20
}
on *:dialog:sendall:sclick:*: {
if ($did == 8) {
memoserv sendall $did(2,1,text)
}
}
dialog Send {
title "Send Memo"
size -1 -1 210 125
box "Send Memo",1, 5 10 200 80
edit "",2, 49 35 150 20
edit "",3, 49 60 1500 20
text "Nick:",4, 10 35 25 20
text "Memo:",5, 10 60 30 50
button "Ok",8, 55 95 90 20
}
on *:dialog:send:sclick:*: {
if ($did == 8) {
memoserv send $did(2,1,text) $did(3,1,text)
}
}
dialog nick {
title "NickServ"
size -1 -1 180 220
box "NickServ",1, 5 5 170 185
button "Register Nick",2, 10 25 80 20
button "Group",3, 10 45 80 20
button "GList",4, 10 65 80 20
button "Identify",5, 10 85 80 20
button "Access",6, 10 105 80 20
button "Set",7, 10 125 80 20
button "Drop",8, 90 25 80 20
button "Recover",9, 90 45 80 20
button "Release",10, 90 65 80 20
button "Ghost",11, 90 85 80 20
button "AList",12, 10 145 80 20
button "Info",13, 90 105 80 20
button "List",14, 90 125 80 20
button "Logout",15, 90 145 80 20
button "Status",16, 90 165 80 20
button "Update",17, 10 165 80 20
button "Help",18, 5 195 170 20
}
on *:dialog:nick:sclick:*: {
if ($did == 18) {
nickserv help
}
if ($did == 2) {
dialog -m reg reg
}
if ($did == 3) {
dialog -m group group
}
if ($did == 4) {
nickserv glist
}
if ($did == 5) {
dialog -m ident ident
}
if ($did == 6) {
dialog -m acc acc
}
if ($did == 7) {
dialog -m sett sett
}
if ($did == 8) {
nickserv drop
}
if ($did == 9) {
dialog -m rec rec
}
if ($did == 10) {
dialog -m rel rel
}
if ($did == 11) {
dialog -m ghost ghost
}
if ($did == 12) {
ns alist
}
if ($did == 13) {
dialog -m info info
}
if ($did == 14) {
dialog -m list2 list2
}
if ($did == 15) {
nickserv logout
}
if ($did == 16) {
dialog -m status status
}
if ($did == 17) {
nickserv update
}
}
dialog sett {
title "Set"
size -1 -1 100 275
box "Set",1, 5 5 90 265
button "Display",2, 10 25 80 20
button "Password",3, 10 45 80 20
button "Language",4, 10 65 80 20
button "URL",5, 10 85 80 20
button "Email",6, 10 105 80 20
button "ICQ",7, 10 125 80 20
button "Greet",8, 10 145 80 20
button "Kill",9, 10 165 80 20
button "Secure",10, 10 185 80 20
button "Private",11, 10 205 80 20
button "Hide",12, 10 225 80 20
button "Msg",13, 10 245 80 20
}
on *:dialog:sett:sclick:*: {
if ($did == 2) {
dialog -m display display
}
if ($did == 3) {
dialog -m pass pass
}
if ($did == 4) {
dialog -m language language
}
if ($did == 5) {
dialog -m url2 url2
}
if ($did == 6) {
dialog -m email email
}
if ($did == 7) {
dialog -m icq icq
}
if ($did == 8) {
dialog -m greet greet
}
if ($did == 9) {
dialog -m kill kill
}
if ($did == 10) {
dialog -m secure secure
}
if ($did == 11) {
dialog -m private private
}
if ($did == 12) {
dialog -m hide hide
}
if ($did == 13) {
dialog -m msg2 msg2
}
}
on *:dialog:sett:sclick:*: {
if ($did == 2) {
dialog -m display display
}
if ($did == 3) {
dialog -m pass pass
}
if ($did == 4) {
dialog -m language language
}
if ($did == 5) {
dialog -m url2 url2
}
if ($did == 6) {
dialog -m email email
}
if ($did == 7) {
dialog -m icq icq
}
if ($did == 8) {
dialog -m greet greet
}
if ($did == 9) {
dialog -m kill kill
}
if ($did == 10) {
dialog -m secure secure
}
if ($did == 11) {
dialog -m private private
}
if ($did == 12) {
dialog -m hide hide
}
if ($did == 13) {
dialog -m msg2 msg2
}
}
dialog status {
title "Status"
size -1 -1 180 100
box "Status",1, 5 10 165 65
edit "",2, 55 35 100 20
text "Nick(s):",4, 10 36 40 20
button "Ok",8, 35 78 100 20
}
on *:dialog:status:sclick:*: {
if ($did == 8) {
nickserv status $did(2,1,text)
}
}
dialog ghost {
title "Ghost Nick"
size -1 -1 210 125
box "Ghost Nick",1, 5 10 200 80
edit "",2, 45 35 150 20
edit "",3, 45 60 150 20
text "Nick:",4, 10 35 25 20
text "Pass:",5, 10 60 25 40 20
button "Ok",8, 55 95 90 20
}
on *:dialog:ghost:sclick:*: {
if ($did == 8) {
nickserv ghost $did(2,1,text) $did(3,1,text)
}
}
dialog list2 {
title "List"
size -1 -1 180 100
box "List",1, 5 10 165 65
edit "",2, 55 35 100 20
text "Pattern:",4, 10 36 40 20
button "Ok",8, 35 78 100 20
}
on *:dialog:list2:sclick:*: {
if ($did == 8) {
nickserv list $did(2,1,text)
}
}
dialog info {
title "Info"
size -1 -1 160 100
box "Info",1, 5 10 145 65
edit "",2, 45 35 100 20
text "Nick:",4, 10 36 30 20
button "Ok",8, 35 78 100 20
}
on *:dialog:info:sclick:*: {
if ($did == 8) {
nickserv info $did(2,1,text) all
}
}
dialog rel {
title "Release Nick"
size -1 -1 210 125
box "Release Nick",1, 5 10 200 80
edit "",2, 45 35 150 20
edit "",3, 45 60 150 20
text "Nick:",4, 10 35 25 20
text "Pass:",5, 10 60 25 40 20
button "Ok",8, 55 95 90 20
}
on *:dialog:rel:sclick:*: {
if ($did == 8) {
nickserv release $did(2,1,text) $did(3,1,text)
}
}
dialog rec {
title "Recover Nick"
size -1 -1 210 125
box "Recover Nick",1, 5 10 200 80
edit "",2, 45 35 150 20
edit "",3, 45 60 150 20
text "Nick:",4, 10 35 25 20
text "Pass:",5, 10 60 25 40 20
button "Ok",8, 55 95 90 20
}
on *:dialog:rec:sclick:*: {
if ($did == 8) {
nickserv recover $did(2,1,text) $did(3,1,text)
}
}
dialog msg2 {
title "MSG"
size -1 -1 160 100
box "MSG",1, 5 10 145 65
edit "",2, 60 35 70 20
text "On or Off:",4, 10 36 50 20
button "Ok",8, 35 78 70 20
}
on *:dialog:msg2:sclick:*: {
if ($did == 8) {
nickserv set msg $did(2,1,text)
}
}
dialog hide {
title "Hide"
size -1 -1 100 120
box "Hide -",1, 5 5 90 105
button "Email",2, 10 25 80 20
button "Status",3, 10 45 80 20
button "Usermask",4, 10 65 80 20
button "Quit",5, 10 85 80 20
}
on *:dialog:hide:sclick:*: {
if ($did == 2) {
dialog -m hemail hemail
}
if ($did == 3) {
dialog -m hstatus hstatus
}
if ($did == 4) {
dialog -m husermask husermask
}
if ($did == 5) {
dialog -m hquit hquit
}
}
dialog hemail {
title "Hide Email"
size -1 -1 160 100
box "Hide Email",1, 5 10 145 65
edit "",2, 60 35 80 20
text "On or Off:",4, 10 36 50 20
button "Ok",8, 35 78 70 20
}
on *:dialog:hemail:sclick:*: {
if ($did == 8) {
nickserv set hide email $did(2,1,text)
}
}
dialog hstatus {
title "Hide Status"
size -1 -1 160 100
box "Hide Status",1, 5 10 145 65
edit "",2, 60 35 80 20
text "On or Off:",4, 10 36 50 20
button "Ok",8, 35 78 70 20
}
on *:dialog:hstatus:sclick:*: {
if ($did == 8) {
nickserv set hide status $did(2,1,text)
}
}
dialog husermask {
title "Hide Usermask"
size -1 -1 160 100
box "Hide Usermask",1, 5 10 145 65
edit "",2, 60 35 80 20
text "On or Off:",4, 10 36 50 20
button "Ok",8, 35 78 70 20
}
on *:dialog:husermask:sclick:*: {
if ($did == 8) {
nickserv set hide usermask $did(2,1,text)
}
}
dialog hquit {
title "Hide Quit"
size -1 -1 160 100
box "Hide Quit",1, 5 10 145 65
edit "",2, 60 35 80 20
text "On or Off:",4, 10 36 50 20
button "Ok",8, 35 78 70 20
}
on *:dialog:hquit:sclick:*: {
if ($did == 8) {
nickserv set hide quit $did(2,1,text)
}
}
dialog private {
title "Private"
size -1 -1 160 100
box "Private",1, 5 10 145 65
edit "",2, 60 35 80 20
text "On or Off:",4, 10 36 50 20
button "Ok",8, 35 78 70 20
}
on *:dialog:private:sclick:*: {
if ($did == 8) {
nickserv set private $did(2,1,text)
}
}
dialog secure {
title "Secure"
size -1 -1 160 100
box "Secure",1, 5 10 145 65
edit "",2, 60 35 80 20
text "On or Off:",4, 10 36 50 20
button "Ok",8, 35 78 70 20
}
on *:dialog:secure:sclick:*: {
if ($did == 8) {
nickserv set secure $did(2,1,text)
}
}
dialog kill {
title "Kill"
size -1 -1 160 100
box "Kill",1, 5 10 145 65
edit "",2, 60 35 80 20
text "On or Off:",4, 10 36 50 20
button "Ok",8, 35 78 70 20
}
on *:dialog:kill:sclick:*: {
if ($did == 8) {
nickserv set kill $did(2,1,text)
}
}
dialog greet {
title "Greet"
size -1 -1 600 85
box "Greet",1, 5 5 590 50
edit "",2, 45 25 545 20
text "Greet:",3, 10 25 35 20
button "Ok",8, 35 60 90 20
button "Even bigger Greet",9, 125 60 100 20
}
on *:dialog:greet:sclick:*: {
if ($did == 8) {
nickserv set greet $did(2,1,text)
}
if ($did == 9) {
dialog -m biggergreet biggergreet
}
}
dialog biggergreet {
title "Bigger Greet"
size -1 -1 1500 85
box "Greet",1, 5 5 1490 50
edit "",2, 45 25 1440 20
text "Greet:",3, 10 25 35 20
button "Ok",8, 35 60 90 20
button "Even Bigger",9, 125 60 100 20
}
on *:dialog:biggergreet:sclick:*: {
if ($did == 9) {
dialog -m bgreet bgreet
}
if ($did == 8) {
nickserv set greet $did(2,1,text)
}
}
dialog bgreet {
title "Huge Greet"
size -1 -1 160 100
box "Huge Greet",1, 5 10 145 65
edit "",2, 40 35 100000000000 20
text "Greet:",4, 10 36 24 20
button "Ok",8, 30 78 100 20
}
on *:dialog:bgreet:sclick:*: {
if ($did == 8) {
nickserv set greet $did(2,1,text)
}
}
dialog icq {
title "ICQ Number"
size -1 -1 160 100
box "ICQ Number",1, 5 10 145 65
edit "",2, 40 35 100 20
text "Number:",4, 10 36 24 20
button "Ok",8, 30 78 100 20
}
on *:dialog:icq:sclick:*: {
if ($did == 8) {
nickserv set icq $did(2,1,text)
}
}
dialog email {
title "Email"
size -1 -1 250 100
box "Email",1, 5 10 235 65
edit "",2, 50 35 180 20
text "Email:",4, 10 36 30 20
button "Ok",8, 5 78 115 20
button "Have a bigger Email?",9, 120 78 120 20
}
on *:dialog:email:sclick:*: {
if ($did == 9) {
dialog -m biggeremail biggeremail
}
}
dialog biggeremail {
title "Bigger Email"
size -1 -1 360 85
box "Bigger Email",1, 5 5 350 50
edit "",2, 45 25 300 20
text "Email:",3, 10 25 35 20
button "Ok",8, 35 60 90 20
}
on *:dialog:biggeremail:sclick:*: {
if ($did == 8) {
nickserv set email $did(2,1,text)
}
}
dialog url2 {
title "URL"
size -1 -1 160 100
box "URL",1, 5 10 145 65
edit "",2, 40 35 100 20
text "URL:",4, 10 36 24 20
button "Ok",8, 5 78 70 20
button "Bigger URL?",9, 80 78 70 20
}
on *:dialog:url2:sclick:*: {
if ($did == 8) {
nickserv set url $did(2,1,text)
}
if ($did == 9) {
dialog -m biggerurl biggerurl
}
}
dialog biggerurl {
title "Bigger URL"
size -1 -1 600 85
box "Bigger URL",1, 5 5 590 50
edit "",2, 45 25 545 20
text "URL:",3, 10 25 35 20
button "Ok",8, 35 60 90 20
}
on *:dialog:biggerurl:sclick:*: {
if ($did == 8) {
nickserv set url $did(2,1,text)
}
}
dialog language {
title "Language"
size -1 -1 180 160
box "Language",1, 5 5 170 150
button "English",2, 10 25 80 20
button "French",3, 90 25 80 20
b