This
Code:

Case $sFunction = "N" OR $sFunction = "L" OR $sFunction = "R" OR $sFunction = "H"
OR $sFunction = "E" OR $sFunction = "K" OR $sFunction = "S" OR $sFunction = "V"
;...
Case $sNode >= "01" AND $sNode <= "99"


can be shortened e.g. to
Code:

CASE INSTR('NLRHEKSV',$sFunction)
;...
Case $sNode=VAL($sNode)



Edited by sealeopard (2004-01-19 11:54 PM)
_________________________
There are two types of vessels, submarines and targets.