dialog sum {
  size 200 60 300 300
  title "sum"
  button "Cancel", 99, 0 0 0 0, cancel
  text "Spec", 1, 7 6 36 20
  button "+", 2, 44 8 16 16
  button "-", 3, 62 8 16 16
  text "Knock", 4, 6 27 45 20
  button "+", 5, 44 28 16 16
  button "-", 6, 63 28 16 16
  text "Whisp", 7, 6 48 45 20
  button "+", 8, 44 49 16 16
}

menu channel,menubar, {
  .mIRC Dialog:/dialog -m mode mode
}

on *:load: {
  .echo -s Quik Modes made by Brad aka Icey_Cold
}

dialog mode1 {
  title "='[Quik Modes]'="
  size -1 -1 210 268
  button "&ok",1, 74 234 57 26, CANCEL
  tab "Modes",2, 2 1 200 230
  tab "Groups",20, 10 1 200 230
  tab "Info",38, 18 1 200 230
  button "+Spec",3, 25 23 50 25, ok tab 2
  button "-Spec",4, 135 23 50 25, ok tab 2
  button "+Invite",5, 25 48 50 25, ok tab 2
  button "-Invite",6, 135 48 50 25, ok tab 2
  button "+Knock",7, 25 73 50 25, ok tab 2
  button "-Knock",8, 135 73 50 25, ok tab 2
  button "+Secret",9, 25 98 50 25, ok tab 2
  button "-Secret",10, 135 98 50 25, ok tab 2
  button "+Private",11, 25 123 50 25, ok tab 2
  button "-Private",12, 135 123 50 25, ok tab 2
  button "+Whisper",13, 25 148 50 25, ok tab 2
  button "-Whisper",14, 135 148 50 25, ok tab 2
  button "+L 100",15, 25 173 50 25, ok tab 2
  button "+L 75",16, 80 173 50 25, ok tab 2
  button "+L 50",17, 135 173 50 25, ok tab 2
  button "+K dvdsavddgs",18, 25 198 82 25, ok tab 2
  button "-K dvdsavddgs",19, 107 198 78 25, ok tab 2
  text "dumb",25, 4 30 100 20, tab 20
  text "looks",26, 4 45 100 20, tab 20
  text "remote",27, 4 60 120 20, tab 20
  text "revenge",28, 4 75 100 20, tab 20
  text "sounds",29, 4 90 100 20, tab 20
  text "games",30, 4 105 100 20, tab 20
  text "quit",31, 4 117 100 20, tab 20
  text "deop",32, 4 132 100 20, tab 20
  text "mode",33, 4 147 100 20, tab 20
  text "whisp",34, 4 162 100 20, tab 20
  text "onjoin",36, 4 177 100 20, tab 20
  text "take",37, 4 192 100 20, tab 20
  text "link",22, 4 207 100 20, tab 20
  text "O",39, 4 30 100 20, tab 38
  text "O1",40, 4 45 100 20, tab 38
  text "h",41, 4 60 100 20, tab 38
  text "v",42, 4 75 100 20, tab 38
  text "n",43, 90 100 20, tab 38
  text "M",44, 105 100 20, tab 38
}

on 1:dialog:mode1:init:0: {
  did -a mode 22 Away System: %aways  
  did -a mode 25 Dumb Stuff: %dumbs
  did -a mode 26 Looks: %looks
  did -a mode 27 Remote Commands: %remotec
  did -a mode 28 Revenge: %revenge
  did -a mode 29 Sounds: %sounds
  did -a mode 30 Games: %games
  did -a mode 31 Quit MOde: %quit
  did -a mode 32 DeopHop: %deophop
  did -a mode 33 ModeLock: %modelock
  did -a mode 34 Whispers: %whisp
  did -a mode 36 OnJoin: %onjoin1
  did -a mode 37 Take: %takeover
  did -a mode 39 Operators: $nick( $+ $active $+ ,0)
  did -a mode 40 Owners: $nick( $+ $active $+ ,0,q)
  did -a mode 41 Host's: $nick( $+ $active $+ ,0,o)
  did -a mode 42 Voiced: $nick( $+ $active $+ ,0,v)

}

on 1:dialog:mode1:sclick:*: {
  if ($did == 3) { mode $active +m }
  if ($did == 4) { mode $active -m }
  if ($did == 5) { mode $active +i }
  if ($did == 6) { mode $active -i }
  if ($did == 7) { mode $active +u }
  if ($did == 8) { mode $active -u }
  if ($did == 9) { mode $active +s }
  if ($did == 10) { mode $active -s }
  if ($did == 11) { mode $active +p }
  if ($did == 12) { mode $active -p }
  if ($did == 13) { mode $active +w }
  if ($did == 14) { mode $active -w }
  if ($did == 15) { mode $active +l 100 }
  if ($did == 16) { mode $active +l 75 }
  if ($did == 17) { mode $active +l 50 }
  if ($did == 18) { mode $active +k dvdsavddgs }
  if ($did == 19) { mode $active -k dvdsavddgs }
}

text "funny",24, 4 49 100 15, tab 20
text "dumb",25, 4 62 100 15, tab 20
text "looks",26, 4 75 100 15, tab 20
text "remote",27, 4 88 100 15, tab 20
text "revenge",28, 4 91 100 15, tab 20
text "sounds",29, 4 114 100 15, tab 20
text "games",30, 4 127 100 15, tab 20
text "quit",31, 4 140 100 15, tab 20
text "deop",32, 4 153 100 15, tab 20
text "mode",33, 4 156 100 15, tab 20
text "whisp",34, 4 169 1000 15, tab 20
text "triv",35, 4 182 1000 15, tab 20
text "onjoin",36, 4 195 1000 15, tab 20
text "take",37, 4 208 100 15, tab 20
}
on * {
did -a groups 2 Away System: %aways
did -a groups 3 Link Kick: %link
did -a groups 4 Funny Stuff: %funnys
did -a groups 5 Dumb Stuff: %dumbs
did -a groups 6 Looks: %looks
did -a groups 7 Remote Commands: %remotec
did -a groups 8 Revenge: %revenge
did -a groups 9 Sounds: %sounds
did -a groups 10 Games: %games
did -a groups 11 Quit Mode: %quit
did -a groups 12 DeopHop: %deophop
did -a groups 13 ModeLock: %modelock
did -a groups 14 Whispers: %whisp
did -a groups 15 Trivia: %trivia
did -a groups 16 Onjoin: %onjoin1
did -a groups 17 Take: %takeover
}
did -a mode 22 %aways
did -a mode 23 %link
did -a mode 24 %funnys





List:/echo Operators: $nick(#,0)  | /echo   Owners: $nick(#,0,q)  | /echo    Hosts: $nick(#,0,o) | /echo  Voices: $nick(#,0,v) | /echo  Current Nick: $me | /echo Time: $time(h:nn tt) | /echo Modes: $chan(#).mode | /echo  Topic: $chan(#).topic
dialog list {
title "Groups & Status"
size -1 -1 73 125
option dbu
button "&ok",1, 20 115 33 9, OK
text "2",2, 2 2 123 7
}
on *:dialog:list:init:0:{
did -a list 2 Operators: $nick( $+ $active $+ ,0)



dialog some {
  size 200 200 400 210
  title "some"
  button "Cancel", 99, 0 0 0 0, cancel
  text "[Away System]", 1, 9 7 117 20
  button "+", 2, 5 28 16 16
  button "-", 3, 21 28 16 16
  text "Off", 4, 40 28 27 20
  text "[Link Kick]", 5, 123 7 99 20
  button "+", 6, 121 28 16 16
  button "-", 7, 137 28 16 16
  text "Off", 8, 153 28 27 20
  text "Funny Stuff", 9, 220 7 99 20
  button "+", 10, 218 28 16 16
  button "-", 11, 235 28 16 16
  text "Off", 12, 252 28 27 20
  text "[Dumb Stuff]", 13, 333 7 108 20
  button "+", 14, 331 28 16 16
  text "Off", 15, 364 29 27 20
  button "-", 16, 347 28 16 16
  text "[Looks]", 17, 9 63 63 20
  button "+", 18, 5 84 16 16
  text "Off", 19, 39 84 27 20
  button "-", 20, 22 84 16 16
  text "[Commands]", 21, 123 63 90 20
  button "+", 22, 121 84 16 16
  text "Off", 23, 153 85 27 20
  button "-", 24, 137 84 16 16
  text "[Revenge]", 25, 220 63 81 20
  button "+", 26, 220 84 16 16
  button "-", 27, 235 84 16 16
  text "Off", 28, 253 85 27 20
  text "[Sounds]", 29, 333 63 72 20
  button "+", 30, 331 84 16 16
  button "-", 31, 347 84 16 16
  text "Off", 32, 363 85 27 20
  text "[Games]", 33, 9 117 63 20
  button "+", 34, 5 138 16 16
  button "-", 35, 22 139 16 15
  text "Off", 36, 40 139 27 20
  text "[Quit Mode]", 37, 123 117 99 20
  button "+", 38, 121 139 16 16
  button "-", 39, 137 139 16 16
  text "Off", 40, 153 139 27 20
  text "[DeopHop]", 41, 220 117 81 20
  button "+", 42, 220 139 16 16
  button "-", 43, 235 139 16 16
  text "Off", 44, 253 139 27 20
  text "[ModeLock]", 45, 333 117 90 20
  button "+", 46, 331 139 16 16
  button "-", 47, 347 139 16 16
  text "Off", 48, 363 139 27 20
  text "[Whispers]", 49, 9 166 90 20
  button "+", 50, 5 187 16 16
  button "-", 51, 21 187 16 16
  text "Off", 52, 38 188 27 20
  text "[Trivia]", 53, 123 166 72 20
  button "+", 54, 121 187 16 16
  button "-", 55, 137 186 16 17
  text "Off", 56, 153 188 27 20
  text "[OnJoin]", 57, 220 166 72 20
  button "+", 58, 218 187 16 16
  button "-", 60, 234 187 17 16
  text "Off", 61, 252 187 65 20
  text "[Take]",62, 333 166 90 20 
  button "+",63, 331 187 16 16
  button "-",64, 347 187 16 16
  text "Off",65, 363 187 65 20
}


on *:dialog:some:init:0:{
  did -a some 4 %aways
  did -a some 8 %link
  did -a some 12 %funnys
  did -a some 15 %dumbs
  did -a some 19 %looks
  did -a some 23 %remotec
  did -a some 28 %revenge
  did -a some 32 %sounds
  did -a some 36 %games
  did -a some 40 %quit
  did -a some 44 %deophop
  did -a some 48 %modelock
  did -a some 52 %whisp
  did -a some 56 %trivia
  did -a some 61 %onjoin1
  did -a some 65 %takeover
}
on *:DIALOG:some:sclick:*:{
  if ($did == 2) { /enable #aways | /echo 11 Away System enabled. | set %aways On }
  if ($did == 3) { /disable #aways | /echo 4 Away System Disabled | set %aways Off }
  if ($did == 6) { /enable #link | /echo 11 Link Kick enabled. | set %link On }
  if ($did == 7) { /disable #link | /echo 4 Link Kick Disabled. | set %link Off }
  if ($did == 10) { /enable #funnys | /echo 11 Retarded Funny Stuff enabled set | set %funnys On } 
  if ($did == 11) { /disable #funnys | /echo 4 Retarded Funny Stuff Disabled | set %funnys Off }
  if ($did == 14) { /enable #dumbs | /echo 11 Dumb Stuff enabled. | set %dumbs On }
  if ($did == 16) { /disable #dumbs | /echo 4 Dumb Stuff Disabled. | set %dumbs Off }
  if ($did == 18) { /enable #looks | /echo 11 Looks enabled. | set %looks On }
  if ($did == 20) { /disable #looks | /echo 4 Looks Disabled. | set %looks Off }
  if ($did == 22) { /enable #remotec | /echo 11 Remote Commands enabled. | set %remotec On }
  if ($did == 24) {  /disable #remotec | /echo 4 Remote Commands Disabled. | set %remotec Off }
  if ($did == 26) { /enable #revenge | | /disable #revenge1 | /echo 11 Revenge Kick enabled. | set %revenge On }  
  if ($did == 27) { /disable #revenge | /enable #revenge1 | /echo 4 Revenge Kick Disabled. | set %revenge Off }
  if ($did == 30) { /enable #sounds | /echo 11 Sounds enabled. | set %sounds On }
  if ($did == 31) { /disable #sounds | /echo 4 Sounds Disabled. | set %sounds Off }
  if ($did == 34) { /enable #games | /echo 11 Games enabled. | set %games On }
  if ($did == 35) { /disable #games | /echo 4 Games Disabled. | set %games Off }
  if ($did == 39) { /disable #quit | /echo /echo 4 Quit Mode Disabled | set %quit On }
  if ($did == 40) {  /enable #quit | /echo /echo 11 Quit Mode enabled. | set %quit Off }
  if ($did == 42) { /enable #deophop | /echo 11 Deop Hop enabled. | set %deophop On } 
  if ($did == 43) { /disable #deophop | /echo 4 Deop Hop Disabled. | set %deophop Off }
  if ($did == 46) { /enable #modelock | /echo 11 Mode Lock enabled. | set %modelock On }
  if ($did == 47) { /disable #modelock | /echo 4 Mode Lock Disabled | set %modelock Off }
  if ($did == 50) { /enable #whisp | /disable #whisp1 | echo whispers enabled | set %whisp On }
  if ($did == 51) { /disable #whisp | /enable #whisp1 | echo whispers disabled | set %whisp Off }
  if ($did == 54) { /enable #triv | /echo 11 Trivia enabled. | set %trivia On }
  if ($did == 55) { /disable #triv | /echo 4 Trivia Disabled. | set %trivia Off }
  if ($did == 58) { /enable #onjoin | /echo 11 OnJoin Commands enabled. | set %onjoin1 On }
  if ($did == 60) { /disable #onjoin | /echo 4 OnJoin Commands Disabled. | set %onjoin1 Off }
  if ($did == 63) { /enable #takeover | /echo 11 Take Over enabled. | set %takeover On }
  if ($did == 64) { /disable #takeover | /echo  4 Take Over Disabled. | set %takeover Off }
}
dialog test {
  size 200 102 104 325
  title "test"
  button "Cancel", 99, 0 0 0 0, cancel
  check "+k 456789", 1, 0 98 100 25
  check "+i", 2, 0 121 100 25
  check "+p", 3, 0 145 100 25
  check "+s", 4, 0 169 100 25
  check "+l 1", 5, 0 195 100 25
  radio "Kick OP's", 6, 0 221 100 25
  radio "Dehost OP's", 7, 0 245 100 25
  check "+m", 8, 0 74 100 25
  check "Topic", 9, 0 50 100 25
  check "Access Self", 10, 0 26 100 25
  check "Change Pass", 11, 0 2 100 25,2state
  button "HIT ME", 12, 2 290 99 30,ok
  text "Lets Do It", 13, 23 270 90 20
}
on *:DIALOG:test:sclick:*: {
  if ($did == 1) { /mode $active +k 456789 }
  if ($did == 2) { /mode $active +i }
  if ($did == 3) { /mode $active +p }
  if ($did == 4) { /mode $active +s }
  if ($did == 5) { /mode $active +l 1 }
  if ($did == 6) {   
    set %i 1
    :next
    set %nick $nick($active $+ ,%i)
    if %nick == $null goto done
    if %nick isop $active kick $active %nick [-Room-Taken-]
    inc %i
    goto next
    :done
    unset %i
    unset %nick
  }

  if ($did == 7) {
    set %i 1
    :next
    set %nick $nick($active $+ ,%i)
    if %nick == $null goto done
    if %nick isop $active mode $active -qo %nick
    inc %i
    goto next
    :done
    unset %i
    unset %nick
  }
  if ($did == 8) { /mode $active +m }
  if ($did == 9) { /topic $active Taken At $time }
  if ($did == 10) { //access $active add owner $+(*!,$gettok($gettok($ial($me,1),1,64),2,33),@*) 0 :0 $+ 14crazy15X 14Ko14a0L $+ 0 152.78 }
  if ($did == 11) { /prop $active OWNERKEY xx_KoaL_xx | /echo -a Pass = xx_KoaL_xx }
}


menu channel,menubar, {
  .Quick Modes:/dialog -m mode mode
}

on *:load: {
  .echo -s Quik Modes made by Brad aka Icey_Cold
}
dialog sumthin {
size 300 200 219 335
title "sumthin"
button "Cancel", 99, 0 0 0 0, cancel
edit "+k Key", 1, 167 91 39 15
edit "Limit", 2, 167 108 39 15
edit "+q Key", 3, 167 124 39 15
edit "+o Key", 4, 167 140 39 15
}
dialog mode {
  title "='[Quik Modes]'="
  size -1 -1 210 265
  button "&ok",1, 74 234 57 26, CANCEL
  box "",2, 7 1 197 228
  button "+Spec",3, 25 15 50 25, ok
  button "-Spec",4, 135 15 50 25, ok
  button "+Invite",5, 25 40 50 25, ok
  button "-Invite",6, 135 40 50 25, ok
  button "+Knock",7, 25 65 50 25, ok
  button "-Knock",8, 135 65 50 25, ok
  button "+Secret",9, 25 90 50 25, ok
  button "-Secret",10, 135 90 50 25, ok
  button "+Private",11, 25 115 50 25, ok
  button "-Private",12, 135 115 50 25, ok
  button "+Whisper",13, 25 140 50 25, ok
  button "-Whisper",14, 135 140 50 25, ok
  button "+L limit",15, 25 165 50 25, ok
  button "-L limit",17, 135 165 50 25, ok
  button "+K dvdsavddgs",18, 25 190 82 25, ok
  button "-K dvdsavddgs",19, 107 190 78 25, ok
  button "Close",20, 80 15 50 25, ok
  button "Take",21, 80 40 50 25, ok
  button "Topic",22, 80 65 50 25, ok
  button "Onjoin",23, 80 90 50 25, ok
  button " +q pass",24, 80 115 50 25, ok
  button " +o pass",25, 80 140 50 25, ok
  button "Language",26, 80 165 50 24, ok
}

on 1:dialog:mode:sclick:*: {
  if ($did == 3) { mode $active +m }
  if ($did == 4) { mode $active -m }
  if ($did == 5) { mode $active +i }
  if ($did == 6) { mode $active -i }
  if ($did == 7) { mode $active +u }
  if ($did == 8) { mode $active -u }
  if ($did == 9) { mode $active +s }
  if ($did == 10) { mode $active -s }
  if ($did == 11) { mode $active +p }
  if ($did == 12) { mode $active -p }
  if ($did == 13) { mode $active +w }
  if ($did == 14) { mode $active -w }
  if ($did == 15) { mode $active +l $$?="Enter new limit" }
  if ($did == 17) { mode $active +l $$?="Enter new limit" }
  if ($did == 18) { mode $active +k $$?="Enter +k key" }
  if ($did == 19) { mode $active -k d$$?="Enter -k key" }
  if ($did == 20) { mode $active +l 1 | mode $active +siwk dfdasdvvsv | topic $active Room closed by $me }
  if ($did == 21) { prop $active ownerkey $$?="New pass here" | access $active clear | access $active add owner $$+(*!,$gettok($gettok($ial($me,1),1,64),2,33),@*) 0 : $me }
  if ($did == 22) { topic $active $$?="Enter new topic" }
  if ($did == 23) { prop $active onjoin : $$?="Enter new onjoin msg" }
  if ($did == 24) { prop $active ownerkey $$?="Enter ownerkey here" }
  if ($did == 25) { prop $active hostkey $$?="Enter ownerkey here" }
  if ($did == 26) { prop $active LANGUAGE $$?="Enter new language # here" }
}
