Accueil > > > AUTO MESSAGE DE JOIN
AUTO MESSAGE DE JOIN
Information sur la source
Description
Un dualog de configuration que quand quelqu'un Join un canal Ben vous lui dite le message choissi soit : en notice de inck , en notice du chan , en msg du nick ( pv ) , ou en msg sur le chan !
Voila !
Source
- ~~~~~~~~~~~~~~
-
- Source venant de Cameleon'Script by jujuquatre : irc.jeuxvideo.com : #quizzz
-
- ~~~~~~~~~~~~~~
-
-
-
- dialog config22 {
- title " Configuration du AutoMsgJoin"
- size -1 -1 200 65
- option dbu
- box "",150,1 0 199 65
- ; icon 1,30 45 32 32, images/icones/ok3.ico
- button "Sauvegarder" ,1, 20 48 50 10,ok, flat
- button "Aperçu" ,100, 70 48 50 10,flat
- button "Annuler",27, 120 48 50 10,flat
- ;icon 27, 140 45 32 32, images/icones/ok.ico
- text "Etat :",22,117 10 40 10
- combo 23,140 8 50 50, result drop
- combo 25, 10 25 180 150,result drop edit
- text " Messages :",26,10 10 60 10
-
- }
-
- on *:dialog:config22:init:*:{
- did -a config22 23 Désactivé
- did -a config22 23 Activer MSG CHAN
- did -a config22 23 Activer MSG PV
- did -a config22 23 Activer NOTICE CHAN
- did -a config22 23 Activer NOTICE NICK
- did -c config22 23 %nivo.amj
- did -a config22 25 %amj
- did -a config22 25 Salut $nick !!! Sa gaz ??
- did -a config22 25 Slt $nick !!!! Bienvenue sur $chan et amuse toi bien !!
- did -a config22 25 12 Yop $nick ! 4 Bievenue sur $chan
- did -a config22 25 Yop un de plus sur $chan grace a $nick !!
- did -c config22 25 1
- if ( %nivo.amj == 1) { did -b config22 25 }
- }
- on *:dialog:config22:sclick:*:{
- if $did(config22,23).sel == 1 { set %nivo.amj 1 | did -b config22 25 }
- if $did(config22,23).sel == 2 { set %nivo.amj 2 | did -e config22 25 }
- if $did(config22,23).sel == 3 { set %nivo.amj 3 | did -e config22 25 }
- if $did(config22,23).sel == 4 { set %nivo.amj 4 | did -e config22 25 }
- if $did(config22,23).sel == 5 { set %nivo.amj 5 | did -e config22 25 }
- if ($did == 25) { set %amj.tps $did(25) }
- if ( $did == 1 ) {
- If ($did($dname,25) == $null) && ( %nivo.amj != 1) { /set %alert2 L'auto msg Join est activer mais vous n'avez pas preciser de message ! | dialog -m alert2 alert2 }
- else { /set %amj $did($dname,25).text | /dialog -x config22 config22 }
- }
- if ($did == 100 ) { /appercu_amj }
- if ($did == 27) { dialog -x config22 config22 }
- }
-
- on *:dialog:config22:edit:*:{
- if ($did == 25) { set %amj.tps $did(25) }
- }
-
- dialog alert2 {
- Title "Attention!!!..."
- Size -1 -1 350 150
-
- button "OK", 1, 150 120 50 20,cancel,flat
- Text "" 2, 50 30 290 80 , center
- icon 3 , 10 20 40 40 , images\inconnu.ico
- }
-
-
- on 1:dialog:alert2:init:*: {
- /did -a alert2 %alert2
- }
-
- ;Réponse des Absences
- on 1:JOIN:#: {
- if ( $nick == $me ) { halt }
- if ( %nivo.amj == 1 ) { }
- if ( %nivo.amj == 2 ) { /msg $chan $+ %codecouleur $+ %gras $+ %under $+ $+ [ [ %amj ] ] $+ %codecouleur $+ %gras $+ %under $+ $+ ---- %version }
- if ( %nivo.amj == 4 ) { /notice $chan $+ %codecouleur $+ %gras $+ %under $+ $+ [ [ %amj ] ] $+ %codecouleur $+ %gras $+ %under $+ $+ ---- %version }
- if ( %nivo.amj == 3 ) { /msg $nick $+ %codecouleur $+ %gras $+ %under $+ $+ [ [ %amj ] ] $+ %codecouleur $+ %gras $+ %under $+ $+ ---- %version }
- if ( %nivo.amj == 5 ) { /notice $nick $+ %codecouleur $+ %gras $+ %under $+ $+ [ [ %amj ] ] $+ %codecouleur $+ %gras $+ %under $+ $+ ---- %version }
- }
-
- else { goto end }
- :end
- }
-
- alias appercu_amj {
- window -ofbakd +e @AutoMessageJoin 85 70 332 270 tahoma 11
- /aline -p @AutoMessageJoin %gras $+ %under $+ %codecouleur %amj.tps
- }
~~~~~~~~~~~~~~
Source venant de Cameleon'Script by jujuquatre : irc.jeuxvideo.com : #quizzz
~~~~~~~~~~~~~~
dialog config22 {
title " Configuration du AutoMsgJoin"
size -1 -1 200 65
option dbu
box "",150,1 0 199 65
; icon 1,30 45 32 32, images/icones/ok3.ico
button "Sauvegarder" ,1, 20 48 50 10,ok, flat
button "Aperçu" ,100, 70 48 50 10,flat
button "Annuler",27, 120 48 50 10,flat
;icon 27, 140 45 32 32, images/icones/ok.ico
text "Etat :",22,117 10 40 10
combo 23,140 8 50 50, result drop
combo 25, 10 25 180 150,result drop edit
text " Messages :",26,10 10 60 10
}
on *:dialog:config22:init:*:{
did -a config22 23 Désactivé
did -a config22 23 Activer MSG CHAN
did -a config22 23 Activer MSG PV
did -a config22 23 Activer NOTICE CHAN
did -a config22 23 Activer NOTICE NICK
did -c config22 23 %nivo.amj
did -a config22 25 %amj
did -a config22 25 Salut $nick !!! Sa gaz ??
did -a config22 25 Slt $nick !!!! Bienvenue sur $chan et amuse toi bien !!
did -a config22 25 12 Yop $nick ! 4 Bievenue sur $chan
did -a config22 25 Yop un de plus sur $chan grace a $nick !!
did -c config22 25 1
if ( %nivo.amj == 1) { did -b config22 25 }
}
on *:dialog:config22:sclick:*:{
if $did(config22,23).sel == 1 { set %nivo.amj 1 | did -b config22 25 }
if $did(config22,23).sel == 2 { set %nivo.amj 2 | did -e config22 25 }
if $did(config22,23).sel == 3 { set %nivo.amj 3 | did -e config22 25 }
if $did(config22,23).sel == 4 { set %nivo.amj 4 | did -e config22 25 }
if $did(config22,23).sel == 5 { set %nivo.amj 5 | did -e config22 25 }
if ($did == 25) { set %amj.tps $did(25) }
if ( $did == 1 ) {
If ($did($dname,25) == $null) && ( %nivo.amj != 1) { /set %alert2 L'auto msg Join est activer mais vous n'avez pas preciser de message ! | dialog -m alert2 alert2 }
else { /set %amj $did($dname,25).text | /dialog -x config22 config22 }
}
if ($did == 100 ) { /appercu_amj }
if ($did == 27) { dialog -x config22 config22 }
}
on *:dialog:config22:edit:*:{
if ($did == 25) { set %amj.tps $did(25) }
}
dialog alert2 {
Title "Attention!!!..."
Size -1 -1 350 150
button "OK", 1, 150 120 50 20,cancel,flat
Text "" 2, 50 30 290 80 , center
icon 3 , 10 20 40 40 , images\inconnu.ico
}
on 1:dialog:alert2:init:*: {
/did -a alert2 %alert2
}
;Réponse des Absences
on 1:JOIN:#: {
if ( $nick == $me ) { halt }
if ( %nivo.amj == 1 ) { }
if ( %nivo.amj == 2 ) { /msg $chan $+ %codecouleur $+ %gras $+ %under $+ $+ [ [ %amj ] ] $+ %codecouleur $+ %gras $+ %under $+ $+ ---- %version }
if ( %nivo.amj == 4 ) { /notice $chan $+ %codecouleur $+ %gras $+ %under $+ $+ [ [ %amj ] ] $+ %codecouleur $+ %gras $+ %under $+ $+ ---- %version }
if ( %nivo.amj == 3 ) { /msg $nick $+ %codecouleur $+ %gras $+ %under $+ $+ [ [ %amj ] ] $+ %codecouleur $+ %gras $+ %under $+ $+ ---- %version }
if ( %nivo.amj == 5 ) { /notice $nick $+ %codecouleur $+ %gras $+ %under $+ $+ [ [ %amj ] ] $+ %codecouleur $+ %gras $+ %under $+ $+ ---- %version }
}
else { goto end }
:end
}
alias appercu_amj {
window -ofbakd +e @AutoMessageJoin 85 70 332 270 tahoma 11
/aline -p @AutoMessageJoin %gras $+ %under $+ %codecouleur %amj.tps
}
Conclusion
Bon voila :)
Dite un commentaire si il y a un prob dans la source :)
Allez @+++
http://membres.lycos.fr/ut2004/juju_bot.php " Bot mIRC Juju_Bot "
Sources du même auteur
Sources de la même categorie
Commentaires et avis
|
Derniers Blogs
TECHDAYS PARIS 2012 : PLEINIèRE SECOND JOURTECHDAYS PARIS 2012 : PLEINIèRE SECOND JOUR par ROMELARD Fabrice
Après une première journée dédiée aux développeurs, cette seconde journée est dédiée au monde des entreprises et de ses applications. Ainsi, cette pleinière est dédiée à faire un 360 de l'évolution des applications Business aux demandes ac...
Cliquez pour lire la suite de l'article par ROMELARD Fabrice TECHDAYS PARIS 2012 : RETOUR D'EXPéRIENCE SUR LA MISE EN PLACE D'UN CLOUD PRIVéTECHDAYS PARIS 2012 : RETOUR D'EXPéRIENCE SUR LA MISE EN PLACE D'UN CLOUD PRIVé par ROMELARD Fabrice
Speaker : Guillaume Rochette Cette session est dédiée à fournir le retour sur la mise en place d'un cloud privé (IaaS) par Osiatis pour son compte ou celui de ses clients. Ce projet s'est déroulé sur 4 mois et a permis de faire évoluer...
Cliquez pour lire la suite de l'article par ROMELARD Fabrice TECHDAYS PARIS 2012 : COMMENT SHAREPOINT A SAUVé MES TECHDAYSTECHDAYS PARIS 2012 : COMMENT SHAREPOINT A SAUVé MES TECHDAYS par ROMELARD Fabrice
Speakers : Lionel Limozin et Alain Marty La session commence par une découverte de SharePoint à travers la mise en place d'un environnement SharePoint pour la gestion des Sessions animées par BeWise. Le besoin est très ba...
Cliquez pour lire la suite de l'article par ROMELARD Fabrice PERSPECTIVE 3.0 POUR SILVERLIGHT 5.0PERSPECTIVE 3.0 POUR SILVERLIGHT 5.0 par odewit
Je viens de publier la version 3.0 de Perspective pour Silverlight, qui regroupe un portage sous Silverlight 5.0 des fonctionnalités de Perspective 2.0, le framework 3D de haut-niveau introduit récemment et de nouveaux exemples de code. En voici la li...
Cliquez pour lire la suite de l'article par odewit TECHDAYS PARIS 2012 : MYTHES ET RéALITéS VIRTUALISATION ET CLOUD PRIVéTECHDAYS PARIS 2012 : MYTHES ET RéALITéS VIRTUALISATION ET CLOUD PRIVé par ROMELARD Fabrice
Speakers : Christophe Dubos et Fabrice Meillon La Session est dédiée à casser la réputation que Microsoft traine sur son incapacité à fournir des solutions de Cloud privé. La session a commencé par un retour sur la puissance des DataCent...
Cliquez pour lire la suite de l'article par ROMELARD Fabrice
Forum
RE : AIDERE : AIDE par Nico26000
Cliquez pour lire la suite par Nico26000 RE : AIDERE : AIDE par WorldDMT
Cliquez pour lire la suite par WorldDMT AIDEAIDE par Nico26000
Cliquez pour lire la suite par Nico26000
Logiciels
Academy System (17.2.1.0)ACADEMY SYSTEM (17.2.1.0)Logiciel de gestion des établissements.
- élèves/étudiants (inscription, dossier, absence...)
-... Cliquez pour télécharger Academy System Easy-Planning (1.0.0.1)EASY-PLANNING (1.0.0.1)Basé sur les mêmes principes que MyPlanning, Easy-Planning permet de créer des plannings sous la ... Cliquez pour télécharger Easy-Planning COLLECTOR PLUS (3.00B)COLLECTOR PLUS (3.00B)COLLECTOR PLUS version 3.00B est un logiciel utilisant une base de données alimentée par :
- L... Cliquez pour télécharger COLLECTOR PLUS PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO (V7.4)PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO (V7.4)PONAMEDIA TV DEVIENS HELLLOOO FLASH
LA TV SUR VOTRE ORDINATEUR.
Toute une plateforme Multi... Cliquez pour télécharger PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO LettresFaciles 2011 (8.0.0.1)LETTRESFACILES 2011 (8.0.0.1)LettresFaciles est un logiciel facilitant la création et la rédaction de lettres types.
Son inte... Cliquez pour télécharger LettresFaciles 2011
|