Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

AUTO VOICE ET AUTO MESSAGE À LA CONNECTION


Information sur la source

Catégorie :AddOns Classé sous : auto, voice, message, connexion Niveau : Débutant Date de création : 04/07/2005 Vu : 5 463

Note :
7 / 10 - par 1 personne
7,00 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10

Commentaire sur cette source (7)
Ajouter un commentaire et/ou une note

Description

Ben comme d'habitude, Alt+R et mettez cet add-on dans vos remotes
 

Source

  • dialog autovm {
  • title "« Auto-Voice et Auto-Message »"
  • size -1 -1 300 250
  • tab "Chans en Auto-Voice", 2, 0 65 300 150
  • check "Salon n°1", 3, 10 90 80 20, left tab 2
  • edit %nomone, 4, 10 110 80 20, autohs tab 2
  • check "Salon n°2", 5, 10 150 80 20, left tab 2
  • edit %nomtwo, 6, 10 170 80 20, autohs tab 2
  • check "Salon n°3", 7, 200 90 80 20, tab 2
  • edit %nomthree, 8, 200 110 80 20, autohs tab 2
  • check "Salon n°4", 9, 200 150 80 20, tab 2
  • edit %nomfour, 10, 200 170 80 20, autohs tab 2
  • tab "Chans en Auto-Message", 11, 0 200 300 130
  • check "Salon n°1", 12, 25 90 80 20, left tab 11
  • edit %messone, 13, 10 110 117 20, autohs tab 11
  • check "Salon n°2", 14, 25 150 80 20, left tab 11
  • edit %messtwo, 15, 10 170 117 20, autohs tab 11
  • check "Salon n°3", 16, 200 90 80 20, tab 11
  • edit %messthree, 17, 170 110 117 20, autohs tab 11
  • check "Salon n°4", 18, 200 150 80 20, tab 11
  • edit %messfour, 19, 170 170 117 20, autohs tab 11
  • button "Ok", 20, 50 220 80 20, ok default
  • button "Fermer", 21, 175 220 80 20, cancel
  • }
  • on *:dialog:autovm:sclick:3:{
  • if ( %premierchan == on ) { /set %premierchan off }
  • else { /set %premierchan on }
  • }
  • on *:dialog:autovm:sclick:5:{
  • if ( %deuxiemechan == on ) { /set %deuxiemechan off }
  • else { /set %deuxiemechan on }
  • }
  • on *:dialog:autovm:sclick:7:{
  • if ( %troisiemechan == on ) { /set %troisiemechan off }
  • else { /set %troisiemechan on }
  • }
  • on *:dialog:autovm:sclick:9:{
  • if ( %quatriemechan == on ) { /set %quatriemechan off }
  • else { /set %quatriemechan on }
  • }
  • on *:dialog:autovm:sclick:12:{
  • if ( %premiermess == on ) { /set %premiermess off }
  • else { /set %premiermess on }
  • }
  • on *:dialog:autovm:sclick:14:{
  • if ( %deuxiememess == on ) { /set %deuxiememess off }
  • else { /set %deuxiememess on }
  • }
  • on *:dialog:autovm:sclick:16:{
  • if ( %troisiememess == on ) { /set %troisiememess off }
  • else { /set %troisiememess on }
  • }
  • on *:dialog:autovm:sclick:18:{
  • if ( %quatriememess == on ) { /set %quatriememess off }
  • else { /set %quatriememess on }
  • }
  • on *:dialog:autovm:edit:4:{
  • /set %nomone $did($dname,4)
  • }
  • on *:dialog:autovm:edit:6:{
  • /set %nomtwo $did($dname,6)
  • }
  • on *:dialog:autovm:edit:8:{
  • /set %nomthree $did($dname,8)
  • }
  • on *:dialog:autovm:edit:10:{
  • /set %nomfour $did($dname,10)
  • }
  • on *:dialog:autovm:edit:13:{
  • /set %messone $did($dname,13)
  • }
  • on *:dialog:autovm:edit:15:{
  • /set %messtwo $did($dname,15)
  • }
  • on *:dialog:autovm:edit:17:{
  • /set %nomthree $did($dname,17)
  • }
  • on *:dialog:autovm:edit:19:{
  • /set %nomfour $did($dname,19)
  • }
  • on *:join:#: {
  • if ( $nick == $me ) {
  • if (( %premiermess == on) && ( %nomone != $null ) && ( # == %nomone )) { /msg $chan %messone }
  • if (( %deuxiememess == on) && ( %nomtwo != $null ) && ( # == %nomtwo )) { /msg $chan %messtwo }
  • if (( %troisiememess == on) && ( %nomthree != $null ) && ( # == %nomthree )) { /msg $chan %messthree }
  • if (( %quatriememess == on) && ( %nomfour != $null ) && ( # == %nomfour )) { /msg $chan %messfour }
  • }
  • if ( $me isop # ) {
  • if (( %premierchan == on ) && ( %nomone != $null ) && ( # == %nomone )) { /mode # +v $nick }
  • if (( %deuxiemechan == on ) && ( %nomtwo != $null ) && ( # == %nomtwo )) { /mode # +v $nick }
  • if (( %troisiemechan == on ) && ( %nomthree != $null ) && ( # == %nomthree )) { /mode # +v $nick }
  • if (( %quatriemechan == on ) && ( %nomfour != $null ) && ( # == %nomfour )) { /mode # +v $nick }
  • }
  • }
  • on *:dialog:autovm:init:0:{
  • if ( %premierchan == on ) { /did -c autovm 3 }
  • if ( %deuxiemechan == on ) { /did -c autovm 5 }
  • if ( %troisiemechan == on ) { /did -c autovm 7 }
  • if ( %quatriemechan == on ) { /did -c autovm 9 }
  • if ( %premiermess == on ) { /did -c autovm 12 }
  • if ( %deuxiememess == on ) { /did -c autovm 14 }
  • if ( %troisiememess == on ) { /did -c autovm 16 }
  • if ( %quatriememess == on ) { /did -c autovm 18 }
  • /did -r autovm 4,6,8,10,13,15,17,19
  • /did -a autovm 4 %nomone
  • /did -a autovm 6 %nomtwo
  • /did -a autovm 8 %nomthree
  • /did -a autovm 10 %nomfour
  • /did -a autovm 13 %messone
  • /did -a autovm 15 %messtwo
  • /did -a autovm 17 %messthree
  • /did -a autovm 19 %messfour
  • }
  • on *:load:{
  • /set %premierchan on
  • /set %premiermess on
  • /set %nompremierchan #<nom de votre chan>
  • /set %messpremierchan <votre message>
  • /set %deuxiemechan off
  • /set %deuxiememess off
  • /set %troisiemechan off
  • /set %troisiememess off
  • /set %quatriemechan off
  • /set %quatriememess off
  • }
dialog autovm {
  title "« Auto-Voice et Auto-Message »"
  size -1 -1 300 250
  tab "Chans en Auto-Voice", 2, 0 65 300 150
  check "Salon n°1", 3, 10 90 80 20, left tab 2
  edit %nomone, 4, 10 110 80 20, autohs tab 2
  check "Salon n°2", 5, 10 150 80 20, left tab 2
  edit %nomtwo, 6, 10 170 80 20, autohs tab 2
  check "Salon n°3", 7, 200 90 80 20, tab 2
  edit %nomthree, 8, 200 110 80 20, autohs tab 2
  check "Salon n°4", 9, 200 150 80 20, tab 2
  edit %nomfour, 10, 200 170 80 20, autohs tab 2
  tab "Chans en Auto-Message", 11, 0 200 300 130
  check "Salon n°1", 12, 25 90 80 20, left tab 11
  edit %messone, 13, 10 110 117 20, autohs tab 11
  check "Salon n°2", 14, 25 150 80 20, left tab 11
  edit %messtwo, 15, 10 170 117 20, autohs tab 11
  check "Salon n°3", 16, 200 90 80 20, tab 11
  edit %messthree, 17, 170 110 117 20, autohs tab 11
  check "Salon n°4", 18, 200 150 80 20, tab 11
  edit %messfour, 19, 170 170 117 20, autohs tab 11
  button "Ok", 20, 50 220 80 20, ok default
  button "Fermer", 21, 175 220 80 20, cancel
}
on *:dialog:autovm:sclick:3:{
  if ( %premierchan == on ) { /set %premierchan off }
  else { /set %premierchan on }
}
on *:dialog:autovm:sclick:5:{
  if ( %deuxiemechan == on ) { /set %deuxiemechan off }
  else { /set %deuxiemechan on }
}
on *:dialog:autovm:sclick:7:{
  if ( %troisiemechan == on ) { /set %troisiemechan off }
  else { /set %troisiemechan on }
}
on *:dialog:autovm:sclick:9:{
  if ( %quatriemechan == on ) { /set %quatriemechan off }
  else { /set %quatriemechan on }
}

on *:dialog:autovm:sclick:12:{
  if ( %premiermess == on ) { /set %premiermess off }
  else { /set %premiermess on }
}

on *:dialog:autovm:sclick:14:{
  if ( %deuxiememess == on ) { /set %deuxiememess off }
  else { /set %deuxiememess on }
}
on *:dialog:autovm:sclick:16:{
  if ( %troisiememess == on ) { /set %troisiememess off }
  else { /set %troisiememess on }
}
on *:dialog:autovm:sclick:18:{
  if ( %quatriememess == on ) { /set %quatriememess off }
  else { /set %quatriememess on }
}
on *:dialog:autovm:edit:4:{
  /set %nomone $did($dname,4)
}
on *:dialog:autovm:edit:6:{
  /set %nomtwo $did($dname,6)
}
on *:dialog:autovm:edit:8:{
  /set %nomthree $did($dname,8)
}
on *:dialog:autovm:edit:10:{
  /set %nomfour $did($dname,10)
}
on *:dialog:autovm:edit:13:{
  /set %messone $did($dname,13)
}
on *:dialog:autovm:edit:15:{
  /set %messtwo $did($dname,15)
}
on *:dialog:autovm:edit:17:{
  /set %nomthree $did($dname,17)
}
on *:dialog:autovm:edit:19:{
  /set %nomfour $did($dname,19)
}

on *:join:#: {
  if ( $nick == $me ) {
    if (( %premiermess == on) && ( %nomone != $null ) && ( # == %nomone )) { /msg $chan %messone }
    if (( %deuxiememess == on) && ( %nomtwo != $null ) && ( # == %nomtwo )) { /msg $chan %messtwo }
    if (( %troisiememess == on) && ( %nomthree != $null ) && ( # == %nomthree )) { /msg $chan %messthree }
    if (( %quatriememess == on) && ( %nomfour != $null ) && ( # == %nomfour )) { /msg $chan %messfour }
  }
  if ( $me isop # ) {
    if (( %premierchan == on ) && ( %nomone != $null ) && ( # == %nomone )) { /mode # +v $nick  } 
    if (( %deuxiemechan == on ) && ( %nomtwo != $null ) && ( # == %nomtwo )) { /mode # +v $nick }
    if (( %troisiemechan == on ) && ( %nomthree != $null ) && ( # == %nomthree )) { /mode # +v $nick }
    if (( %quatriemechan == on ) && ( %nomfour != $null ) && ( # == %nomfour )) { /mode # +v $nick }
  }
}


on *:dialog:autovm:init:0:{

  if ( %premierchan == on ) {  /did -c autovm 3 }
  if ( %deuxiemechan == on ) {  /did -c autovm 5 }
  if ( %troisiemechan == on ) {  /did -c autovm 7 }
  if ( %quatriemechan == on ) {  /did -c autovm 9 }
  if ( %premiermess == on ) {  /did -c autovm 12 }
  if ( %deuxiememess == on ) {  /did -c autovm 14 }
  if ( %troisiememess == on ) {  /did -c autovm 16 }
  if ( %quatriememess == on ) {  /did -c autovm 18 }
  /did -r autovm 4,6,8,10,13,15,17,19
  /did -a autovm 4 %nomone
  /did -a autovm 6 %nomtwo
  /did -a autovm 8 %nomthree
  /did -a autovm 10 %nomfour
  /did -a autovm 13 %messone
  /did -a autovm 15 %messtwo
  /did -a autovm 17 %messthree
  /did -a autovm 19 %messfour

}

on *:load:{
  /set %premierchan on
  /set %premiermess on
  /set %nompremierchan #<nom de votre chan>
  /set %messpremierchan <votre message>
  /set %deuxiemechan off
  /set %deuxiememess off
  /set %troisiemechan off
  /set %troisiememess off
  /set %quatriemechan off
  /set %quatriememess off
}

Conclusion

Voila, bon Scripting à tous
 

Commentaires et avis

signaler à un administrateur
Commentaire de RCA ArKanis le 04/07/2005 20:22:39

plutôt que d'utiliser "on" et "off", utilise 0 et 1, voir $true et $false
ça simplifiera tout ^^
tu pourrais faire correspondre le début de chaque variable aussi, ça te simplierai ton ON LOAD

je prends un exemple de ton if :
if ( %quatriememess == on ) { /set %quatriememess off }
else { /set %quatriememess on }
en plus court, ça donne (uniquement si tu changes en 0/1, $true/$false) :
if (%quatriememess) unset %quatriememess
else set %quatriememess 1

sinon j'ai pas testé :x

signaler à un administrateur
Commentaire de Tupac_shakur le 04/07/2005 21:01:37

- Largement optimisable en utilisant $iif
- Nombre de salons limité.
- toutes les / sont inutiles.

Bonne continuation.

signaler à un administrateur
Commentaire de KiNdErMaXi le 04/07/2005 21:28:51

utilise une list au lieu d'edit et un .txt pour stocker les informations

signaler à un administrateur
Commentaire de Sizlaa le 05/07/2005 21:42:13

N'utilise pas les variable Globale, utilise les locales, pcq là bjr l'état du script ;(

++

signaler à un administrateur
Commentaire de Mc_AbBeR le 07/07/2005 11:10:40

Pour stocker les informations, utilise le hash table...

signaler à un administrateur
Commentaire de hisoka2501 le 24/11/2006 15:28:33

[troll]
  un vrais torchon niveau code
[/troll]

regroupe tes events dans ton dialog:

on *:dialog:autovm:*:*:{
if ($devent == init) {

}
elseif ($devent == sclick) {
if ($did == x) { }
elseif ($did == y) {}
}
elseif ($devent == edit) {
  if ($did == x) {}
  elseif ($did == y) {}
}
}

le $did($dname,x) ne sers à rien alege avec $did(x)
les / devant tes did dans ton code sonts inutiles

utilise  0 et 1 pour tes comparaisons afin de passer de:
if (%variable == on)
à
if (%variable)
et de:
if (%variable == off)
à
if (!%variable)

chaine tes unset:
unset %var_un , %var_deux ....

les espaces en trop dans tes conditions:
if ( %variable == on ) deviens: if (%variable == on)

meme remaque que plus haut, pour ce genre de code utilise les hash tables

note: 1

signaler à un administrateur
Commentaire de hisoka2501 le 24/11/2006 18:49:02

j'oubliais:

#   if ( %premierchan == on ) { /set %premierchan off }
#   else { /set %premierchan on }

cette horreur ca deviens:

set %premierchan $iif(%premierchan == on,off,on)

Ajouter un commentaire

Discussions en rapport avec ce code source dans le forum

Help :) [ par jujuquatre ] ~~~~~~~~~~~~~~~~~~~~~~~~~~~~JuJuQuArTrE s^ s^ s^ JuJu_BoT WWW.ut2004.fr.st~~~~~~~~~~~~~~~~~~~~~~~~~~~~Ben voila J'ai commencer un addon de auto-mode ( message oto [ par bbjulien ] voila je voudrai dire un message auto matikemen c an on me voive ou op , devoide ,deop voilag trouvé un truc mais il ne marche pas c sa :on *:VOICE:#: * Aucune connexion ID trouvée: 2 [ par MaX_62 ] Voila c'est dans le titre, quand je me connecte a certains serveurs IRC, j'ai ce message qui apparait toutes les 3 secondes environ dans StatusEn plus Auto message [ par angeldavid ] Salut all quelqu'un connaitrai un script pour envoyer un message tous les 10 min sur tout les channel ou on est ?Merci d'avance . devoice auto? [ par maaars ] kikoo...alors voila j'ai une source qui permet de voice les gens seulement quand ils parlent (detection de caractères clefs)... et je cherche un moyen auto message pour certains join [ par manaraselen ] bonjour,Sur le chan ou je suis, il y a pas mal de users se connectant avec un nick predefinit, et ils on le meme prefixe (ex : prefix56432)J'aimerais Auto message [ par staff973 ] Slt je cherche les code pour l'auto message d'entr&#233;e &#233; de sorti d1 user du salon en pv. Merci d'avance. Message auto [ par pat283 ] Voil&#224; je me presente mon pseudo c'est ulast je suis un noob pour linstant mais j'aimerais apprendre quelque truc pour moi.J'aimerais savoir si c' auto message [ par Squ4L ] Bonjour je voudrais savoir si il est possible d'envoyer un message a un interval de temp donner, du genre 1 minute par message :) Auto voice selon le nick [ par XavierBL ] Bonjour,Avant de poster, j'ai bien fait une recherche sur le site mais je n'ai pas trouvé ce que je voulais.Je suis à la recherche d'un petit script p


Nos sponsors

Sondage...

CalendriCode

Juillet 2009
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
2728293031  

Consulter la suite du CalendriCode

Téléchargements

Logiciels à télécharger sur le même thème :

Comparez les prix Nouvelle version

Photothèque Nouveau !



Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés
Temps d'éxécution de la page : 1,856 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.