Put the list of centers into an .INI file and read it fromt here. Then you can cycle through them and you can easyly adapt your code. example:
code:
; .INI file
[192.168.0.0]
Call=function1
[192.168.1.0]
Call=function2

code:
$networkids=split(readprofilestring('file.ini','','')
$id=0
$done=0
do
if isinsubnet(@IPADDRESS0,$networkids[$id]
$function=readprofilestring('file.ini,$networkids[$id],'Call')
$rc=execute('$rc='+$function+'()')
$done=1
endif
until $id>ubound($networkids) or $done
if not $done
; unidentified network
endif

_________________________
There are two types of vessels, submarines and targets.