Language: EN FR PT ES NL DE SV RU
######################################################################
#                                                                    #
#====================================================================#
# gt-pugrelay.tcl by slackin                                           #
#====================================================================#
# Slackin's sqlmsg table relay companion for PugBot!                 #
# Custom written for #pugbot & GT                                    #
######################################################################
#                                                                    #
######################################################################
######################################################################
# Config section, please edit with                                   #
# proper info                                                        #
#--------------------------------------------------------------------#
#--------------------------------------------------------------------#
# End of config section                                              #
######################################################################
######################################################################
 
package req mysqltcl
bind bot - pugrelay relay_pug
 
proc relay_pug {bot gtmass param} {
	#putlog "relaying...."
	global db nick ignorelist
	set msgsend [lrange $param 3 end]
	set msgtype [lindex $param 0]
	set msgnetwork [lindex $param 1]
	set msgtarget [lindex $param 2]
	#putlog "$msgsend"
	#putlog "$msgtype"
	#putlog "$msgtarget"
	#putlog "$msgnetwork"
 
	foreach toignore $ignorelist {
		if {$msgtarget == $toignore} {
			return 0
		}
	}
	if {$msgtype == "msg" || $msgtype == $nick} {
		putserv "PRIVMSG $msgtarget :[join $msgsend]"
        } elseif {$msgtype == "notice"} {
		putserv "NOTICE $msgtarget :[join $msgsend]"
	} elseif {$msgtype == "raw"} {
		putquick "[join $msgsend]"
	} elseif {$msgtype == "kick"} {
		putlog "$msgsend"
		putlog "#pugbot +b $msgtarget"
		pushmode #pugbot +b $msgtarget 
	}
}
 
putlog "GT-pugrelay.tcl by slackin LOADED"