verify script

[xlmpq]

Am aceste 2 scripturi :

bind bot -|- lastinfo           b:bind:bot:lastinfo

proc b:bind:bot:lastinfo {from cmd arg} {
	global settings botnick
	
	set chan [string tolower [lindex $arg 0]]
	set x    "[split [lindex $arg 1]] [split [lindex $arg 2]] [split [lindex $arg 3]] [split [lindex $arg 4]]"
	
	if { [string equal $settings(homechan) $chan]} {return}
	
	set text  ""
	set valid ""
	
if {![validchan $chan]} {if { [stats:channel -exists $chan]} {
	if { [stats:channel -get $chan purgewhom] != ""} {set text "$chan [stats:channel -get $chan purgetime] [stats:channel -get $chan purgewhom] [stats:channel -get $chan purgewhy]"; set valid -purge}
		} 
	} {
	if {[channel get $chan suspended]} {set text "$chan" ; set valid -suspended} {set text "$chan"; set valid -valid}
	}
	
	if {[llength $text]} {putbot $from "lastinfo:reply $x $settings(suppchan) $botnick $valid $text"}
putlog "verify from $from"

}
putlog "Verify Client Bot Script loaded"

Si al doilea este :

a:command -add verify   pub:verify   1728 000 v

bind bot -|- lastinfo:reply     b:bind:bot:lastinfo:reply

proc pub:verify {hand chan args x mix} {
	global settings  botnick
	
	set chan [string tolower $chan]
    	set nick [lindex $x 0]
	
	if { [string equal $settings(homechan) $chan]} {puthelp "PRIVMSG $settings(homechan) :$nick USAGE: !verify #channel"; return}
	set ask 0
	if {![validchan $chan]} { 
		set ask 1
		if { [stats:channel -exists $chan]} {  
			if { [stats:channel -get $chan purgewhom] != ""} {
puthelp "PRIVMSG $settings(homechan) :$nick \0034$chan\003 has been purged: \0032[join [ctime [stats:channel -get $chan purgetime]]]\003 by: \0032[stats:channel -get $chan purgewhom]\003 with reason: \0032[stats:channel -get $chan purgewhy]\003"}
			} else {a:tell $x 238}
	} else {
puthelp "PRIVMSG $settings(homechan) :$nick \0034$chan\003 is a valid channel which i'm on"}
	if {$ask} {putallbots "lastinfo $chan $x"}
	return ".."
}


proc b:bind:bot:lastinfo:reply {from cmd arg} {
global settings

	set arg [split $arg]	
	set botchan [lindex $arg 4]
	set bnick 	[lindex $arg 5]
	set what    [lindex $arg 6]
	set chan    [lindex $arg 7]
	if {[string equal -nocase $what -purge]} {
	set time    [join [ctime [lindex $arg 8]]]
	set by      [lindex $arg 9]
	set reason  [lrange $arg 10 end]
}
if {[string equal -nocase $what -suspended]} {
puthelp "PRIVMSG $settings(homechan) :[lindex $arg 0] \0032$bnick\003 @ \0034$botchan\003, says that \0034$chan\003 is \0032suspended\003";putlog "VERIFY: Got results from $from"} elseif {
[string equal -nocase $what -purge]} {
puthelp "PRIVMSG $settings(homechan) :[lindex $arg 0] \0032$bnick\003 @ \0034$botchan\003, says that \0034$chan\003 has been \0032purged\003 on \0032$time\003 by \0032$by\003 with the reason: \0032$reason\003";putlog "VERIFY: Got results from $from"} elseif {
[string equal -nocase $what -valid]} {
puthelp "PRIVMSG $settings(homechan) :[lindex $arg 0] \0032$bnick\003 @ \0034$botchan\003, says that he is on \0034$chan\003 and it's a \0032valid\003 channel";putlog "VERIFY: Got results from $from"} else {return 0}
	
}

return "verify module"

Primul script este pus pe toti eggdropii si are rolul de a oferi informatii catre al doilea script ( care este pus doar pe botul hub al celorlalti ) , iar prin comanda Mirc-Help verify #canal , butul hub ( in cazul meu Mirc-Help ) ofera informatii despre #canal si anume daca a fost vreun eggdrop linkat pe acel canal , daca a primit purge sau daca nu a fost deloc

PRoblema este ca la orice canal as da verify imi da asa :

[19:19] -Mirc-Help- FAILED: you specified an invalid channel (02#Fcnal for any help apply on #Mirc-Help

Pe vechiul a&a light mergea perfect , no bugs . pe a&a light 4.0 nu mai functioneaza :P Dc ?

[Alexik]

Scriptul foloseste stats deci trebuie adaptat pentru ultima versiune de a&a light. Ai mai cerut ajutor cu un script in genul astuia, inspira-te din raspuns e mai simplu decat crezi.

Succes!

[xlmpq]

am modificat din [::stats::channel -get ] cum era acolo in [stats:channel ... acolo a mers , aici nu a mers...

de fapt am pus direct scripturile modificate caci , inainte de a le posta , am modificat ca sa fie in concordanta cu noul a&a stats..

deci vreo solutie ceva ?