AUTO VOICE ET AUTO MESSAGE À LA CONNECTION auto, voice, message, connexion, Source N°32531

Information sur la source

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

Auteur : IceTempest

Ecrire un message privé

Note :

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

Sources du même auteur

Toutes les sources de IceTempest

Sources de la même categorie

Toutes les sources de la catégorie AddOns

Sources en rapport avec celle ci

Commentaires

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
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.
Commentaire de KiNdErMaXi le 04/07/2005 21:28:51

utilise une list au lieu d'edit et un .txt pour stocker les informations
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 ;(

++
Commentaire de Mc_AbBeR le 07/07/2005 11:10:40

Pour stocker les informations, utilise le hash table...
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
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

Help :) par jujuquatre

message oto par bbjulien

* Aucune connexion ID trouvée: 2 par MaX_62

Auto message par angeldavid

devoice auto? par maaars

auto message pour certains join par manaraselen

Auto message par staff973

Message auto par pat283

auto message par Squ4L

Auto voice selon le nick par XavierBL