egghelp/eggheads community Discussion of eggdrop bots, shell accounts and tcl scripts. 2002-06-06T18:10:00-04:00 https://forum.eggheads.org/app.php/feed/topic/1892 2002-06-06T18:10:00-04:00 2002-06-06T18:10:00-04:00 https://forum.eggheads.org/viewtopic.php?p=7746#p7746 <![CDATA[OK Guys As requested this is...]]> pretty please

Statistics: Posted by [Nero] — Thu Jun 06, 2002 6:10 pm

]]> 2002-06-06T16:43:00-04:00 2002-06-06T16:43:00-04:00 https://forum.eggheads.org/viewtopic.php?p=7744#p7744 <![CDATA[OK Guys As requested this is...]]>
Why are you comparing the line to the nick?

Also, don't use lindex on strings -- use split first.

Statistics: Posted by stdragon — Thu Jun 06, 2002 4:43 pm

]]> 2002-06-06T13:53:00-04:00 2002-06-06T13:53:00-04:00 https://forum.eggheads.org/viewtopic.php?p=7740#p7740 <![CDATA[OK Guys As requested this is...]]> set count 0
set POSTCOMMAND "SITE"
set tempnumber 0
set lasttempsite 0
set isopen 1
set chan "#abcd"
bind msg - $POSTCOMMAND postsite
set templist ""
######################
proc postsite {nick host hand arg} {
global chan templist isopen tempnumber siteip sitepath file
if {$isopen == 0} {
putquick "NOTICE $nick : Please Read the Topic !!, Bot is Currently Closed, Try Again Later."
} else {
set siteip [lindex $arg 0]
set sitepath [lindex $arg 1]
set sitelogin [lindex $arg 2]
set siteport [lrange $arg 3 end]
set file templist
set found 0

set fs [open $file r]
while {![eof $fs]} {
gets $fs line
if {$line == $siteip} { set found 1 }
}
close $fs
if {$found} {
puthelp "PRIVMSG $chan : its a Duplicate already in the templist!"
} else {
puthelp "PRIVMSG $chan : is OK & adding to templist"
}
}
}

the command for adding a new submission is
/msg botname SITE ftp://xxx.xxx.xxx.xxx /DIR Login/Pass :razz:ort


Good luck & ill love forever whoever can solve this mystery.


<font size=-1>[ This Message was edited by: [Nero] on 2002-06-06 11:54 ]</font>

<font size=-1>[ This Message was edited by: [Nero] on 2002-06-06 16:09 ]</font>

Statistics: Posted by [Nero] — Thu Jun 06, 2002 1:53 pm

]]>