Repositorio de scripts de irc.terrachat.cl desde los canales #TRAFFIC y #LATINWAREZ.
⬅️ Volver####### Set your channel
# su canal donde estara activa la tcl, puede usar muchos canales ejemplo #micanal1 #micanal2
set send_chans "#MP3PASSION #TRAFFIC"
# Set Timer one line after X mins
# tiempo de lanzamiento por lineas es por minutos defina por defecto esta cada 2 minutos
set send_time "5"
# Set Your Messages. You can insert more messages caz is every X min an random message from the list..
# coloque abajo los mensajes que lanzara el bot en tu canal
set send_msg {
"!new"
"To see what I share type in the 4@Mp3xAriela channel and I'll send you my list!!"
"EX: 4/say @locator Billy Esteban | Aparecer� o resultado em seu PVT voc� pegue e cole no canal..: Ex: 4!Mp3xAriela Billy Esteban - Fly With Me.mp3"
"Is there a bad pack4? ... send a message to some (4@) Channel Operator."
"Hi! Do you have something to offer? We are looking for routers, dedicated servers, minimum load servers of 50mbs. 4Interested? ...send a private to a channel operator."
"Please Tell Your Friends About This Chan, And Tell Them To Join! More Users = 4More Servers."
"Please Report Any 4Spam Or Invite Messages To A Channel OP."
"Having problems opening rar files4? Use 7Zip or 4update your WinRar."
"When searching for a tune try to include the album title, makes it easier to find."
"Collect what you want - No limit in #Mp3Passion"
"If your server doesn't work please turn it off!"
"Please only copy/paste 4 or 5 mp3s at a time in to the channel so you dont flood our servers."
}
#########################################
#!!!!!!DO NOT EDIT AFTER THIS LINE!!!!!!#
#########################################
if {![string match "*time_send*" [timers]]} {
timer $send_time time_send
}
# set a global variable to track the next line to say #
if {![info exists send_next]} { set send_next 0 }
proc time_send {} {
global send_msg send_chans send_time send_next
# save the msg line to say now #
set nextline [lindex $send_msg $send_next]
# and advance the global var to the next msg line number #
incr send_next
if {$send_next >= [llength $send_msg]} { set send_next 0 }
if {$send_chans == "*"} {
set send_temp [channels]
} else {
set send_temp $send_chans
}
foreach chan $send_temp {
puthelp "PRIVMSG $chan :$nextline"
}
# move the timer set and return to outside of the foreach loop #
timer $send_time time_send
return 1
}
👁️ 5 vistas • 📥 0 descargas