en gros, je ferai un:
set user [string trim [lindex $arg 0] :]
set nick [lindex [split $user !] 0]
set nick2 [lindex [split nick |] 0]
Et je fais:
"csauth", verif nick2, si ok => $nick est csauth
si j'ai bien tout saisi
(merci du temps que tu passes sur la Board)
set user [string trim [lindex $arg 0] :]
set nick [lindex [split $user !] 0]
set nick2 [lindex [split nick |] 0]
Et je fais:
"csauth", verif nick2, si ok => $nick est csauth
si j'ai bien tout saisi
(merci du temps que tu passes sur la Board)
[Image: http://www.web-modules.net/upload/cache/...156/61.gif]
[ www.Ahinu.tk ]
Programmation TCL interprété via Eggdrop + package mysqltcl
=> TCL+SQL~PHP
@Nordnet.
[ www.Ahinu.tk ]
Programmation TCL interprété via Eggdrop + package mysqltcl
=> TCL+SQL~PHP
@Nordnet.