Script Help Please

[whittinghamj]

Could someone help me find out why this not working please.

Code: Select all

bind pub o !ftptest ftp:test
proc ftp:test {n u h c a} { 
set port [lindex $text 2]
 if {[catch {set ftp_test [socket -async $a $port]} sockerr]} { 
   putserv "privmsg $c :$a is 4OffLine" 
   } else { 
   putserv "privmsg $c :$a is 9OnLine" 
 } 
 close $ftp_test 
}

I am trying to have the dcript do the following

!ftptest host port
<bot> host is online

or

host is offline.

Could someone help me out on this one please

Cheers

[DragnLord]

try this:

Code: Select all

bind pub o !ftptest ftp:test
proc ftp:test {n u h c a} {
 if {[catch {set ftp_test [socket -async $a]} sockerr]} {
   putserv "privmsg $c :$a is 4OffLine"
   } else {
   putserv "privmsg $c :$a is 9OnLine"
 }
 close $ftp_test
}

should work for things like:
!ftptest ftp.some.host.net 6969

[Cletus]

This is better suited to the scripting help board isn't it? Oh well.

[whittinghamj]

hey drag,

That just returns offline all the time, there is no where to give the arg for the port eg !ftptest host port or !ftptest host:port

both return offline even tho I know that ftp is online.

any suggestions? cheers

[Alchera]

This is better suited to the scripting help board isn't it? Oh well.

After 67 posts you'd think the person posting would know.

Moved to: Scripting Help