Previen son

Soyez le premier à donner votre avis sur cette source.

Vue 7 581 fois - Téléchargée 474 fois

Description

version 3 de mon previen dialog.
configurations possibles. j'ai essayé d'écouter au mieux
vos conseils j'espère qu'il vous plaiera +...

activation/désactivation et sons pour des évênements
message auto + editeurs fichiers

et voila la $newversion du previen son
- évênement BAN viré
- évênemnt START en +
- évenement CONNEXION en +
- évênement DECONNECTION en +
- évênement NOTIFY en +
- évênement INVITATION en +
- évenement changement de pseudo en +

- comme promis les sons, les messages echo, $chan et $nick sont configurable et indépendants

lorsque le son n'est pas configuré ya plus de message d'erreur

et le dialog un chouilla plus petit le tout en 3 onglets :))

(voir capture) bon tchat...

Source / Exemple :


ATTENTION ce code est mis pour ceux qui aime 
voir les sources sans télécharger 
pour l'utilisation ben téléchargez le ZIP !! :)

alias previen { dialog -m previen previen }
dialog previen {
  title "Mon préviens évênements"
  size -1 -1 196 142
  option dbu
  tab "éditeur de fichiers", 100, 0 0 194 140
  text "fichiers à éditer :", 1, 6 16 70 15, tab 100
  button "Ajouter", 2, 100 25 25 10, tab 100
  button "Supprimer", 3, 125 25 30 10, tab 100
  combo 10, 4 25 95 100,tab 100 size drop 
  text "liste des phrases éditées :", 5, 6 61 70 15, tab 100
  list 11, 4 70 185 65,tab 100 size vsbar 
  text "écrits ta phrase :", 4, 6 38 70 15, tab 100
  edit "", 30, 4 46 185 11,tab 100 autohs 
  button "Modifier", 7, 155 25 30 10, tab 100
  tab "évênements 1", 200, 0 0 194 140
  box "si mon PV est actif :", 201, 3 15 90 30, tab 200
  edit "", 202, 33 22 55 10, center autohs read tab 200
  button "son", 203, 7 22 25 10, tab 200
  check "son-actif", 204, 7 33 30 10, tab 200
  check "echo", 205, 38 33 20 10, tab 200
  check "msg nick", 206, 60 33 30 10, tab 200
  box "si mon pseudo est dit :", 207, 3 45 90 30, tab 200
  edit "", 208, 33 52 55 10, center autohs read tab 200
  button "son", 209, 7 52 25 10, tab 200
  check "son-actif", 210, 7 63 30 10, tab 200
  check "echo", 211, 38 63 20 10, tab 200
  check "msg chan", 212, 60 63 30 10, tab 200
  box "quand join un salon :", 213, 3 75 90 30, tab 200
  edit "", 214, 33 82 55 10, center autohs read tab 200
  button "son", 215, 7 82 25 10, tab 200
  check "son-actif", 216, 7 93 30 10, tab 200
  check "echo", 217, 38 93 20 10, tab 200
  check "msg chan", 218, 60 93 30 10, tab 200
  box "quand part d'un salon :", 219, 3 105 90 30, tab 200
  edit "", 220, 33 112 55 10, center autohs read tab 200
  button "son", 221, 7 112 25 10, tab 200
  check "son-actif", 222, 7 123 30 10, tab 200
  check "echo", 223, 38 123 20 10, tab 200
  check "msg chan", 224, 60 123 30 10, tab 200
  box "évênement OP :", 225, 100 15 90 30, tab 200
  edit "", 226, 130 22 55 10, center autohs read tab 200
  button "son", 227, 104 22 25 10, tab 200
  check "son-actif", 228, 104 33 30 10, tab 200
  check "echo", 229, 135 33 20 10, tab 200
  check "msg chan", 230, 157 33 30 10, tab 200
  box "évênement DEOP :", 231, 100 45 90 30, tab 200
  edit "", 232, 130 52 55 10, center autohs read tab 200
  button "son", 233, 104 52 25 10, tab 200
  check "son-actif", 234, 104 63 30 10, tab 200
  check "echo", 235, 135 63 20 10, tab 200
  check "msg chan", 236, 157 63 30 10, tab 200
  box "évênement VOICE :", 237, 100 75 90 30, tab 200
  edit "", 238, 130 82 55 10, center autohs read tab 200
  button "son", 239, 104 82 25 10, tab 200
  check "son-actif", 240, 104 93 30 10, tab 200
  check "echo", 241, 135 93 20 10, tab 200
  check "msg chan", 242, 157 93 30 10, tab 200
  box "évênement DEVOICE :", 243, 100 105 90 30, tab 200
  edit "", 244, 130 112 55 10, center autohs read tab 200
  button "son", 245, 104 112 25 10, tab 200
  check "son-actif", 246, 104 123 30 10, tab 200
  check "echo", 247, 135 123 20 10, tab 200
  check "msg chan", 248, 157 123 30 10, tab 200
  tab "évênements 2", 300, 0 0 194 140
  box "évênement kick :", 301, 3 15 90 30, tab 300
  edit "", 302, 33 22 55 10, center autohs read tab 300
  button "son", 303, 7 22 25 10, tab 300
  check "son-actif", 304, 7 33 30 10, tab 300
  check "echo", 305, 38 33 20 10, tab 300
  check "msg nick", 306, 60 33 30 10, tab 300
  box "évênement start :", 307, 3 45 90 30, tab 300
  edit "", 308, 33 52 55 10, center autohs read tab 300
  button "son", 309, 7 52 25 10, tab 300
  check "son-actif", 310, 7 63 30 10, tab 300
  check "echo", 311, 38 63 20 10, tab 300
  box "évênement connection :", 313, 3 75 90 30, tab 300
  edit "", 314, 33 82 55 10, center autohs read tab 300
  button "son", 315, 7 82 25 10, tab 300
  check "son-actif", 316, 7 93 30 10, tab 300
  check "echo", 317, 38 93 20 10, tab 300
  box "évênement déconnection :", 319, 3 105 90 30, tab 300
  edit "", 320, 33 112 55 10, center autohs read tab 300
  button "son", 321, 7 112 25 10, tab 300
  check "son-actif", 322, 7 123 30 10, tab 300
  check "echo", 323, 38 123 20 10, tab 300
  box "notifiés :", 325, 100 15 90 30, tab 300
  edit "", 326, 130 22 55 10, center autohs read tab 300
  button "son", 327, 104 22 25 10, tab 300
  check "son-actif", 328, 104 33 30 10, tab 300
  check "echo", 329, 135 33 20 10, tab 300
  check "msg nick", 330, 157 33 30 10, tab 300
  box "invitations :", 331, 100 45 90 30, tab 300
  edit "", 332, 130 52 55 10, center autohs read tab 300
  button "son", 333, 104 52 25 10, tab 300
  check "son-actif", 334, 104 63 30 10, tab 300
  check "echo", 335, 135 63 20 10, tab 300
  check "msg nick", 336, 157 63 30 10, tab 300
  box "changement de pseudo :", 337, 100 75 90 30, tab 300
  edit "", 338, 130 82 55 10, center autohs read tab 300
  button "son", 339, 104 82 25 10, tab 300
  check "son-actif", 340, 104 93 30 10, tab 300
  check "echo", 341, 135 93 20 10, tab 300
  check "msg chan", 342, 157 93 30 10, tab 300
  box "clones entré salon :", 343, 100 105 90 30, tab 300
  edit "", 344, 130 112 55 10, center autohs read tab 300
  button "son", 345, 104 112 25 10, tab 300
  check "son-actif", 346, 104 123 30 10, tab 300
  check "notice nick", 347, 135 123 33 10, tab 300
}

on *:dialog:previen:*:*:{ 
  if $devent == init { 
    did -ra $dname 202 $nopath(%music-fenpriv)
    if (%previen-Active-fenpriv == ON) { did -c previen 204 }
    if (%previen-msg-echo-fenpriv == ON) { did -c previen 205 }
    if (%previen-msg-nick-fenpriv == ON) { did -c previen 206 }
    did -ra $dname 208 $nopath(%music-pseudochan)
    if (%previen-Active-pseudochan == ON) { did -c previen 210 }
    if (%previen-msg-echo-pseudochan == ON) { did -c previen 211 }
    if (%previen-msg-chan-pseudochan == ON) { did -c previen 212 }
    did -ra $dname 214 $nopath(%music-joinchan)
    if (%previen-Active-joinchan == ON) { did -c previen 216 }
    if (%previen-msg-echo-joinchan == ON) { did -c previen 217 }
    if (%previen-msg-chan-joinchan == ON) { did -c previen 218 }
    did -ra $dname 220 $nopath(%music-partchan)
    if (%previen-Active-partchan == ON) { did -c previen 222 }
    if (%previen-msg-echo-partchan == ON) { did -c previen 223 }
    if (%previen-msg-chan-partchan == ON) { did -c previen 224 }
    did -ra $dname 226 $nopath(%music-op)
    if (%previen-Active-op == ON) { did -c previen 228 }
    if (%previen-msg-echo-op == ON) { did -c previen 229 }
    if (%previen-msg-chan-op == ON) { did -c previen 230 }
    did -ra $dname 232 $nopath(%music-deop)
    if (%previen-Active-deop == ON) { did -c previen 234 }
    if (%previen-msg-echo-deop == ON) { did -c previen 235 }
    if (%previen-msg-chan-deop == ON) { did -c previen 236 }
    did -ra $dname 238 $nopath(%music-voice)
    if (%previen-Active-voice == ON) { did -c previen 240 }
    if (%previen-msg-echo-voice == ON) { did -c previen 241 }
    if (%previen-msg-chan-voice == ON) { did -c previen 242 }
    did -ra $dname 244 $nopath(%music-devoice)
    if (%previen-Active-devoice == ON) { did -c previen 246 }
    if (%previen-msg-echo-devoice == ON) { did -c previen 247 }
    if (%previen-msg-chan-devoice == ON) { did -c previen 248 }
    did -ra $dname 302 $nopath(%music-kick)
    if (%previen-Active-kick == ON) { did -c previen 304 }
    if (%previen-msg-echo-kick == ON) { did -c previen 305 }
    if (%previen-msg-nick-kick == ON) { did -c previen 306 }
    did -ra $dname 308 $nopath(%music-start)
    if (%previen-Active-start == ON) { did -c previen 310 }
    if (%previen-msg-echo-start == ON) { did -c previen 311 }
    did -ra $dname 314 $nopath(%music-connexion)
    if (%previen-Active-connexion == ON) { did -c previen 316 }
    if (%previen-msg-echo-connexion == ON) { did -c previen 317 }
    did -ra $dname 320 $nopath(%music-deconnexion)
    if (%previen-Active-deconnexion == ON) { did -c previen 322 }
    if (%previen-msg-echo-deconnexion == ON) { did -c previen 323 }
    did -ra $dname 326 $nopath(%music-notif)
    if (%previen-Active-notif == ON) { did -c previen 328 }
    if (%previen-msg-echo-notif == ON) { did -c previen 329 }
    if (%previen-msg-nick-notif == ON) { did -c previen 330 }
    did -ra $dname 332 $nopath(%music-invit)
    if (%previen-Active-invit == ON) { did -c previen 334 }
    if (%previen-msg-echo-invit == ON) { did -c previen 335 }
    if (%previen-msg-nick-invit == ON) { did -c previen 336 }
    did -ra $dname 338 $nopath(%music-changenick)
    if (%previen-Active-changenick == ON) { did -c previen 340 }
    if (%previen-msg-echo-changenick == ON) { did -c previen 341 }
    if (%previen-msg-chan-changenick == ON) { did -c previen 342 }
    did -ra $dname 344 $nopath(%music-clonechan)
    if (%previen-Active-clonechan == ON) { did -c previen 346 }
    if (%previen-notice-nick-clonechan == ON) { did -c previen 347 }
    Did -r previen 10
    set %nblist 1
    While ( %nblist <= $findfile( previens\evenements , *.txt ,  0 ) ) {
      Did -a previen 10 $NoPath( $findfile( previens\evenements , *.txt ,  %nblist ) )
      Inc %nblist
    }
    Did -c previen 10 1
    ChargerListeprevien
  }
  if $devent == edit {
    if ($did == 202 ) {  
      set %evenement-fenpriv $did(202) 
    }
    if ($did == 208 ) {  
      set %evenement-pseudochan $did(208) 
    }
    if ($did == 214 ) {  
      set %evenement-joinchan $did(214) 
    }
    if ($did == 220 ) {  
      set %evenement-partchan $did(220) 
    }
    if ($did == 226 ) {  
      set %evenement-op $did(226) 
    }
    if ($did == 232 ) {  
      set %evenement-deop $did(232) 
    }
    if ($did == 238 ) {  
      set %evenement-voice $did(238) 
    }
    if ($did == 244 ) {  
      set %evenement-devoice $did(244) 
    }
    if ($did == 302 ) {  
      set %evenement-kick $did(302) 
    }
    if ($did == 308 ) {  
      set %evenement-start $did(308) 
    }
    if ($did == 314 ) {  
      set %evenement-connexion $did(314) 
    }
    if ($did == 320 ) {  
      set %evenement-deconnexion $did(320) 
    }
    if ($did == 326 ) {  
      set %evenement-notif $did(326) 
    }
    if ($did == 332 ) {  
      set %evenement-invit $did(332) 
    }
    if ($did == 338 ) {  
      set %evenement-changenick $did(338) 
    }
    if ($did == 344 ) {  
      set %evenement-clonechan $did(344) 
    }
  }
  if $devent == sclick {  
    if ($did == 203) { 
      set %music-fenpriv $sfile($wavedir)
      did -ra $dname 202 $nopath(%music-fenpriv)
    }
    if ($did == 204 ) {
      if (%previen-active-fenpriv == ON) { set  %previen-Active-fenpriv OFF  }
      else { set %previen-active-fenpriv ON  }
    }
    if ($did == 205 ) {
      if (%previen-msg-echo-fenpriv == ON) { set  %previen-msg-echo-fenpriv OFF  }
      else { set %previen-msg-echo-fenpriv ON  }
    }
    if ($did == 206 ) {
      if (%previen-msg-nick-fenpriv == ON) { set  %previen-msg-nick-fenpriv OFF  }
      else { set %previen-msg-nick-fenpriv ON  }
    }
    if ($did == 209) { 
      set %music-pseudochan $sfile($wavedir)
      did -ra $dname 208 $nopath(%music-pseudochan)
    }
    if ($did == 210 ) {
      if (%previen-active-pseudochan == ON) { set  %previen-Active-pseudochan OFF  }
      else { set %previen-active-pseudochan ON  }
    }
    if ($did == 211 ) {
      if (%previen-msg-echo-pseudochan == ON) { set  %previen-msg-echo-pseudochan OFF  }
      else { set %previen-msg-echo-pseudochan ON  }
    }
    if ($did == 212 ) {
      if (%previen-msg-chan-pseudochan == ON) { set  %previen-msg-chan-pseudochan OFF  }
      else { set %previen-msg-chan-pseudochan ON  }
    }
    if ($did == 215) { 
      set %music-joinchan $sfile($wavedir)
      did -ra $dname 214 $nopath(%music-joinchan)
    }
    if ($did == 216 ) {
      if (%previen-active-joinchan == ON) { set  %previen-Active-joinchan OFF  }
      else { set %previen-active-joinchan ON  }
    }
    if ($did == 217 ) {
      if (%previen-msg-echo-joinchan == ON) { set  %previen-msg-echo-joinchan OFF  }
      else { set %previen-msg-echo-joinchan ON  }
    }
    if ($did == 218 ) {
      if (%previen-msg-chan-joinchan == ON) { set  %previen-msg-chan-joinchan OFF  }
      else { set %previen-msg-chan-joinchan ON  }
    }
    if ($did == 221) { 
      set %music-partchan $sfile($wavedir)
      did -ra $dname 220 $nopath(%music-partchan)
    }
    if ($did == 222 ) {
      if (%previen-active-partchan == ON) { set  %previen-Active-partchan OFF  }
      else { set %previen-active-partchan ON  }
    }
    if ($did == 223 ) {
      if (%previen-msg-echo-partchan == ON) { set  %previen-msg-echo-partchan OFF  }
      else { set %previen-msg-echo-partchan ON  }
    }
    if ($did == 224 ) {
      if (%previen-msg-chan-partchan == ON) { set  %previen-msg-chan-partchan OFF  }
      else { set %previen-msg-chan-partchan ON  }
    }
    if ($did == 227) { 
      set %music-op $sfile($wavedir)
      did -ra $dname 226 $nopath(%music-op)
    }
    if ($did == 228 ) {
      if (%previen-active-op == ON) { set  %previen-Active-op OFF  }
      else { set %previen-active-op ON  }
    }
    if ($did == 229 ) {
      if (%previen-msg-echo-op == ON) { set  %previen-msg-echo-op OFF  }
      else { set %previen-msg-echo-op ON  }
    }
    if ($did == 230 ) {
      if (%previen-msg-chan-op == ON) { set  %previen-msg-chan-op OFF  }
      else { set %previen-msg-chan-op ON  }
    }
    if ($did == 233) { 
      set %music-deop $sfile($wavedir)
      did -ra $dname 232 $nopath(%music-deop)
    }
    if ($did == 234 ) {
      if (%previen-active-deop == ON) { set  %previen-Active-deop OFF  }
      else { set %previen-active-deop ON  }
    }
    if ($did == 235 ) {
      if (%previen-msg-echo-deop == ON) { set  %previen-msg-echo-deop OFF  }
      else { set %previen-msg-echo-deop ON  }
    }
    if ($did == 236 ) {
      if (%previen-msg-chan-deop == ON) { set  %previen-msg-chan-deop OFF  }
      else { set %previen-msg-chan-deop ON  }
    }
    if ($did == 239) { 
      set %music-voice $sfile($wavedir)
      did -ra $dname 238 $nopath(%music-voice)
    }
    if ($did == 240 ) {
      if (%previen-active-voice == ON) { set  %previen-Active-voice OFF  }
      else { set %previen-active-voice ON  }
    }
    if ($did == 241 ) {
      if (%previen-msg-echo-voice == ON) { set  %previen-msg-echo-voice OFF  }
      else { set %previen-msg-echo-voice ON  }
    }
    if ($did == 242 ) {
      if (%previen-msg-chan-voice == ON) { set  %previen-msg-chan-voice OFF  }
      else { set %previen-msg-chan-voice ON  }
    }
    if ($did == 245) { 
      set %music-devoice $sfile($wavedir)
      did -ra $dname 244 $nopath(%music-devoice)
    }
    if ($did == 246 ) {
      if (%previen-active-devoice == ON) { set  %previen-Active-devoice OFF  }
      else { set %previen-active-devoice ON  }
    }
    if ($did == 247 ) {
      if (%previen-msg-echo-devoice == ON) { set  %previen-msg-echo-devoice OFF  }
      else { set %previen-msg-echo-devoice ON  }
    }
    if ($did == 248 ) {
      if (%previen-msg-chan-devoice == ON) { set  %previen-msg-chan-devoice OFF  }
      else { set %previen-msg-chan-devoice ON  }
    }
    if ($did == 303) { 
      set %music-kick $sfile($wavedir)
      did -ra $dname 302 $nopath(%music-kick)
    }
    if ($did == 304 ) {
      if (%previen-active-kick == ON) { set  %previen-Active-kick OFF  }
      else { set %previen-active-kick ON  }
    }
    if ($did == 305 ) {
      if (%previen-msg-echo-kick == ON) { set  %previen-msg-echo-kick OFF  }
      else { set %previen-msg-echo-kick ON  }
    }
    if ($did == 306 ) {
      if (%previen-msg-nick-kick == ON) { set  %previen-msg-nick-kick OFF  }
      else { set %previen-msg-nick-kick ON  }
    }
    if ($did == 309) { 
      set %music-start $sfile($wavedir)
      did -ra $dname 308 $nopath(%music-start)
    }
    if ($did == 310 ) {
      if (%previen-active-start == ON) { set  %previen-Active-start OFF  }
      else { set %previen-active-start ON  }
    }
    if ($did == 311 ) {
      if (%previen-msg-echo-start == ON) { set  %previen-msg-echo-start OFF  }
      else { set %previen-msg-echo-start ON  }
    }
    if ($did == 315) { 
      set %music-connexion $sfile($wavedir)
      did -ra $dname 314 $nopath(%music-connexion)
    }
    if ($did == 316 ) {
      if (%previen-active-connexion == ON) { set  %previen-Active-connexion OFF  }
      else { set %previen-active-connexion ON  }
    }
    if ($did == 317 ) {
      if (%previen-msg-echo-connexion == ON) { set  %previen-msg-echo-connexion OFF  }
      else { set %previen-msg-echo-connexion ON  }
    }
    if ($did == 321) { 
      set %music-deconnexion $sfile($wavedir)
      did -ra $dname 320 $nopath(%music-deconnexion)
    }
    if ($did == 322 ) {
      if (%previen-active-deconnexion == ON) { set  %previen-Active-deconnexion OFF  }
      else { set %previen-active-deconnexion ON  }
    }
    if ($did == 323 ) {
      if (%previen-msg-echo-deconnexion == ON) { set  %previen-msg-echo-deconnexion OFF  }
      else { set %previen-msg-echo-deconnexion ON  }
    }
    if ($did == 327) { 
      set %music-notif $sfile($wavedir)
      did -ra $dname 326 $nopath(%music-notif)
    }
    if ($did == 328 ) {
      if (%previen-active-notif == ON) { set  %previen-Active-notif OFF  }
      else { set %previen-active-notif ON  }
    }
    if ($did == 329 ) {
      if (%previen-msg-echo-notif == ON) { set  %previen-msg-echo-notif OFF  }
      else { set %previen-msg-echo-notif ON  }
    }
    if ($did == 330 ) {
      if (%previen-msg-nick-notif == ON) { set  %previen-msg-nick-notif OFF  }
      else { set %previen-msg-nick-notif ON  }
    }
    if ($did == 333) { 
      set %music-invit $sfile($wavedir)
      did -ra $dname 332 $nopath(%music-invit)
    }
    if ($did == 334 ) {
      if (%previen-active-invit == ON) { set  %previen-Active-invit OFF  }
      else { set %previen-active-invit ON  }
    }
    if ($did == 335 ) {
      if (%previen-msg-echo-invit == ON) { set  %previen-msg-echo-invit OFF  }
      else { set %previen-msg-echo-invit ON  }
    }
    if ($did == 336 ) {
      if (%previen-msg-nick-invit == ON) { set  %previen-msg-nick-invit OFF  }
      else { set %previen-msg-nick-invit ON  }
    }
    if ($did == 339) { 
      set %music-changenick $sfile($wavedir)
      did -ra $dname 338 $nopath(%music-changenick)
    }
    if ($did == 340 ) {
      if (%previen-active-changenick == ON) { set  %previen-Active-changenick OFF  }
      else { set %previen-active-changenick ON  }
    }
    if ($did == 341 ) {
      if (%previen-msg-echo-changenick == ON) { set  %previen-msg-echo-changenick OFF  }
      else { set %previen-msg-echo-changenick ON  }
    }
    if ($did == 342 ) {
      if (%previen-msg-chan-changenick == ON) { set  %previen-msg-chan-changenick OFF  }
      else { set %previen-msg-chan-changenick ON  }
    }
    if ($did == 345) { 
      set %music-clonechan $sfile($wavedir)
      did -ra $dname 344 $nopath(%music-clonechan)
    }
    if ($did == 346 ) {
      if (%previen-active-clonechan == ON) { set  %previen-Active-clonechan OFF  }
      else { set %previen-active-clonechan ON  }
    }
    if ($did == 347 ) {
      if (%previen-msg-nick-clonechan == ON) { set  %previen-msg-nick-clonechan OFF  }
      else { set %previen-msg-nick-clonechan ON  }
    }
    If ($Did == 2) { 
      If ($Did(30) != $Null) {
        Did -a previen 11 $Did(30)
        Did -r previen 30
        SauverListeprevien
      }
    }
    If ($Did == 3) { 
      If ($Did(11).Sel != $Null) { 
        Did -r previen 30
        Did -d previen 11 $Did(11).Sel 
        SauverListeprevien
      }
    }
    If ($Did == 10) { 
      ChargerListeprevien
      Did -r previen 30 
    }
    If ($Did == 11) { 
      Did -ra previen 30 $Did(11).Seltext
    }
    If ($Did == 7) {
      Write -l $+ $did(11).sel previens\evenements $+ \ $+ $Did(10).Seltext $did(30)
      Did -r previen 30
      ChargerListeprevien
    } 
  }
}

on *:text:*:?: {
  if ($active == $nick) && ($appactive) { halt }
  if (%previen-active-fenpriv == ON ) { 
    if ($exists(%music-fenpriv)) { 
      splay %music-fenpriv 
    }
    else echo -s 3pas de son de query 
  }
  if (%previen-msg-echo-fenpriv == ON ) { 
    //echo -s $replace($read(previens\evenements\01_echo-pvactif.txt),<nick>,$nick,<me>,$me,<opnick>,$opnick,<vnick>,$vnick,<knick>,$knick,<chan>,$chan,<date>,$date,<time>,$time) 
  }  
  if (%previen-msg-nick-fenpriv == ON ) { 
    //msg $nick $replace($read(previens\evenements\01_msg_nick-pvactif.txt),<nick>,$nick,<me>,$me,<opnick>,$opnick,<vnick>,$vnick,<knick>,$knick,<chan>,$chan,<date>,$date,<time>,$time) 
  }  
}

ON *:TEXT:$(* $+ $me $+ *):#:{
  if ($active != $chan) {
    window -g2 $chan
    if (%previen-active-pseudochan == ON ) {
      if ($exists(%music-pseudochan)) { 
        splay %music-pseudochan 
      }
      else echo -s 3pas de son d'alerte channel 
    }
    if (%previen-msg-echo-pseudochan == ON ) {     
      //echo -s $replace($read(previens\evenements\02_echo-pseudoactif.txt),<nick>,$nick,<me>,$me,<opnick>,$opnick,<vnick>,$vnick,<knick>,$knick,<chan>,$chan,<date>,$date,<time>,$time) 
    }
    if (%previen-msg-chan-pseudochan == ON ) {     
      //msg $chan $replace($read(previens\evenements\02_msg_chan-pseudoactif.txt),<nick>,$nick,<me>,$me,<opnick>,$opnick,<vnick>,$vnick,<knick>,$knick,<chan>,$chan,<date>,$date,<time>,$time) 
    }
  }
}

on *: JOIN:#:{ 
  if ($nick == $me) {
    if (%previen-active-joinchan == ON ) { 
      if ($exists(%music-joinchan)) { 
        splay %music-joinchan 
      }
      else echo -s 3pas de son join channel 
    }
    if (%previen-msg-echo-joinchan == ON ) { 
      //echo -s $replace($read(previens\evenements\03_echo-joinchan.txt),<nick>,$nick,<me>,$me,<opnick>,$opnick,<vnick>,$vnick,<knick>,$knick,<chan>,$chan,<date>,$date,<time>,$time)      
    }
    if (%previen-msg-chan-joinchan == ON ) { 
      //msg $chan $replace($read(previens\evenements\03_msg_chan-joinchan.txt),<nick>,$nick,<me>,$me,<opnick>,$opnick,<vnick>,$vnick,<knick>,$knick,<chan>,$chan,<date>,$date,<time>,$time)      
    }
  }
  if (%previen-active-clonechan == ON) {
    if ($ialchan($address($nick,2),$chan,0) == 1)  {
      halt
    }
    else {
      Set %nbclones 1
      While (%nbclones <= $ialchan($address($nick,2),$chan,0)) {
        set %JoinClone %JoinClone $gettok($ialchan($address($nick,2),$chan,%nbclones),1,33)
        inc %nbclones
      }
      set %JoinClone $remtok(%JoinClone,$nick,1,32)
      echo $chan 1JoiN4 3--»4 $nick  $address entre sur $chan ( $calc($ialchan($address($nick,2),$chan,0) - 1) Clones : %JoinClone )
      echo -s 1JoiN4 3--»4 $nick  $address entre sur $chan ( $calc($ialchan($address($nick,2),$chan,0) - 1) Clones : %JoinClone )
      if ($exists(%music-clonechan)) { 
        splay %music-clonechan 
      }
      else echo -s 3pas de son de join clones 
    } 
    if (%previen-msg-nick-clonechan == ON ) { 
      //notice $nick $replace($read(previens\evenements\19_notice_nick-clones.txt),<nick>,$nick,<me>,$me,<opnick>,$opnick,<vnick>,$vnick,<knick>,$knick,<chan>,$chan,<date>,$date,<time>,$time)      
    }
    unset %nbclones
    unset %JoinClone
  }
}

on *:PART:#:{ 
  if ($nick == $me) {
    if (%previen-active-partchan == ON ) {
      if ($exists(%music-partchan)) { 
        splay %music-partchan 
      }
      else echo -s 3pas de son départ channel 
    }
    if (%previen-msg-echo-partchan == ON ) { 
      //echo -s $replace($read(previens\evenements\04_echo-partchan.txt),<nick>,$nick,<me>,$me,<opnick>,$opnick,<vnick>,$vnick,<knick>,$knick,<chan>,$chan,<date>,$date,<time>,$time)
    }
    if (%previen-msg-chan-partchan == ON ) { 
      //msg $chan $replace($read(previens\evenements\04_msg_chan-partchan.txt),<nick>,$nick,<me>,$me,<opnick>,$opnick,<vnick>,$vnick,<knick>,$knick,<chan>,$chan,<date>,$date,<time>,$time)      
    }
  }
}

on *:OP:*:{  
  if (%previen-active-op == ON ) {
    if ($exists(%music-op)) { 
      splay %music-op 
    }
    else echo -s 3pas de son pour le OP 
  }
  if ($opnick == $me) { 
    if (%previen-msg-echo-op == ON ) {
      //echo -s $replace($read(previens\evenements\05_echo-je_devien_op.txt),<nick>,$nick,<me>,$me,<opnick>,$opnick,<vnick>,$vnick,<knick>,$knick,<chan>,$chan,<date>,$date,<time>,$time)
    }
    if (%previen-msg-chan-op == ON ) {
      //msg $chan $replace($read(previens\evenements\05_msg_chan-je_devien_op.txt),<nick>,$nick,<me>,$me,<opnick>,$opnick,<vnick>,$vnick,<knick>,$knick,<chan>,$chan,<date>,$date,<time>,$time)
    }
  }
  elseif ($nick == $me) { 
    if (%previen-active-op == ON ) {
      //echo -s $replace($read(previens\evenements\06_je_op.txt),<nick>,$nick,<me>,$me,<opnick>,$opnick,<vnick>,$vnick,<knick>,$knick,<chan>,$chan,<date>,$date,<time>,$time)
    }
  }
  else {
    if (%previen-active-op == ON ) {
      //echo -s $replace($read(previens\evenements\06_il_op.txt),<nick>,$nick,<me>,$me,<opnick>,$opnick,<vnick>,$vnick,<knick>,$knick,<chan>,$chan,<date>,$date,<time>,$time)
    }
  }
}

on *:DEOP:*:{ 
  if (%previen-active-deop == ON ) {
    if ($exists(%music-deop)) { 
      splay %music-deop 
    }
    else echo -s 3pas de son de DEOP 
  }
  if ($opnick == $me) { 
    if (%previen-msg-echo-deop == ON ) {
      //echo -s $replace($read(previens\evenements\07_echo-je_devien_deop.txt),<nick>,$nick,<me>,$me,<opnick>,$opnick,<vnick>,$vnick,<knick>,$knick,<chan>,$chan,<date>,$date,<time>,$time)
    }  
    if (%previen-msg-chan-deop == ON ) {
      //msg $chan $replace($read(previens\evenements\07_msg_chan-je_devien_deop.txt),<nick>,$nick,<me>,$me,<opnick>,$opnick,<vnick>,$vnick,<knick>,$knick,<chan>,$chan,<date>,$date,<time>,$time)
    }
  }
  elseif ($nick == $me) { 
    if (%previen-active-deop == ON ) {
      //echo -s $replace($read(previens\evenements\08_je_deop.txt),<nick>,$nick,<me>,$me,<opnick>,$opnick,<vnick>,$vnick,<knick>,$knick,<chan>,$chan,<date>,$date,<time>,$time)
    }
  }
  else {
    if (%previen-active-deop == ON ) {
      //echo -s $replace($read(previens\evenements\08_il_deop.txt),<nick>,$nick,<me>,$me,<opnick>,$opnick,<vnick>,$vnick,<knick>,$knick,<chan>,$chan,<date>,$date,<time>,$time)
    }
  }
}

on *:VOICE:*:{
  if (%previen-active-voice == ON ) {
    if ($exists(%music-voice)) { 
      splay %music-voice 
    }
    else echo -s 3pas de son de VOICE 
  }
  if ($vnick == $me) { 
    if (%previen-msg-echo-voice == ON ) {
      //echo -s $replace($read(previens\evenements\09_echo-je_devien_voice.txt),<nick>,$nick,<me>,$me,<opnick>,$opnick,<vnick>,$vnick,<knick>,$knick,<chan>,$chan,<date>,$date,<time>,$time)
    } 
    if (%previen-msg-chan-voice == ON ) {
      //msg $chan $replace($read(previens\evenements\09_msg_chan-je_devien_voice.txt),<nick>,$nick,<me>,$me,<opnick>,$opnick,<vnick>,$vnick,<knick>,$knick,<chan>,$chan,<date>,$date,<time>,$time)
    }
  }
  elseif ($nick == $me) { 
    if (%previen-active-voice == ON ) {
      //echo -s $replace($read(previens\evenements\10_je_voice.txt),<nick>,$nick,<me>,$me,<opnick>,$opnick,<vnick>,$vnick,<knick>,$knick,<chan>,$chan,<date>,$date,<time>,$time)
    }
  }
  else {
    if (%previen-active-voice == ON ) {
      //echo -s $replace($read(previens\evenements\10_il_voice.txt),<nick>,$nick,<me>,$me,<opnick>,$opnick,<vnick>,$vnick,<knick>,$knick,<chan>,$chan,<date>,$date,<time>,$time)
    }
  }
}

on *:DEVOICE:*:{
  if (%previen-active-devoice == ON ) {
    if ($exists(%music-devoice)) { 
      splay %music-devoice 
    }
    else echo -s 3pas de son de DEVOICE 
  }
  if ($vnick == $me) { 
    if (%previen-msg-echo-devoice == ON ) {
      //echo -s $replace($read(previens\evenements\11_echo-je_devien_devoice.txt),<nick>,$nick,<me>,$me,<opnick>,$opnick,<vnick>,$vnick,<knick>,$knick,<chan>,$chan,<date>,$date,<time>,$time)
    } 
    if (%previen-msg-chan-devoice == ON ) {
      //msg $chan $replace($read(previens\evenements\11_msg_chan-je_devien_devoice.txt),<nick>,$nick,<me>,$me,<opnick>,$opnick,<vnick>,$vnick,<knick>,$knick,<chan>,$chan,<date>,$date,<time>,$time)
    }
  }
  elseif ($nick == $me) { 
    if (%previen-active-devoice == ON ) {
      //echo -s $replace($read(previens\evenements\12_je_devoice.txt),<nick>,$nick,<me>,$me,<opnick>,$opnick,<vnick>,$vnick,<knick>,$knick,<chan>,$chan,<date>,$date,<time>,$time)
    }
  }
  else {
    if (%previen-active-devoice == ON ) {
      //echo -s $replace($read(previens\evenements\12_il_devoice.txt),<nick>,$nick,<me>,$me,<opnick>,$opnick,<vnick>,$vnick,<knick>,$knick,<chan>,$chan,<date>,$date,<time>,$time)
    }
  }
}

on *:KICK:*:{
  if (%previen-active-kick == ON ) {
    if ($exists(%music-kick)) { 
      splay %music-kick 
    }
    else echo -s 3pas de son de KICK 
  }
  if ($knick == $me) { 
    if (%previen-msg-echo-kick == ON ) {
      //echo -s $replace($read(previens\evenements\13_echo-je_suis_kick.txt),<nick>,$nick,<me>,$me,<opnick>,$opnick,<vnick>,$vnick,<knick>,$knick,<chan>,$chan,<date>,$date,<time>,$time)
    } 
    if (%previen-msg-chan-kick == ON ) {
      //msg $nick $replace($read(previens\evenements\13_msg_nick-je_suis_kick.txt),<nick>,$nick,<me>,$me,<opnick>,$opnick,<vnick>,$vnick,<knick>,$knick,<chan>,$chan,<date>,$date,<time>,$time)
    }
  }
  if ($nick == $me) { 
    if (%previen-active-kick == ON ) {
      //echo -s $replace($read(previens\evenements\14_je_kick.txt),<nick>,$nick,<me>,$me,<opnick>,$opnick,<vnick>,$vnick,<knick>,$knick,<chan>,$chan,<date>,$date,<time>,$time)
    }
  }
  else {
    if (%previen-active-kick == ON ) {
      //echo -s $replace($read(previens\evenements\14_il_kick.txt),<nick>,$nick,<me>,$me,<opnick>,$opnick,<vnick>,$vnick,<knick>,$knick,<chan>,$chan,<date>,$date,<time>,$time)
    }
  }
}

on *:start:{
  if (%previen-active-start == ON ) {   
    if ($exists(%music-start)) { 
      splay %music-start 
    }
    else echo -s 3pas de son de START 
  }
  if (%previen-msg-echo-start == ON ) {
    inc %launch 1 
    echo -s 4,3Ceci est le %launch eme demarrage du script.
  }
}

on *:CONNECT:{
  if (%previen-active-connexion == ON ) {
    if ($exists(%music-connexion)) { 
      splay %music-connexion 
    }
    else echo -s 3pas de son de CONNEXION 
  }
  if (%previen-msg-echo-connexion == ON ) {
    echo -s 4,3tu es maintenant connecté !!
  }
}

on *:DISCONNECT:{
  if (%previen-active-deconnexion == ON ) {
    if ($exists(%music-deconnexion)) { 
      splay %music-deconnexion 
    }
    else echo -s 3pas de son de DECONNEXION 
  }
  if (%previen-msg-echo-deconnexion == ON ) {
    echo -s 4,3HOUPS!! tu as été déconnecté !!
  }
}

on *:NOTIFY:{
  if (%previen-active-notif == ON ) {
    query $nick
    if ($exists(%music-notif)) { 
      splay %music-notif 
    }
    else echo -s 3pas de son de NOTIFY 
  }
  if (%previen-msg-echo-notif == ON ) {
    //echo -s $replace($read(previens\evenements\15_echo-notifié.txt),<nick>,$nick,<me>,$me,<opnick>,$opnick,<vnick>,$vnick,<knick>,$knick,<chan>,$chan,<date>,$date,<time>,$time)
  } 
  if (%previen-msg-nick-notif == ON ) {
    //msg $nick $replace($read(previens\evenements\15_msg_nick-notifié.txt),<nick>,$nick,<me>,$me,<opnick>,$opnick,<vnick>,$vnick,<knick>,$knick,<chan>,$chan,<date>,$date,<time>,$time)
  }
}

on *:INVITE:#:{ 
  if (%previen-active-invit == ON ) {
    //echo -s $replace($read(previens\evenements\20_invite.txt),<nick>,$nick,<me>,$me,<opnick>,$opnick,<vnick>,$vnick,<knick>,$knick,<chan>,$chan,<date>,$date,<time>,$time)
    if ($exists(%music-invit)) { 
      splay %music-invit 
    }
    else echo -s 3pas de son d'invitation 
  }
  if (%previen-msg-echo-invit == ON ) {
    //echo -s $replace($read(previens\evenements\16_echo-invit.txt),<nick>,$nick,<me>,$me,<opnick>,$opnick,<vnick>,$vnick,<knick>,$knick,<chan>,$chan,<date>,$date,<time>,$time)
  } 
  if (%previen-msg-nick-invit == ON ) {
    //msg $nick $replace($read(previens\evenements\16_msg_nick-invit.txt),<nick>,$nick,<me>,$me,<opnick>,$opnick,<vnick>,$vnick,<knick>,$knick,<chan>,$chan,<date>,$date,<time>,$time)
  }
}

on *:nick:{
  if ($nick == $me) { 
    if (%previen-active-changenick == ON ) {
      if ($exists(%music-changenick)) { 
        splay %music-changenick 
      }
      else echo -s 3pas de son de changement de pseudo 
    }
    if (%previen-msg-echo-changenick == ON ) {
      //echo -s $replace($read(previens\evenements\17_echo-je_change_de_nick.txt),<nick>,$nick,<newnick>,$newnick,<me>,$me,<opnick>,$opnick,<vnick>,$vnick,<knick>,$knick,<chan>,$chan,<date>,$date,<time>,$time)
    } 
    if (%previen-msg-chan-changenick == ON ) {
      //msg $chan $replace($read(previens\evenements\17_msg_chan-je_change_de_nick.txt),<nick>,$nick,<newnick>,$newnick,<me>,$me,<opnick>,$opnick,<vnick>,$vnick,<knick>,$knick,<chan>,$chan,<date>,$date,<time>,$time)
    }
  }
  if ($nick != $me) {
    if (%previen-active-changenick == ON ) {
      //echo -s $replace($read(previens\evenements\18_il_change_de_nick.txt),<nick>,$nick,<newnick>,$newnick,<me>,$me,<opnick>,$opnick,<vnick>,$vnick,<knick>,$knick,<chan>,$chan,<date>,$date,<time>,$time)
      if ($exists(%music-changenick)) { 
        splay %music-changenick 
      }
      else echo -s 3pas de son de changement pseudo 
    }
  }
}

Alias SauverListeprevien {
  Var %nblist = 1
  Write -c previens\evenements $+ \ $+ $Did(10).Seltext
  While (%nblist <= $Did(11).Lines) {
    Did -c previen 11 %nblist
    Write -l $+ %nblist previens\evenements $+ \ $+ $Did(10).Seltext $Did(11).SelText
    Inc %nblist
  }
}

Alias ChargerListeprevien {
  Var %nblist = 1
  Did -r previen 11
  While (%nblist <= $Lines(previens\evenements $+ \ $+ $Did(10).Seltext) ) {
    Did -a previen 11 $Read( previens\evenements $+ \ $+ $Did(10).Seltext , %nblist )
    Inc %nblist
  }
}

On *:LOAD:{
  echo -s 4,3Ok T'as bien chargé l'add-on prévien_son
  echo -s Bon tchat !!
  echo -s 0,0_____8,8___________
  echo -s 0,0__7,7_8,8_______________
  echo -s 0,0_7,7_8,8___1,1__8,8_______1,1__8,8___1
  echo -s 7,7_8,8___________________
  echo -s 7,7_8,8__1,1_8,8_____________1,1_8,8__
  echo -s 7,7__8,8__1,1_____________8,8__
  echo -s 0,0_7,7__8,8_______________
  echo -s 0,0___7,7__8,8___________
  echo -s 0,0____7,7___________
}

Conclusion :


bon vu que cette version est bonne et
maintenant facile d'utilisation pour
les moins connaisseurs du codage,
je le poste j'ferai une version 4.2 plus tard
en ce qui concerne le reste des conseils
de coolman002 :))

voila...

Codes Sources

A voir également

Ajouter un commentaire Commentaires
Messages postés
15
Date d'inscription
mercredi 22 novembre 2000
Statut
Membre
Dernière intervention
12 juin 2009

Salut quand je tape cette commande /dialog -m previen previen cela me die /dialog 'previen ' table invalide pas ok ou annuler l'ip serais t'il possible de m'expliquer le pouquoi du comment mercie
Messages postés
15
Date d'inscription
mercredi 22 novembre 2000
Statut
Membre
Dernière intervention
12 juin 2009

Salut je sais que votre code passer la je l'ai pris dans le zip il veut rien savoir
Messages postés
15
Date d'inscription
mercredi 22 novembre 2000
Statut
Membre
Dernière intervention
12 juin 2009

Merci a vous JAGu4R le code passe
Messages postés
385
Date d'inscription
samedi 7 août 2004
Statut
Membre
Dernière intervention
3 juillet 2007

Christian24100 je pense qu'en fait tu copie/colle le code affiché alors qu'il faut prendre celui du zip
Messages postés
15
Date d'inscription
mercredi 22 novembre 2000
Statut
Membre
Dernière intervention
12 juin 2009

Salut j'ai essayer ton code qui je l'avous m'aiderais bcp car je suis novice mais cela ne passe pas merci de me dire si il y a des erreur
Afficher les 47 commentaires

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.