while (serv_getln(buf, sizeof buf), strcmp(buf, "000")) {
extract_token(script_name, buf, 0, '|', sizeof script_name);
if ( (extract_int(buf, 1) == 0) && (strcasecmp(script_name, RULES_SCRIPT)) ) {
while (serv_getln(buf, sizeof buf), strcmp(buf, "000")) {
extract_token(script_name, buf, 0, '|', sizeof script_name);
if ( (extract_int(buf, 1) == 0) && (strcasecmp(script_name, RULES_SCRIPT)) ) {