tcl

^{Initiation au TCL pour eggdrop}

Debutons notre initiation par un programme simple pour nous metre dans le bain

Faire reagir l'egg a un mot ecrit sur l'irc:

Bind pub - salut pubsalut
#########################

Proc pubsalut {nick uhost channel arg }{
putserv "NOTICE $channel:bonjour $nick"
}

^{Quand un user tape le mot salut l'eggdrop repond bonjour ensuite le nick du user}
^{Détaillons ce script:} ^{La premiere ligne est chargée de verifier si le mot "salut" est tapé par un user,ce sont les binds.Il en existe plusieur ex. bind pub ,bind join; bind part etc. nous les découvriron au fur et à mesure de ce cours.}
^{Le - entre la ligne signifie que le egg prendra en compte le mot salut venant de n'importe quel utilisateur,on peut le remplacer par certain flags qui ne prendron en compte que les utilisateurs ayant ce flag ex. le flag m pour master, o pour operateur etc..}

^{La seconde partie "salut pubsalut" dit que si le mot salut est rencontrer le egg passe a la procedure "pubsalut",on peut bien sur metre n'importe quel non a la procédure ex. procsalut ou salut ou bonjour etc..}

^{La seconde ligne de ### et une separation pour la clareté du prog}
^{La troisième ligne est la procedure en question.}
^{Proc pour designer la procedure et procsalut sont nom.Entre { et },les variable qui sont initialisée par le egg au momment de l'appelle de la procedure.} ^{le nick du user qui a taper le mot,sont user host uhost, le chanel, et arg argument(pas neccessaire ici).} ^{Putserv pour envoyer au server en "NOTICE sur le canal $channel la phrase bonjour $nick",pour recuperer le contenu de la variable il faut la preceder de $ ,ex:si le nick qui a envoyer le mot est grosminet la variabla nick contiendra grosminet, la phrase sera donc "bonjour grosminet".}

Des question??? retrouver moi sur le chat ou sur le forum

A suivre........reponse a choix multiple