Accueil > > > AUTO JOIN SALONS ET SERVEURS ( GÈRE LE MULTISERVEUR )
AUTO JOIN SALONS ET SERVEURS ( GÈRE LE MULTISERVEUR )
Information sur la source
Description
Un Auto-join simple et fontionnel sur la base des *.ini . Vous pouvez donc mettre un nombre infini de salon ou serveurs a rejoindre a la connection.L'add on ne gère pas encore la rejonction de salons spécifiques a un serveur.Peut etre pour la version 2.0 ? Utilisez de preference un mIRC vierge afin de tester mon add on, je ne suis pas responsable des degats occasionés sur les scripts :)
Source
- ;=============================
- ; _____ ___ ==
- ; / ___/\ / /\ ==
- ; / /\__\/ / /_/_ ==
- ; / _/\ / _ _\ ==
- ; / /_\/ / / \ \_\ ==
- ; /_____/\ /__/ / \__\ ==
- ; \_____\/ \__\/ \__\ ==
- ;=============================
- ;==== ] eKcH4d0 ScRiPT [ =====
- ;=======] Auto-join [=========
-
-
- ;================================================================== Dialogue de selection du type d'auto-join
-
- on 1:dialog:type:init:0:{
- //echo -a 0[ 7eKcH4d0 ScRiPT0 ]7 Auto-join 0 lancé
- /set %ajs1 $readini(inis/auto-join.ini, serveurs, 1)
- /set %s $ini(inis/auto-join.ini, serveurs, 0)
- /set %ajsmax $ini(inis/auto-join.ini, serveurs,0)
- }
- dialog Type {
- option dbu
- size -1 -1 114 44
- title "Type d'auto-join"
- button "Serveurs",1, 3.5 7 35 15
- button "Salons",2, 39 7 35 15
- button "Options",3, 75 7 35 15
- button "Connection",4, 3.5 24 35 15
- button "Annuler",5, 39 24 35 15,cancel
- button "Valider",6, 75 24 35 15,ok
- }
-
- on 1:dialog:type:sclick:1:{
- /dialog -m ajserveur ajserveur
- /set %ajsmax $ini(inis/auto-join.ini, serveurs, 0)
- /inc %s
- }
- on 1:dialog:type:sclick:2:{
- /dialog -m ajsalons ajsalons
- /set %ajcmax $ini(inis/auto-join.ini, salons, 0)
- /inc %c
- }
-
- on 1:dialog:type:sclick:3:{
- /dialog -m ajoptions ajoptions
- }
- on 1:dialog:type:sclick:4:{
- /server %ajs1
- }
- ;================================================================= Dialogue d'auto-join salons
- dialog ajsalons {
- option dbu
- size -1 -1 90 100
- title "Auto-join salon(s)"
- list 101,5 5 80 80
- button "Ajouter",501,5 82 25 15
- button "Enlever",502,32 82 25 15
- button "Valider",503,60 82 25 15,ok
- }
- on 1:dialog:ajsalons:init:0:{
-
- /set %ajcmax $ini(inis/auto-join.ini, salons, 0)
- /set %ajc 1
- :ajsalons1
- /did -a ajsalons 101 $readini(inis/auto-join.ini, salons, %ajc )
- /inc %ajc 1
- /set %ajcmax $ini(inis/auto-join.ini, salons, 0)
- /set %ajsalons %ajcmax + 1
- if ( %ajc > %ajsalons ) { goto ajsalons2 }
- elseif ( %ajc != %ajsalons ) { goto ajsalons1 }
- :ajsalons2
- }
- on 1:dialog:ajsalons:sclick:502:{
- /remini inis/auto-join.ini salons $did(ajsalons,101).sel
-
- }
- on 1:dialog:ajsalons:sclick:503:{
- /set %ajcmax $ini(inis/auto-join.ini, salons, 0)
- }
- on 1:dialog:ajsalons:sclick:501:{
- /set %c $ini(inis/auto-join.ini, salons, 0)
- /inc %c 1
- /writeini Inis/Auto-join.ini Salons %c $$?="Entrez le nom d'un salon avec le dièse "
-
-
- }
-
- ;================================================================= Dialogue d'auto-join serveurs
- dialog ajserveur {
- option dbu
- size -1 -1 90 100
- title "Auto-join serveur(s)"
- list 100,5 5 80 80
- button "Ajouter",201,5 82 25 15
- button "Enlever",202,32 82 25 15
- button "Valider",203,60 82 25 15,ok
- }
- on 1:dialog:ajserveur:init:0:{
-
- /set %ajsmax $ini(inis/auto-join.ini, serveurs, 0)
- /set %ajs1 $readini(inis/auto-join.ini, serveurs, 1)
- /set %ajs 1
- :ajserveur1
- /did -a ajserveur 100 $readini(inis/auto-join.ini, serveurs, %ajs )
- /inc %ajs 1
- /set %ajsmax $ini(inis/auto-join.ini, serveurs, 0)
- /set %ajserveur %ajsmax + 1
- if ( %ajs > %ajserveur ) { goto ajserveur2 }
- elseif ( %ajs != %ajserveur ) { goto ajserveur1 }
- :ajserveur2
- }
- on 1:dialog:ajserveur:sclick:202:{
- /remini inis/auto-join.ini serveurs $did(ajserveur,100).sel
-
- }
- on 1:dialog:ajserveur:sclick:203:{
- /set %ajsmax $ini(inis/auto-join.ini, serveurs, 0)
- }
- on 1:dialog:ajserveur:sclick:201:{
- /set %s $ini(inis/auto-join.ini, serveurs, 0)
- /inc %s 1
- /writeini Inis/Auto-join.ini Serveurs %s $$?="Entrez l'adresse d'un serveur"
-
-
- }
-
- ;================================================================= Dialogue des options Auto-join
- dialog ajoptions {
- option dbu
- size -1 -1 150 40
- title "Options de l'Auto-join"
- check "Activé",301,65 11 30 10
- check "Activé",302,65 22.5 30 10
- text "Auto-join serveur(s) : ",401, 5 12.5 52 20
- text "Auto-join salon(s) : ",402, 5 24 47 20
- button "Ok",403, 110 12 25 15,ok
- }
-
- ;================================================================= Checks
- on 1:dialog:ajoptions:init:0:{
- if (%ajoptionssc == 1) { did -c ajoptions 301 }
- if (%ajoptionscc == 1) { did -c ajoptions 302 }
- }
-
-
- on 1:dialog:ajoptions:sclick:301:{
- if ($did(ajoptions,301).state == 0) {
- echo -a 0[ 7eKcH4d0 ScRiPT0 ]7 Auto-join 0 serveur(s) désactivé
- set %ajoptionssc 0
- }
- elseif ($did(ajoptions,301).state == 1) {
- echo -a 0[ 7eKcH4d0 ScRiPT0 ]7 Auto-join 0 serveur(s) activé
- set %ajoptionssc 1
-
- }
- }
- on 1:dialog:ajoptions:sclick:302:{
- if ($did(ajoptions,302).state == 0) {
- set %ajoptionscc 0
- echo -a 0[ 7eKcH4d0 ScRiPT0 ]7 Auto-join 0 salon(s) désactivé
-
- }
- elseif ($did(ajoptions,302).state == 1) {
- echo -a 0[ 7eKcH4d0 ScRiPT0 ]7 Auto-join 0 salon(s) activé
- set %ajoptionscc 1
- }
- }
- ;================================================================= Start
- on 1:load:{
- /set %s 0
- /set %ajs 1 }
- menu menubar,menubar {
- -
- eKcH4d0's AdD-OnS:/
- -
- Auto-join V1.0:/dialog -m type type
- }
-
- ;================================================================= Connection
- on 1:connect:{
- /set %ajsmax $ini(inis/auto-join.ini, serveurs,0)
- /set %ajcmax $ini(inis/auto-join.ini, salons,0)
- /set %ajstotal %ajsmax + 1
- /set %ajctotal %ajcmax + 1
- /set %ajs 2
- ;================================================================ Auto-Join Multiserveur
- if ( %ajoptionssc == 0 ) { goto ajc }
- elseif ( %ajoptionssc == 1 ) { goto ajs }
-
- :ajs
- if ( $scid(0) == %ajsmax ) { goto ajc }
- /server -m $readini(inis/auto-join.ini, serveurs, %ajs)
- if ( %ajs == %ajsmax ) { goto ajc }
- elseif ( %ajs < %ajsmax ) { goto inc }
- :inc
- /inc %ajs 1
- /goto ajs
- ;================================================================= Auto-join
-
-
- :ajc
- if ( %ajoptionscc == 0) { goto fin }
- /set %ajc 1
- /join $readini(inis/auto-join.ini, salons, %ajc)
- if ( %ajc == ajcmax ) { goto fin }
- elseif ( %ajc < %ajcmax ) { goto ajc2 }
- :ajc2
- if ( %ajc < 2 ) { goto fin }
- /inc %ajc 1
- /join $readini(inis/auto-join.ini, salons, %ajc)
- /inc %ajc 1
- if ( %ajc == ajcmax ) { goto fin }
- elseif ( %ajc < %ajcmax ) { goto ajc2 }
-
- :fin
- /echo -a 0[ 7 eKcH4d0 ScRiPT 0] 7 Connection établie
- }
;=============================
; _____ ___ ==
; / ___/\ / /\ ==
; / /\__\/ / /_/_ ==
; / _/\ / _ _\ ==
; / /_\/ / / \ \_\ ==
; /_____/\ /__/ / \__\ ==
; \_____\/ \__\/ \__\ ==
;=============================
;==== ] eKcH4d0 ScRiPT [ =====
;=======] Auto-join [=========
;================================================================== Dialogue de selection du type d'auto-join
on 1:dialog:type:init:0:{
//echo -a 0[ 7eKcH4d0 ScRiPT0 ]7 Auto-join 0 lancé
/set %ajs1 $readini(inis/auto-join.ini, serveurs, 1)
/set %s $ini(inis/auto-join.ini, serveurs, 0)
/set %ajsmax $ini(inis/auto-join.ini, serveurs,0)
}
dialog Type {
option dbu
size -1 -1 114 44
title "Type d'auto-join"
button "Serveurs",1, 3.5 7 35 15
button "Salons",2, 39 7 35 15
button "Options",3, 75 7 35 15
button "Connection",4, 3.5 24 35 15
button "Annuler",5, 39 24 35 15,cancel
button "Valider",6, 75 24 35 15,ok
}
on 1:dialog:type:sclick:1:{
/dialog -m ajserveur ajserveur
/set %ajsmax $ini(inis/auto-join.ini, serveurs, 0)
/inc %s
}
on 1:dialog:type:sclick:2:{
/dialog -m ajsalons ajsalons
/set %ajcmax $ini(inis/auto-join.ini, salons, 0)
/inc %c
}
on 1:dialog:type:sclick:3:{
/dialog -m ajoptions ajoptions
}
on 1:dialog:type:sclick:4:{
/server %ajs1
}
;================================================================= Dialogue d'auto-join salons
dialog ajsalons {
option dbu
size -1 -1 90 100
title "Auto-join salon(s)"
list 101,5 5 80 80
button "Ajouter",501,5 82 25 15
button "Enlever",502,32 82 25 15
button "Valider",503,60 82 25 15,ok
}
on 1:dialog:ajsalons:init:0:{
/set %ajcmax $ini(inis/auto-join.ini, salons, 0)
/set %ajc 1
:ajsalons1
/did -a ajsalons 101 $readini(inis/auto-join.ini, salons, %ajc )
/inc %ajc 1
/set %ajcmax $ini(inis/auto-join.ini, salons, 0)
/set %ajsalons %ajcmax + 1
if ( %ajc > %ajsalons ) { goto ajsalons2 }
elseif ( %ajc != %ajsalons ) { goto ajsalons1 }
:ajsalons2
}
on 1:dialog:ajsalons:sclick:502:{
/remini inis/auto-join.ini salons $did(ajsalons,101).sel
}
on 1:dialog:ajsalons:sclick:503:{
/set %ajcmax $ini(inis/auto-join.ini, salons, 0)
}
on 1:dialog:ajsalons:sclick:501:{
/set %c $ini(inis/auto-join.ini, salons, 0)
/inc %c 1
/writeini Inis/Auto-join.ini Salons %c $$?="Entrez le nom d'un salon avec le dièse "
}
;================================================================= Dialogue d'auto-join serveurs
dialog ajserveur {
option dbu
size -1 -1 90 100
title "Auto-join serveur(s)"
list 100,5 5 80 80
button "Ajouter",201,5 82 25 15
button "Enlever",202,32 82 25 15
button "Valider",203,60 82 25 15,ok
}
on 1:dialog:ajserveur:init:0:{
/set %ajsmax $ini(inis/auto-join.ini, serveurs, 0)
/set %ajs1 $readini(inis/auto-join.ini, serveurs, 1)
/set %ajs 1
:ajserveur1
/did -a ajserveur 100 $readini(inis/auto-join.ini, serveurs, %ajs )
/inc %ajs 1
/set %ajsmax $ini(inis/auto-join.ini, serveurs, 0)
/set %ajserveur %ajsmax + 1
if ( %ajs > %ajserveur ) { goto ajserveur2 }
elseif ( %ajs != %ajserveur ) { goto ajserveur1 }
:ajserveur2
}
on 1:dialog:ajserveur:sclick:202:{
/remini inis/auto-join.ini serveurs $did(ajserveur,100).sel
}
on 1:dialog:ajserveur:sclick:203:{
/set %ajsmax $ini(inis/auto-join.ini, serveurs, 0)
}
on 1:dialog:ajserveur:sclick:201:{
/set %s $ini(inis/auto-join.ini, serveurs, 0)
/inc %s 1
/writeini Inis/Auto-join.ini Serveurs %s $$?="Entrez l'adresse d'un serveur"
}
;================================================================= Dialogue des options Auto-join
dialog ajoptions {
option dbu
size -1 -1 150 40
title "Options de l'Auto-join"
check "Activé",301,65 11 30 10
check "Activé",302,65 22.5 30 10
text "Auto-join serveur(s) : ",401, 5 12.5 52 20
text "Auto-join salon(s) : ",402, 5 24 47 20
button "Ok",403, 110 12 25 15,ok
}
;================================================================= Checks
on 1:dialog:ajoptions:init:0:{
if (%ajoptionssc == 1) { did -c ajoptions 301 }
if (%ajoptionscc == 1) { did -c ajoptions 302 }
}
on 1:dialog:ajoptions:sclick:301:{
if ($did(ajoptions,301).state == 0) {
echo -a 0[ 7eKcH4d0 ScRiPT0 ]7 Auto-join 0 serveur(s) désactivé
set %ajoptionssc 0
}
elseif ($did(ajoptions,301).state == 1) {
echo -a 0[ 7eKcH4d0 ScRiPT0 ]7 Auto-join 0 serveur(s) activé
set %ajoptionssc 1
}
}
on 1:dialog:ajoptions:sclick:302:{
if ($did(ajoptions,302).state == 0) {
set %ajoptionscc 0
echo -a 0[ 7eKcH4d0 ScRiPT0 ]7 Auto-join 0 salon(s) désactivé
}
elseif ($did(ajoptions,302).state == 1) {
echo -a 0[ 7eKcH4d0 ScRiPT0 ]7 Auto-join 0 salon(s) activé
set %ajoptionscc 1
}
}
;================================================================= Start
on 1:load:{
/set %s 0
/set %ajs 1 }
menu menubar,menubar {
-
eKcH4d0's AdD-OnS:/
-
Auto-join V1.0:/dialog -m type type
}
;================================================================= Connection
on 1:connect:{
/set %ajsmax $ini(inis/auto-join.ini, serveurs,0)
/set %ajcmax $ini(inis/auto-join.ini, salons,0)
/set %ajstotal %ajsmax + 1
/set %ajctotal %ajcmax + 1
/set %ajs 2
;================================================================ Auto-Join Multiserveur
if ( %ajoptionssc == 0 ) { goto ajc }
elseif ( %ajoptionssc == 1 ) { goto ajs }
:ajs
if ( $scid(0) == %ajsmax ) { goto ajc }
/server -m $readini(inis/auto-join.ini, serveurs, %ajs)
if ( %ajs == %ajsmax ) { goto ajc }
elseif ( %ajs < %ajsmax ) { goto inc }
:inc
/inc %ajs 1
/goto ajs
;================================================================= Auto-join
:ajc
if ( %ajoptionscc == 0) { goto fin }
/set %ajc 1
/join $readini(inis/auto-join.ini, salons, %ajc)
if ( %ajc == ajcmax ) { goto fin }
elseif ( %ajc < %ajcmax ) { goto ajc2 }
:ajc2
if ( %ajc < 2 ) { goto fin }
/inc %ajc 1
/join $readini(inis/auto-join.ini, salons, %ajc)
/inc %ajc 1
if ( %ajc == ajcmax ) { goto fin }
elseif ( %ajc < %ajcmax ) { goto ajc2 }
:fin
/echo -a 0[ 7 eKcH4d0 ScRiPT 0] 7 Connection établie
}
Conclusion
Ne pas 'etonner si lorsqu'on ajoute un salon ou un serveur , son nom ne s'affiche pas dans la liste , il faut appuyer sur valider pour qu'il s'y mette comme un grand :)
Et pis sinon soyez sympatoches c'est ma premiere source , le code est long , les *.ini c'est dépassé , enfin g tout pour plaire :)
Sources de la même categorie
Commentaires et avis
|
Derniers Blogs
UNE JOLIE-HORLOGE ET PAS QU'UN PEU !UNE JOLIE-HORLOGE ET PAS QU'UN PEU ! par neodante
Pour les possesseurs d'iPhone, ça y est Bijin Tokei - qui se traduit littéralement en Français par " Jolie Horloge " - est arrivé et GRATUITEMENT s'il vous plaît ! Après la version Tokyo, Hokkaido, night club, racing, Gal, "pour les mademoiselles'", . voi...
Cliquez pour lire la suite de l'article par neodante TECHDAYS PARIS 2010 : CONNECTEZ VOS DONNéES à SHAREPOINT 2010 AVEC LES BUSINESS CONNECTIVITY SERVICESTECHDAYS PARIS 2010 : CONNECTEZ VOS DONNéES à SHAREPOINT 2010 AVEC LES BUSINESS CONNECTIVITY SERVICES par ROMELARD Fabrice
Animé par: Gaetan Bouveret et Julien Chomarat Business Connectivity Services (BCS) est dans SharePoint 2010 la version 2 de Business Data Catalog (BDC dans SharePoint 2007). Il s'agit de la solution permettant de visualiser des données provenan...
Cliquez pour lire la suite de l'article par ROMELARD Fabrice [DIVERS] SUIVRE VOS SéRIES PRéFéRéS SUR LA TOILE[DIVERS] SUIVRE VOS SéRIES PRéFéRéS SUR LA TOILE par orion
Comme de nombreux geek, je suis un grand amateur de série TV et je rate régulièrement des épisodes de mes séries préférés. Une solution s'offre à vous avec ce merveilleux site : Tv Gorge - www.tvgorge.com Moteur de recherche à l'appui, vous pouvez ...
Cliquez pour lire la suite de l'article par orion TECHDAYS PARIS 2010 : LA BI DANS SHAREPOINT 2010TECHDAYS PARIS 2010 : LA BI DANS SHAREPOINT 2010 par ROMELARD Fabrice
Animé par: Vincent Bellet et Baptiste Giraudier La BI dans SharePoint 2010, Les nouveaux services d'application dans SP2010 et SQL Server Reporting services 2008 R2. La BI dans SharePoint est généralisée pour tous afin de permettre à tous les coll...
Cliquez pour lire la suite de l'article par ROMELARD Fabrice
Forum
RE : ON RAWMODERE : ON RAWMODE par WorldDMT
Cliquez pour lire la suite par WorldDMT AVERTISSMENT ET KIKKAVERTISSMENT ET KIKK par mouhcine951990
Cliquez pour lire la suite par mouhcine951990
Logiciels
DB-MAIN (9.1.0)DB-MAIN (9.1.0)DB-MAIN is a data-modeling and data-architecture tool. It is designed to help developers and anal... Cliquez pour télécharger DB-MAIN Xilisoft DPG Convertisseur (5.1.37.0120)XILISOFT DPG CONVERTISSEUR (5.1.37.0120)Xilisoft DPG Convertisseur offre aux fans de Nintendo DS une bonne solution leur permettant de dé... Cliquez pour télécharger Xilisoft DPG Convertisseur GraphicsGale (2.01.01)GRAPHICSGALE (2.01.01)GraphicsGale est un logiciel de PixelArt avec de nombreuse fonctionnalités permettant de réalisé ... Cliquez pour télécharger GraphicsGale Architecte 3D (Platinum 2010)ARCHITECTE 3D (PLATINUM 2010)Architecte 3D Platinium vous permet de concevoir facilement les plans votre future maison, de l'é... Cliquez pour télécharger Architecte 3D TeamViewer 5 (TeamViewer 5)TEAMVIEWER 5 (TEAMVIEWER 5)Dépanner un ami,expliquer une manipulation devient un jeu d'enfant.
Prise en main d'un autre ord... Cliquez pour télécharger TeamViewer 5
|