egghelp/eggheads community

load scripts

2004-07-19T13:00:50-04:00

Here is an even better code, It loads all scripts and if there is an error, it will do it will skip the script and tell u in a putlog

"ERROR: the following error occured while evaluating ${script}: $error"

Here it is

Code:

foreach script [glob scripts/*] {  if {(![file isdirectory $script]) && ([regexp {^(.+)\.tcl$} $script])} {    catch {source $script} error    if {$error != ""} {      putlog "ERROR: the following error occured while evaluating ${script}: $error"    }  }}

ps. put this at the end of the eggdrop.conf
All credits go to perplexa for this script

Statistics: Posted by metroid — Mon Jul 19, 2004 1:00 pm

load scripts

2004-07-18T23:26:27-04:00

All files will have different names. You can't have 2 files with the same names, case-letters and extensions. They would cease to exist.

As for the names, all your tcl files have *.tcl extensions, so what ever names they have, or which ever case letters, this foreach loop will execute and load them, no matter what names/cases letters they have. So all scripts in your /scripts dir with the exention .tcl will be loaded.

As for sorting them alphabetically with respect to increasing or decreasing first letter of file names, you can use lsort.

To my knowledge what I have learned a few days ago.
Lsort can be use in such a way.

If I am right, this should be it.
For increasing alphabetical sequence or decreasing alphabetical sequence.

Code:

#Will sort and load the files from alphabetically increasing first letters of file names#(A to Z)[lsort -dictionary -increasing [glob $scriptdir\*.tcl]]#Will sort and load the files from alphabetically decreasing first letters of file names#(Z to A)[lsort -dictionary -decreasing [glob $scriptdir\*.tcl]]

For more switches on lsort. See the tcl manual with reference to the lsort function.

Statistics: Posted by awyeah — Sun Jul 18, 2004 11:26 pm

load scripts

2004-07-18T17:04:06-04:00

It will load any tcl script in the dir specified.

if you want to load the scripts in a particular order, you can for example do

Code:

set scriptdir scr/foreach script [lsort -dictionary [glob $scriptdir\*.tcl]] { source $script}

and it will load them in alphabetic order.

Statistics: Posted by greenbear — Sun Jul 18, 2004 5:04 pm

no or yes

2004-07-18T16:39:03-04:00

yes but if the scripts have diferent names it don't work and if i whant to start the scripts in a order that funtion even not

Statistics: Posted by K — Sun Jul 18, 2004 4:39 pm

load scripts

2004-07-18T13:59:31-04:00

Nice useful code, gb. Might come in handy for me as well. I have many files, but I put all into one, like 400kb, but when I modify my scripts (almost like daily or so) then I have to upload all the 400kb, so I've split them again into smaller pieces, heh. I'll try it out as well.

Statistics: Posted by awyeah — Sun Jul 18, 2004 1:59 pm

load scripts

2004-07-18T13:22:59-04:00

Just add this to the end of your config file, and it'll load any *.tcl script inside the 'src/' dir

Code:

set scriptdir scr/foreach script [glob $scriptdir\*.tcl] {  source $script}

Statistics: Posted by greenbear — Sun Jul 18, 2004 1:22 pm

load scripts

2004-07-18T12:42:08-04:00

if i have in dir scr 10 scripts file and i whant to load all these files with one command in eggdrop.conf
not like:

Code:

source scr/script1.tclsource scr/script2.tcl...

and so one i wonder if is psobile to make a script and you add the lines in the scripts and add only that script to eggdrop.conf

Code:

source scr/alscripts.tcl

Statistics: Posted by K — Sun Jul 18, 2004 12:42 pm