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.

DCC CHAT

Help for those learning Tcl or writing their own scripts.
Post Reply
M
M4ST3R26
Voice
Posts: 4
Joined: Sat Jun 17, 2006 2:55 pm

DCC CHAT

Post by M4ST3R26 »

Hi again ;)

i dunno if it's possible, i searched alot on the web but i can't find anything to help me :S

I want a trigger ( !read_info ), after that the eggdrop dcc chat the user ( ANY USER ), read the content of the $file and send it to the DCC CHAT window and close the chat window.

It's possible to do that or not ? If yes .. how ?!? i juste need the DCC CHAT part

Thanks ;)
User avatar
Alchera
Revered One
Posts: 3344
Joined: Mon Aug 11, 2003 12:42 pm
Location: Ballarat Victoria, Australia
Contact:

Post by Alchera »

Code: Select all

puthelp "privmsg $nick : your text here"
Add [SOLVED] to the thread title if your issue has been.
Search | FAQ | RTM
M
M4ST3R26
Voice
Posts: 4
Joined: Sat Jun 17, 2006 2:55 pm

Post by M4ST3R26 »

uhmmm ... ok i tryed this, when i type !read i get a dcc chat windows and the info is sent to the dcc chat windows ... in LOCAL, everything work fine, but if anyone else try it, the dcc chat failed .... PLZ ... help !!!

Code: Select all

set file "info.txt"
set dccport "1027-2048"

#----- Listing -----
proc dcclist {nick uhost hand chan arg} {
	global dccport
putserv "PRIVMSG $chan :Envoie de la liste a $nick en cours ... "
putserv "PRIVMSG $nick :\001DCC CHAT chat [myip] $dccport\001"
}
listen $dccport script dccsendinfo
proc deesendinfo {idx} {
	information $idx
}
proc information {idx} {
	global file
putdcc $idx "Information Index2 ;)"
	set fs [open "$file" r]
	while {![eof $fs]} {
		gets $fs line
  		putdcc $idx "$line"
	}
	close $fs 
return 1
}

Thanks !
Post Reply