question debutant
#9
tcl:
#avec ce script tcl je veux créer un tableau qui contien 2 colones une pour id et l'autre pour pseudo
#et de remplir les colones id et pseudo à chaq foi que qlq1 tappe !tab (déclancheur) et d'afficher les contenu du tableau dans le canal( en respectant #le test if )
# ca marche pa, svp besoin d'aide

bind pub - !tab pub:testtab
proc pub:testtab { nick uhost handle arg channel } {
set i 1
set id 1
set [array size tabpseudo] 30
set pseudo 20
set pseudoch $arg
for {set i 1} {i<[array size tabpseudo]} {incr i} {
array set tabpseudo(i,1) $id
array set tabpseudo(i,2) $pseudo
set search [array get $tabpseudo (i,2)]
if { [string match $search $pseudoch] } {
array set tabpseudo([exper [array size tabpseudo] + 1],1) $id
array set tabpseudo([exper [array size tabpseudo] + 1],2) $pseudoch
putserv "PRIVMSG $channel : client avec l'id [array get $tabpseudo($i,1)] et de pseudo [array get $tabpseudo($i,2)]"
}
}
}
Répondre Avertir


Messages dans ce sujet
question debutant - par marawam - 21/10/2009, 16:45
RE: question debutant - par CrazyCat - 21/10/2009, 16:57
RE: question debutant - par marawam - 22/10/2009, 11:56
RE: question debutant - par marawam - 22/10/2009, 18:47
RE: question debutant - par CrazyCat - 22/10/2009, 21:55
RE: question debutant - par marawam - 23/10/2009, 18:18
RE: question debutant - par CrazyCat - 25/10/2009, 17:19
RE: question debutant - par marawam - 28/10/2009, 13:59
RE: question debutant - par marawam - 02/11/2009, 16:52

Atteindre :


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