PortCheck2.0.tcl additions/changes help needed

[Crossfire]

Hi there. Im using this script to check the status of my game server.
The problem is, that server uses 3 ports. So i need to use 3 different commands to see if its completely up. e.g. !portcheck ipadress port1, then
!portcheck ipadress port2, and finally !portcheck ipadress port3.

Is there a way to add these 3 commands into 1 simple command, something like !status? And then show wich one of the ports has a problem, or not. Or a better / easier script for it
Here is the script in txt form for your ease.

Portcheck

Thanks in advance!

*if this was awnsered before, im sorry*

[awyeah]

Here is the public bind, you can use:

Code: Select all

bind pub n "!portcheck" my:proc

proc my:proc {nick uhost hand chan text} {
 #your stuff here
  return 0
}