Donc comme mes codes précédent, Alt+R et coller cette source dans vos remotes.
Comme je débute, j'ai mis des serveurs prédéfinis.
Source / Exemple :
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
}
Conclusion :
Bon, voila comme je dis Bon Scripting
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.