begin process at 2008 05 17 08:20:31
1 173 926 membres
56 nouveaux aujourd'hui
13 973 membres club

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 !

BOT DE LIASON DE CHANS


Information sur la source

Description

Ce bo permet de relier 2 ou 3 chans entre eux, des que quelque chose se passe sur #chan1 il le dit sur #chan2 et #chan3

Source

  • on *:start: {
  • if (!%parametre) {
  • set %chan.1 $$?#="Entrez le chan numéro 1 :"
  • set %chan.2 $$?#="Entrez le chan numéro 2 :"
  • set %chan.3 $$?#="Entrez si vous voulez le chan numéro 3 :"
  • if (!%chan.3) { set %chan.3 *inexistant* }
  • set %parametre ok
  • }
  • }
  • on *:TEXT:*:*: {
  • if ( $chan == %chan.1 ) {
  • msg %chan.2 ( $+ $chan $+ ) < $+ $nick $+ > $$1-
  • msg %chan.3 ( $+ $chan $+ ) < $+ $nick $+ > $$1-
  • }
  • if ( $chan == %chan.2 ) {
  • msg %chan.1 ( $+ $chan $+ ) < $+ $nick $+ > $$1-
  • msg %chan.3 ( $+ $chan $+ ) < $+ $nick $+ > $$1-
  • }
  • if ( $chan == %chan.3 ) {
  • msg %chan.1 ( $+ $chan $+ ) < $+ $nick $+ > $$1-
  • msg %chan.2 ( $+ $chan $+ ) < $+ $nick $+ > $$1-
  • }
  • }
  • on *:ACTION:*:*: {
  • if ( $chan == %chan.1 ) {
  • msg %chan.2 ( $+ $chan $+ ) * $nick $$1-
  • msg %chan.3 ( $+ $chan $+ ) * $nick $$1-
  • }
  • if ( $chan == %chan.2 ) {
  • msg %chan.1 ( $+ $chan $+ ) * $nick $$1-
  • msg %chan.3 ( $+ $chan $+ ) * $nick $$1-
  • }
  • if ( $chan == %chan.3 ) {
  • msg %chan.1 ( $+ $chan $+ ) * $nick $$1-
  • msg %chan.2 ( $+ $chan $+ ) * $nick $$1-
  • }
  • }
  • on *:PART:*: {
  • if ( $chan == %chan.1 ) {
  • msg %chan.2 ( $+ $chan $+ ) PART : $nick
  • msg %chan.3 ( $+ $chan $+ ) PART : $nick
  • }
  • if ( $chan == %chan.2 ) {
  • msg %chan.1 ( $+ $chan $+ ) PART : $nick
  • msg %chan.3 ( $+ $chan $+ ) PART : $nick
  • }
  • if ( $chan == %chan.3 ) {
  • msg %chan.1 ( $+ $chan $+ ) PART : $nick
  • msg %chan.2 ( $+ $chan $+ ) PART : $nick
  • }
  • }
  • on *:JOIN:*: {
  • if ( $nick != $me ) {
  • if ( $chan == %chan.1 ) {
  • msg %chan.2 ( $+ $chan $+ ) JOIN : $nick
  • msg %chan.3 ( $+ $chan $+ ) JOIN : $nick
  • }
  • if ( $chan == %chan.2 ) {
  • msg %chan.1 ( $+ $chan $+ ) JOIN : $nick
  • msg %chan.3 ( $+ $chan $+ ) JOIN : $nick
  • }
  • if ( $chan == %chan.3 ) {
  • msg %chan.1 ( $+ $chan $+ ) JOIN : $nick
  • msg %chan.2 ( $+ $chan $+ ) JOIN : $nick
  • }
  • }
  • }
  • on *:KICK:*: {
  • if ( $knick != $me ) {
  • if ( $chan == %chan.1 ) {
  • msg %chan.2 ( $+ $chan $+ ) KICK : $knick by $nick
  • msg %chan.3 ( $+ $chan $+ ) KICK : $knick by $nick
  • }
  • if ( $chan == %chan.2 ) {
  • msg %chan.1 ( $+ $chan $+ ) KICK : $knick by $nick
  • msg %chan.3 ( $+ $chan $+ ) KICK : $knick by $nick
  • }
  • if ( $chan == %chan.3 ) {
  • msg %chan.1 ( $+ $chan $+ ) KICK : $knick by $nick
  • msg %chan.2 ( $+ $chan $+ ) KICK : $knick by $nick
  • }
  • }
  • }
  • on *:NICK:*: {
  • if ( $chan == %chan.1 ) {
  • msg %chan.2 ( $+ $chan $+ ) NICK : $nick as $newnick
  • msg %chan.3 ( $+ $chan $+ ) NICK : $nick as $newnick
  • }
  • if ( $chan == %chan.2 ) {
  • msg %chan.1 ( $+ $chan $+ ) NICK : $nick as $newnick
  • msg %chan.3 ( $+ $chan $+ ) NICK : $nick as $newnick
  • }
  • if ( $chan == %chan.3 ) {
  • msg %chan.1 ( $+ $chan $+ ) NICK : $nick as $newnick
  • msg %chan.2 ( $+ $chan $+ ) NICK : $nick as $newnick
  • }
  • }
on *:start: {
  if (!%parametre) {
    set %chan.1 $$?#="Entrez le chan numéro 1 :"
    set %chan.2 $$?#="Entrez le chan numéro 2 :"
    set %chan.3 $$?#="Entrez si vous voulez le chan numéro 3 :"
    if (!%chan.3) { set %chan.3 *inexistant* }
    set %parametre ok
  }
}

on *:TEXT:*:*: {
  if ( $chan == %chan.1 ) {
    msg %chan.2 ( $+ $chan $+ ) < $+ $nick $+ > $$1-
    msg %chan.3 ( $+ $chan $+ ) < $+ $nick $+ > $$1-
  }
  if ( $chan == %chan.2 ) {
    msg %chan.1 ( $+ $chan $+ ) < $+ $nick $+ > $$1-
    msg %chan.3 ( $+ $chan $+ ) < $+ $nick $+ > $$1-
  }
  if ( $chan == %chan.3 ) {
    msg %chan.1 ( $+ $chan $+ ) < $+ $nick $+ > $$1-
    msg %chan.2 ( $+ $chan $+ ) < $+ $nick $+ > $$1-
  }
}

on *:ACTION:*:*: {
  if ( $chan == %chan.1 ) {
    msg %chan.2 ( $+ $chan $+ ) * $nick $$1-
    msg %chan.3 ( $+ $chan $+ ) * $nick $$1-
  }
  if ( $chan == %chan.2 ) {
    msg %chan.1 ( $+ $chan $+ ) * $nick $$1-
    msg %chan.3 ( $+ $chan $+ ) * $nick $$1-
  }
  if ( $chan == %chan.3 ) {
    msg %chan.1 ( $+ $chan $+ ) * $nick $$1-
    msg %chan.2 ( $+ $chan $+ ) * $nick $$1-
  }
}

on *:PART:*: {
  if ( $chan == %chan.1 ) {
    msg %chan.2 ( $+ $chan $+ ) PART : $nick
    msg %chan.3 ( $+ $chan $+ ) PART : $nick
  }
  if ( $chan == %chan.2 ) {
    msg %chan.1 ( $+ $chan $+ ) PART : $nick
    msg %chan.3 ( $+ $chan $+ ) PART : $nick
  }
  if ( $chan == %chan.3 ) {
    msg %chan.1 ( $+ $chan $+ ) PART : $nick
    msg %chan.2 ( $+ $chan $+ ) PART : $nick
  }
}

on *:JOIN:*: {
  if ( $nick != $me ) {
    if ( $chan == %chan.1 ) {
      msg %chan.2 ( $+ $chan $+ ) JOIN : $nick
      msg %chan.3 ( $+ $chan $+ ) JOIN : $nick
    }
    if ( $chan == %chan.2 ) {
      msg %chan.1 ( $+ $chan $+ ) JOIN : $nick
      msg %chan.3 ( $+ $chan $+ ) JOIN : $nick
    }
    if ( $chan == %chan.3 ) {
      msg %chan.1 ( $+ $chan $+ ) JOIN : $nick
      msg %chan.2 ( $+ $chan $+ ) JOIN : $nick
    }
  }
}

on *:KICK:*: {
  if ( $knick != $me ) {
    if ( $chan == %chan.1 ) {
      msg %chan.2 ( $+ $chan $+ ) KICK : $knick by $nick
      msg %chan.3 ( $+ $chan $+ ) KICK : $knick by $nick
    }
    if ( $chan == %chan.2 ) {
      msg %chan.1 ( $+ $chan $+ ) KICK : $knick by $nick
      msg %chan.3 ( $+ $chan $+ ) KICK : $knick by $nick
    }
    if ( $chan == %chan.3 ) {
      msg %chan.1 ( $+ $chan $+ ) KICK : $knick by $nick
      msg %chan.2 ( $+ $chan $+ ) KICK : $knick by $nick
    }
  }
}

on *:NICK:*: {
  if ( $chan == %chan.1 ) {
    msg %chan.2 ( $+ $chan $+ ) NICK : $nick as $newnick
    msg %chan.3 ( $+ $chan $+ ) NICK : $nick as $newnick
  }
  if ( $chan == %chan.2 ) {
    msg %chan.1 ( $+ $chan $+ ) NICK : $nick as $newnick
    msg %chan.3 ( $+ $chan $+ ) NICK : $nick as $newnick
  }
  if ( $chan == %chan.3 ) {
    msg %chan.1 ( $+ $chan $+ ) NICK : $nick as $newnick
    msg %chan.2 ( $+ $chan $+ ) NICK : $nick as $newnick
  }
}

Conclusion

Merci de me communiquer tout bug problème ...
  • signaler à un administrateur
    Commentaire de ISoKa le 24/10/2007 23:14:25

    Bonjour,

    vu comment c'est fait si ca parle bien sur les chans bonjour l'excess flood. pour chaque evenements tes action se ressemble bcp, pose des alias que tu appel ca rendra ton code plus court et propre. essai de le rendre parametrable aussi pck là on a aucun control sur quoi que soit.

  • signaler à un administrateur
    Commentaire de Cmd_Max13 le 02/05/2008 07:52:50

    Bonjour,

    C'est la première fois que je viens sur ce site de Codes-SourceS, et je trouve intéressant ce petit robot de liaison... Mais comment fait-on pour utiliser cette source, et comment fait-on pour utiliser ce bot ?

    Merci de votre aide !

Ajouter un commentaire

Discussions en rapport avec ce code source

Appels d'offres

Pub



CalendriCode

Mai 2008
LMMJVSD
   1234
567891011
12131415161718
19202122232425
262728293031 

Téléchargements

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

Boutique

Boutique de goodies CodeS-SourceS