Mise en forme de code: pensez à utiliser les balises [ tcl ] et [ /tcl ] (sans les espaces bien sûr) autour de vos codes tcl afin d'avoir un meilleur rendu et une coloration syntaxique. x


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
   }
}


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

Possibly Related Threads…
Thread Author Replies Views Last Post
  Récuperation de chaque ligne dans un .txt Epsilon 7 4,577 19/03/2017, 11:46
Last Post: CrazyCat
  [Demande] Modification d'une ligne précise d'un fichier loulou7593 4 4,792 30/10/2013, 17:01
Last Post: loulou7593
  Afficher les résultats sur une seule ligne ArKeNiS 3 4,727 25/09/2011, 14:24
Last Post: ArKeNiS
  Lire une ligne précise sur une page html BdS 7 7,777 03/10/2006, 21:58
Last Post: BdS

Forum Jump:


Users browsing this thread: 1 Guest(s)