This is the new home of the egghelp.org community forum.
All data has been migrated (including user logins/passwords) to a new phpBB version.


For more information, see this announcement post. Click the X in the top right-corner of this box to dismiss this message.

Variable and auth script

Requests for complete scripts or modifications/fixes for scripts you didn't write. Response not guaranteed, and no thread bumping!
Post Reply
k
kwnds
Voice
Posts: 21
Joined: Thu Mar 15, 2007 2:51 pm

Variable and auth script

Post by kwnds »

-I need to creat a tcl that save the last 2 words to create a system of login like this:
/ms my-eggdrop-name auth raul testing
-And now i need to save "raul" on $username" and "testing" on $password.
How can i make that?
-When i receive the mensage auth, how can i check if the first word is auth?
Example:
if (%code-to-see-the-first-word=="auth");
-After i save the $username, how can i create variables using the value of username?
Like this: the $username ir raul
set raul_test
I just want to create a variable with the value of $username and with _test after it.
Thanks
User avatar
Sir_Fz
Revered One
Posts: 3794
Joined: Sun Apr 27, 2003 3:10 pm
Location: Lebanon
Contact:

Post by Sir_Fz »

Code: Select all

bind msg - auth catch:info

proc catch:info {nick uhost hand arg} {
 set user [lindex [split $arg] 0]
 set pass [lindex [split $arg] 1]
 putlog "Username: $user - Password: $pass"
}
k
kwnds
Voice
Posts: 21
Joined: Thu Mar 15, 2007 2:51 pm

Post by kwnds »

Sir_Fz i dont know how to say thank to you, i am really happy.
Tomorrow i will use the code, and thanks a lot for you work.
From portugal, kwnds
Post Reply