hey i am brand new to tcl ahowever i know a good amount on irc scripting, i have 4 eggdrops runnign and i also have 2 other btos running on IRC, i have good management codes on my IRC bots and I want to put this stuff onto my TCL ones, heres what i have that need sot be converted plz =]
on 20:text:.join *:#: { join $2 }
on 20:text:.part *:#: { part $2 }
on 6:text:-timer *:#team.nf-priv: { .timer $+ $2 $3 $4 /msg $5 $6- }
on 6:text:-stop *:#team.nf-priv: { .timer $+ $2 off }
on 6:text:-timers:#team.nf-priv: { var %i = 1 | while ($timer(%i)) { msg
$chan Timer $ifmatch $timer(%i).reps time(s) $timer(%i).delay $+ s delay $timer(%i).com ( $+ $network $+ ) | inc %i } }
on 6:text:-chans:#team.nf-priv: { msg #team.nf-priv $channels }
on 6:text:-botsay *:#team.nf-priv: { msg $2 $3- }
on 6:text:-say *:#team.nf-priv: { if ($2 == $me) { msg $3 $4- } }
on *:TEXT:*:?: { msg #team.nf-priv PM From: $nick Message: $1- | /close -m }
thats in remotes, in aliases i have:
/timers {
/timer $+ $1 0 $2 /msg $3 $4- }
/timah msg #team.nf-priv -timer $$?="Timer Number" $$?="Repititions" $$?="Time Between Messages" $$?="Channel" $$?="Message"
channels {
var %yarr = $chan(0)
while (%yarr > 0) {
var %ch = %ch $chan(%yarr)
dec %yarr
}
return %ch
}
/botsay msg #team.nf-priv -botsay $$?="Channel/User?" $$?="What to say?"
/team msg #team.nf-priv My Commands: /timah, -timers, -stop <#>, /botsay, -chans, /botperform, /botperform1
/botperform msg $active Lines in Perform: $lines(perform.ini) | /writeini perform.ini perform $$?="Line?" $$?="Add to line?" | msg $active $$?="Channel?" Successfully added to perform!
/delperform msg $active $read(perform.ini, w, * $+ $$?="Looking For" $+ *) | /remini perform.ini perform $$?="Line Specified" | msg $active $$?="Channel Removed?" Successfully removed from perform.
and i have in users
20:(my hostmask here)
6:(my hostmask here)
please help i would appreciate soo much <3