![]() |
|
|
#1 (permalink) |
|
Member
Join Date: Jun 2004
Location: In the NeXuS
Posts: 160
Rep Power: 38 ![]() |
vreau sa fac urmatorul cod sa functioneze:
Code:
set home "#chan"
bind link - * bot:link
bind disc - * bot:disc
proc bot:link {botname via} {
global home
puthelp "PRIVMSG $home : $botname just joined the botnet"
return "..."
}
proc bot:disc {botname} {
global home
puthelp "PRIVMSG $home : $botname just disconnected the botnet"
return "..."
}
![]() se poate face cumva asa ceva ? |
|
|
|
|
|
#4 (permalink) |
|
Administrator
aka aqwzsx |
Simplu, faci un bind care sa fie executat fiecare minuta, daca in aceasta minuta sau conectat/deconectat boti - el spune pe $home, in caz contrariu tace
Code:
bind time - "* * * * *" 01:minutes
proc 01:minutes {min hour day month year} {
global home botnet
if { [llength $botnet(linked)]} {puthelp "PRIVMSG $home : $botnet(linked) joined the botnet"; set botnet(linked) ""}
if { [llength $botnet(unlinked)]} {puthelp "PRIVMSG $home : $botnet(unlinked) disconnected the botnet"; set botnet(unlinked) ""}
}
if {![info exists set botnet(linked)]} {set botnet(linked) ""}
if {![info exists set botnet(unlinked)]} {set botnet(unlinked) ""}
Code:
proc bot:link {botname via} {
global botnet
lappend botnet(linked) $botname
}
proc bot:disc {botname} {
global botnet
lappend botnet(unlinked) $botname
}
|
|
|
|
![]() |
| Bookmarks |
| Currently Active Users Viewing This Thread: 1 (0 members and 1 guests) | |
| Thread Tools | |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Thread Starter | Forum | Replies | Last Post |
| !link | ccameleon | Tcl scripting | 1 | 20-01-2007 08:30 |
| problema de link | lsn | Eggdrop | 6 | 11-01-2005 01:10 |
| Link | Erised | Eggdrop | 3 | 14-06-2004 12:13 |