alias ventana dialog -dm ventana ventana

alias ventana dialog -dm ventana ventana

dialog ventana {
title "Ayuda Usuarios.Rev.1.0 - * - * - * http://elminero.com * - * - * - * -"
size -1 -1 408 300
button "Cerrar", 99,185 250 80 20, cancel hide

button "Comprobar Nick", 100,100 16 90 20
box "Info Nick:", 1,2 2 195 42
edit "", 2,8 16 90 20,return edit autohs

button "Ignorar", 101,100 56 90 20
box "Nick:", 3,2 42 195 42
edit "", 4,8 56 90 20,return edit autohs

button "Env.MeMo", 102,219 72 70 20
box "Nick:", 5,206 2 95 40
edit "", 6,213 16 80 20
box "Texto:", 7,206 34 95 62
edit "", 8,213 48 80 20,return edit autohs

box "", 20,310 2 95 94

button "Ocultar Mask", 104,320 20 75 20

button "Kill 60 seg.", 107,320 42 75 20

button "Kill 20 seg.", 108,320 64 75 20

button "Soltar Nick", 105,12 196 80 20
box "Nick Colgado:", 12,2 122 96 46
edit "", 13,8 136 84 20,return edit autohs
box "Passw.", 14,2 160 96 60
edit "", 15,8 174 84 20,return edit autohs

button "Info-Status", 106,308 125 90 20
box "Info Canal:", 16,206 110 200 42
edit "", 17,214 125 90 20,return edit autohs

button "Buscar", 113,100 96 90 20
box "Nick..?", 119,2 82 195 42
edit "", 33,8 96 90 20,return edit autohs

button "Recuperar", 109, 111 196 75 20
box "Nick", 21,100 122 97 46
edit "", 22,106 136 84 20
box "Passw.", 23,100 160 97 60
edit "", 24,106 174 84 20,return edit autohs

button "Ban", 110,280 197 50 20
box "Canal Nick", 25,206 157 200 63
edit "", 26,215 174 85 20,return edit autohs
edit "", 28,310 174 85 20,return edit autohs

box "Cambio Servers", 27,2 220 310 75
button "Coruscant", 114,14 240 80 20
button "Atreides", 115,118 240 80 20
button "Caronte", 116,220 240 80 20
button "Libre", 117,14 264 80 20
button "Dune", 118,118 264 80 20
button "Eclipse", 121,220 264 80 20

button "Borrar", 111,340 240 40 40

icon 120,324 222 80 75

}
on 1:dialog:ventana:*:*:{
if ($devent == sclick) {
if ($did == 100) {
if (($did(ventana,2))) { msg nick info $did(ventana,2) | dialog -i ventana }
}
if ($did == 101) {
if (($did(ventana,4))) { ignore $did(ventana,4) | dialog -i ventana }
}
if ($did == 102) {
if (($did(ventana,6)) && ($did(ventana,8))) { msg memo send $did(ventana,6) $did(ventana,8) | dialog -i ventana }
}
if ($did == 104) {
if (($did(ventana,104))) { msg nick set hide usermask on | dialog -i ventana }
}
if ($did == 105) {
if (($did(ventana,13)) && ($did(ventana,15))) { msg nick ghost $did(ventana,13) $did(ventana,15) | dialog -i ventana }
}
if ($did == 106) {
if (($did(ventana,17))) { msg chan info $chr(35) $+ $did(ventana,17) | msg chan status $chr(35) $+ $did(ventana,17) | dialog -i ventana }
}
if ($did == 107) {
if (($did(ventana,107))) { msg nick set kill on | dialog -i ventana }
}
if ($did == 108) {
if (($did(ventana,108))) { msg nick set kill quick | dialog -i ventana }
}
if ($did == 109) {
if (($did(ventana,22)) && ($did(ventana,24))) { msg nick recover $did(ventana,22) $did(ventana,24) | dialog -i ventana }
}
if ($did == 110) {
if (($did(ventana,26)) && ($did(ventana,28))) { mode $did(ventana,26) +b $did(ventana,28) | dialog -i ventana }
}
if ($did == 112) {
if (($did(ventana,32))) { dns $did(ventana,32)) | dialog -i ventana }
}
if ($did == 113) {
if (($did(ventana,33))) { uwho $did(ventana,33)) | dialog -i ventana }
}
if ($did == 114) {
if (($did(ventana,114))) { server coruscant.irc-hispano.org 6667 | dialog -i ventana }
}
if ($did == 115) {
if (($did(ventana,115))) { server atreides.irc-hispano.org 6667 | dialog -i ventana }
}
if ($did == 116) {
if (($did(ventana,116))) { server caronte.irc-hispano.org 6667 | dialog -i ventana }
}
if ($did == 117) {
if (($did(ventana,117))) { server libres.irc-hispano.org 6667 | dialog -i ventana }
}
if ($did == 118) {
if (($did(ventana,118))) { server dune.irc-hispano.org 6667 | dialog -i ventana }
}
if ($did == 121) {
if (($did(ventana,121))) { server eclipse.irc-hispano.org 6667 | dialog -i ventana }
}
if ($did == 111) {
{ did -r ventana 2,4,6,8,13,15,17,22,24,26,28,33,114,115,116,117,118,121 | dialog -i ventana }
}
}
}