- on 1:start: {
- /dialog -m start start
- }
-
- dialog start {
- title "« Menu Start »"
- icon Icônes\Start.ico
- size 177 106 393 210
- text "Pseudo principal", 1, 44 15 60 26
- edit "", 2, 25 44 80 20
- text "Pseudo alternatif", 3, 140 15 60 26
- edit "", 4, 120 44 80 20
- button "Auto-join", 5, 290 19 80 20
- button "Auto-ident", 6, 290 49 80 20
- box "Auto", 7, 280 2 100 80
- box "Pseudos", 8, 1 2 230 80
- box "Serveurs", 9, 1 100 250 80
- radio "EpiKnet", 10, 10 115 90 20
- radio "ZaiBaTsU", 11, 150 115 90 20
- radio "Voila/Wanadoo", 12, 10 150 95 20
- radio "Thunderdoom", 16, 150 150 85 20
- button "Connection", 13, 150 185 80 20
- button "Enregistrer son pseudo", 14, 260 120 120 20
- button "Ok", 15, 285 150 80 20, ok default
- }
- on *:dialog:start:init:0:{
- /did -o start 2 1 $me
- /did -o start 4 1 $anick
- if ( %anc.server == 1 ) { /did -c start 10 }
- if ( %anc.server == 2 ) { /did -c start 11 }
- if ( %anc.server == 3 ) { /did -c start 12 }
- }
- on *:dialog:start:sclick:5:{ /autojoin | /dialog -r start }
- on *:dialog:start:sclick:6:{ /autoident | /dialog -r start }
- on *:dialog:start:sclick:14:{ /help | /dialog -r start }
- on *:dialog:start:sclick:13:{
- if ( $did(2) != $null ) { /nick $did(2) }
- if ( $did(4) != $null ) { /anick $did(4) }
- if ( $did(10).state == 1 ) { Set %anc.server 1 | /server irc.epiknet.org }
- if ( $did(11).state == 1 ) { Set %anc.server 2 | /server irc.zaibatsu-clan.net }
- if ( $did(12).state == 1 ) { Set %anc.server 3 | /server irc.voila.fr }
- if ( $did(16).state == 1 ) { Set %anc.server 4 | /server irc.thunderdoom.net }
- /dialog -x start
- }
on 1:start: {
/dialog -m start start
}
dialog start {
title "« Menu Start »"
icon Icônes\Start.ico
size 177 106 393 210
text "Pseudo principal", 1, 44 15 60 26
edit "", 2, 25 44 80 20
text "Pseudo alternatif", 3, 140 15 60 26
edit "", 4, 120 44 80 20
button "Auto-join", 5, 290 19 80 20
button "Auto-ident", 6, 290 49 80 20
box "Auto", 7, 280 2 100 80
box "Pseudos", 8, 1 2 230 80
box "Serveurs", 9, 1 100 250 80
radio "EpiKnet", 10, 10 115 90 20
radio "ZaiBaTsU", 11, 150 115 90 20
radio "Voila/Wanadoo", 12, 10 150 95 20
radio "Thunderdoom", 16, 150 150 85 20
button "Connection", 13, 150 185 80 20
button "Enregistrer son pseudo", 14, 260 120 120 20
button "Ok", 15, 285 150 80 20, ok default
}
on *:dialog:start:init:0:{
/did -o start 2 1 $me
/did -o start 4 1 $anick
if ( %anc.server == 1 ) { /did -c start 10 }
if ( %anc.server == 2 ) { /did -c start 11 }
if ( %anc.server == 3 ) { /did -c start 12 }
}
on *:dialog:start:sclick:5:{ /autojoin | /dialog -r start }
on *:dialog:start:sclick:6:{ /autoident | /dialog -r start }
on *:dialog:start:sclick:14:{ /help | /dialog -r start }
on *:dialog:start:sclick:13:{
if ( $did(2) != $null ) { /nick $did(2) }
if ( $did(4) != $null ) { /anick $did(4) }
if ( $did(10).state == 1 ) { Set %anc.server 1 | /server irc.epiknet.org }
if ( $did(11).state == 1 ) { Set %anc.server 2 | /server irc.zaibatsu-clan.net }
if ( $did(12).state == 1 ) { Set %anc.server 3 | /server irc.voila.fr }
if ( $did(16).state == 1 ) { Set %anc.server 4 | /server irc.thunderdoom.net }
/dialog -x start
}