Help on where to begin

2009-06-03T11:05:35-04:00

Code:

set text {  write some text here if like ..  that the command should write to the file}if {[catch {open file.txt 'w'} w]} {  #  # either puts $w $text  #  # or line by line  #  foreach {x} [split $text \n] {    puts $w $x  }   close $w}

it all depends, .. a is append w is write and r is read i see you use a .. depends what you want to do remember that w destroys all data currently stored in file.txt

Statistics: Posted by Ofloo — Wed Jun 03, 2009 11:05 am

Help on where to begin

2009-05-30T03:05:41-04:00

Hi I am kinda new to tcl and eggdrop scripting. I can do the basic bind and proc functions with little to no trouble.
I am working on a script now that writes certain text to a file.
Then allows that text to be searchable only allowing 10 results.

I have the gathering of the info just not sure how to do the searching part. I have tried to look at other searching script and got lost about half way through.

Here is what I have so far:

set pack_file_dir "scripts/custom/packs.txt"
set pack_list ""
set pack_list_chan ""
set pack_chan ""

bind pubm - *New* Log:Tor
bind pubm - !torsearch* Log:Tor

proc Log:Tor {nick host hand chan arg} {
global pack_file pack_file_dir
set pack_file [open $pack_file_dir a]
puts $pack_file $arg
close $pack_file
}

Thank You

Statistics: Posted by BlackTux — Sat May 30, 2009 3:05 am

egghelp/eggheads community

Help on where to begin

Help on where to begin