Saut de ligne
#9
Rebonjour,
le code de Crazycat marche t'il sur ce code que ma donner DJkenny ?

Code :
namespace eval speak {
   # variable contenant les mots à reconnaitre
   # on pourras utiliser des wildchar * ?
   variable bonjour {!test1 !test2}
   # variable contenant les réponses
   # on utilise %n pour pouvoir réécrire le pseudo plus tard
   variable reponse {"Ceci est le test 1" "Ceci est le test 2"}
}

bind pubm - * speak::bonjour

proc speak::bonjour {nick host hand chan text} {

   # on déclare les variable bonjour et réponse
   variable bonjour
   variable reponse

   # on debug le texte et on met tout en minuscules
   set text [stripcodes abcru $text]
   set text [string tolower $text]

   # on test si on trouve le texte dans la variable bonjour
   if {[lsearch $bonjour $text] != -1} {

      # on remplace %n par le pseudo
      set rep [string map [list %n $nick] $reponse]

      # on choisi une réponse aléatoire
      set index [rand [llength $rep]]
      set rep [lindex $rep $index]

      # on envoi la réponse choisie
      putserv "PRIVMSG $chan :$rep"

   # on ferme les \} qu on a ouvert plus haut
   }
}
Avertir


Messages dans ce sujet
Saut de ligne - par NesCrex - 17/03/2011, 18:20
RE: Saut de ligne - par djkenny - 17/03/2011, 19:42
RE: Saut de ligne - par CrazyCat - 17/03/2011, 22:03
RE: Saut de ligne - par djkenny - 17/03/2011, 23:07
RE: Saut de ligne - par CrazyCat - 18/03/2011, 10:01
RE: Saut de ligne - par djkenny - 18/03/2011, 14:11
RE: Saut de ligne - par NesCrex - 18/03/2011, 13:37
RE: Saut de ligne - par CrazyCat - 18/03/2011, 17:01
RE: Saut de ligne - par djkenny - 18/03/2011, 19:10
RE: Saut de ligne - par CrazyCat - 20/03/2011, 18:47
RE: Saut de ligne - par NesCrex - 18/03/2011, 17:29
RE: Saut de ligne - par NesCrex - 18/03/2011, 19:22
RE: Saut de ligne - par djkenny - 18/03/2011, 20:26
RE: Saut de ligne - par NesCrex - 18/03/2011, 20:43
RE: Saut de ligne - par djkenny - 18/03/2011, 22:50
RE: Saut de ligne - par djkenny - 19/03/2011, 01:04
RE: Saut de ligne - par Ixion - 20/03/2011, 22:57
RE: Saut de ligne - par NesCrex - 19/03/2011, 10:38
RE: Saut de ligne - par djkenny - 20/03/2011, 18:52
RE: Saut de ligne - par djkenny - 20/03/2011, 18:57
RE: Saut de ligne - par djkenny - 21/03/2011, 00:14
RE: Saut de ligne - par Ixion - 21/03/2011, 21:52
RE: Saut de ligne - par CrazyCat - 21/03/2011, 22:22

Atteindre :


Utilisateur(s) parcourant ce sujet : 1 visiteur(s)
Tchat 100% gratuit -Discutez en toute liberté