| View previous topic :: View next topic |
| Author |
Message |
PrE
Voice
Joined: 14 Jan 2012
Posts: 10
|
 Posted: Sat Feb 18, 2012 7:36 pm Post subject: copy.tcl |
 |
|
anyone willing to code me script, its very simple.
Lets say i say
!copy Nick11
it will start copying what he said and re-send it to Nick11 through NOTICE
so everything he says in that chan is relayed to him through notice. |
|
| Back to top |
|
 |
Johannes13
Halfop
Joined: 10 Oct 2010
Posts: 46
|
| Posted: Sun Feb 19, 2012 8:16 pm Post subject: |
|
|
| Code: |
namespace eval ::copycat {
variable copytarget {}
bind pub - !copy [namespace current]::copytarget
bind pubm - * [namespace current]::copycat
proc copytarget {n u h c a} {
variable copytarget $a
}
proc copycat {n u h c a} {
variable copytarget
if {$n eq $copytarget} {
putnotc $n $a
}
}
}
|
|
|
| Back to top |
|
|
PrE
Voice
Joined: 14 Jan 2012
Posts: 10
|
| Posted: Mon Feb 20, 2012 3:08 pm Post subject: |
|
|
| thanks it works only on me, like if do it on my name, so like its only limited to my name can you make it so it works with any name? other then that its perfect. |
|
| Back to top |
|
|
Johannes13
Halfop
Joined: 10 Oct 2010
Posts: 46
|
| Posted: Mon Feb 20, 2012 5:06 pm Post subject: |
|
|
| You don't see the the copy, because the bot send it out through a NOTICE (as requested) to that user directly. |
|
| Back to top |
|
|
PrE
Voice
Joined: 14 Jan 2012
Posts: 10
|
| Posted: Mon Feb 20, 2012 5:20 pm Post subject: |
|
|
| oh yes it works, it was just because my nick-tab complete was adding a space at the end of the name, but is it possible to add stop copying? |
|
| Back to top |
|
|
Johannes13
Halfop
Joined: 10 Oct 2010
Posts: 46
|
| Posted: Mon Feb 20, 2012 6:30 pm Post subject: |
|
|
Just do !copy and it will stop  |
|
| Back to top |
|
|
|
FAQ
Search
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
