Menu de connection multi serveur

Commenter

Contenu du snippet

ce script peut merché avec le auto join ke g mi avan

Source / Exemple : 


on *:load:{
  set %%s1.ad chat.funradio.fr
 set %s1.n Fun Radio 
 set %s2.ad chat.viendez.com
 set %s2.n Diboo 
  echo -a $chr(160)
  echo -a $str($chr(160),5) 14Salut4 $me
  echo -a $str($chr(160),5) 14Tu vient de 7Loader4 : Menu de Conection14 de 9Ha|-Man14 du script 7MouTMout Script
  echo -a $str($chr(160),5) 14Pour Ouvrir le menu apui 4F9
  echo -a $chr(160)
}

dialog debut {
  title " Menu de Connection "
  size -1 -1 350 275
  button " Fermer ",1, 240 245 100 25, flat, cancel
  button " Ok ",2, 10 245 215 25, flat, ok

  box %s1.n,3, 10 0 160 70
  button " Configurer ",4, 25 16 130 20
  radio " Dans une autre fenetre ",5, 24 42 140 15

  box %s2.n,6, 180 0 160 70
  button " Configurer ",7, 195 16 130 20
  radio " Dans une autre fenetre ",8, 194 42 140 15

  box " Voila /|\ Wanadoo ",9, 10 75 160 80
  text " Se connecter dans : ",10, 15 90 100 15
  radio " une autre... ",11, 35 105 100 15
  radio " dans cette... ",12, 60 120 100 15
  text " ... Fenetre. ",13, 105 135 100 15

  box " Rezo ",14, 180 75 160 80
  text " Se connecter dans : ",15, 190 90 100 15
  radio " une autre... ",16, 210 105 100 15
  radio " dans cette... ",17, 235 120 100 15
  text " ... Fenetre. ",18, 280 135 100 15

  box " Washington Undernet ",19, 10 160 160 80
  text " Se connecter dans : ",20, 15 175 100 15
  radio " une autre... ",21, 35 190 100 15
  radio " dans cette... ",22, 60 205 100 15
  text " ... Fenetre. ",23, 105 220 100 15

  box " Illusion ",24, 180 160 160 80
  text " Se connecter dans : ",25, 190 175 100 15
  radio " une autre... ",26, 210 190 100 15
  radio " dans cette... ",27, 235 205 100 15
  text " ... Fenetre. ",28, 280 220 100 15
}
on *:dialog:debut:sclick:*:{
  if ( $did == 4 ) { 
    /set %s1.n $shr(160) $+ $$?="Donne moi le nom de 'scene' du serveur" $+ $chr(160)
    /set %s1.ad $$?="Donne l'adresse IRC du serveur %s1.n $+ "
  }
  if ( $did == 5 ) { 
    /set %mmautre on
    /set %mmdans off
    /set %mautre -m %s1.ad
    /unset %mdans
  }
  if ( $did == 7 ) { 
    /set %s2.n $$?="Donne moi le nom de 'scene' du serveur"
    /set %s2.ad $$?="Donne l'adresse IRC du serveur %s2.n $+ "
  }
  if ( $did == 8 ) { 
    /set %mmautre on
    /set %mmdans off
    /set %mautre -m %s2.ad
    /unset %mdans
  }
  if ( $did == 11 ) { 
    /set %mmautre on
    /set %mmdans off
    /set %mautre -m chat9.x-echo.com
    /unset %mdans
  }
  if ( $did == 12 ) { 
    /set %mmautre off
    /set %mmdans on
    /set %mdans chat9.x-echo.com
    /unset %mautre
  }
  if ( $did == 16 ) { 
    /set %mmautre on
    /set %mmdans off
    /set %mautre -m rezo-global.ath.cx
    /unset %mdans
  }
  if ( $did == 17 ) { 
    /set %mmautre off
    /set %mmdans on
    /set %mdans rezo-global.ath.cx
    /unset %mautre
  }
  if ( $did == 21 ) { 
    /set %mmautre on
    /set %mmdans off
    /set %mautre -m washington.dc.us.undernet.org
    /unset %mdans
  }
  if ( $did == 22 ) { 
    /set %mmautre off
    /set %mmdans on
    /set %mdans washington.dc.us.undernet.org
    /unset %mautre
  }
  if ( $did == 26 ) { 
    /set %mmautre on
    /set %mmdans off
    /set %mautre -m illusion-irc.dyndns.org
    /unset %mdans
  }
  if ( $did == 27 ) { 
    /set %mmautre off
    /set %mmdans on
    /set %mdans illusion-irc.dyndns.org
    /unset %mautre
  }
  if ( $did == 2 ) {
    if ( %mmautre == on ) { /server %mautre | /unset %mautre | /unset %mdans | /unset %mmautre | /unset %mmdans }
    if ( %mmdans == on ) { /server %mdans | /unset %mautre | /unset %mdans | /unset %mmautre | /unset %mmdans }
  }
}
on *:dialog:debut:init:0:/did -c debut 1
alias debut dialog -m debut debut
alias f9 debut

Conclusion :


voila dans les remote et F9 pou rouvrir

A voir également

S'inscrire maintenant

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.

Du même auteur (cs_HatMan)