I've already got stuck reading manuals and having no progress in scripting. So I decided to ask somebody to write a complete tcl script for me because: a) I've read lots of manuals and it made almos no effect for me; I'm still green in it b) I need only single TCL script, it is no matter to continue wasting health and time for reading manuals.
So now I'll try to describe my script.
The script watches the channel #main for joins. If a user having ident "cht-v3.1" joins the channel, the script sends him a file called vkt.ini and puts that user's IP in some kind of list (it sais that this user has already received this file) and when somebody joins again from the same IP, the script won't send the file again.
I tried to write this kind of script in mIRC (it doesn't work properly but maybe it would help you to understand what I want)
ON *:JOIN:#Main:{
if (( %send. [ $+ [ $address($nick,2) ] ] == $null ) && ( cht-v3.1 isin $address )) {
.dcc send -c $nick c:\vkt.ini
.set %send. [ $+ [ $address($nick,2) ] ] sent
}
}
else { }
Is it difficult to write a script in a scripting-language you know well? This is a small detail for some gurus but for me is very important. I hope to get help. ThanksStatistics: Posted by hide — Mon Dec 29, 2003 3:22 pm
]]>