81 lines
3.1 KiB
Plaintext
81 lines
3.1 KiB
Plaintext
|
|
# parse the crossfire -m8 output
|
|
|
|
BEGIN {
|
|
crosscmd = crosscmd " 2>&1";
|
|
god = 0;
|
|
while (crosscmd | getline buff == 1) {
|
|
if(buff ~ /GOD/) { god++; gift[god] =0; name[god] = get_entry(buff,2," "); }
|
|
if(!god) continue;
|
|
if(buff ~ /enemy:/) enemy[god] = get_entry(buff,2," ");
|
|
if(buff ~ /aligned/) aligned[god] = get_entry(buff,2," ");
|
|
if(buff ~ /enemy_race/) erace[god] = get_entry(buff,2," ");
|
|
if(buff ~ /servant/) servant[god] = get_entry(get_entry(get_entry(buff,2,": "),1,")"),2"(");
|
|
if(buff ~ /Attacks:/) atype[god] = get_entry(get_entry(buff,2,": "),1,")");
|
|
if(buff ~ /Immune:/) immune[god] = get_entry(get_entry(buff,2,": "),1,")");
|
|
if(buff ~ /Prot:/) prot[god] = get_entry(get_entry(buff,2,": "),1,")");
|
|
if(buff ~ /Vuln:/) vuln[god] = get_entry(get_entry(buff,2,": "),1,")");
|
|
if(buff ~ /Attuned:/) attuned[god] = get_entry(get_entry(buff,2,": "),1,")");
|
|
if(buff ~ /Repelled:/) repelled[god] = get_entry(get_entry(buff,2,": "),1,")");
|
|
if(buff ~ /Denied:/) denied[god] = get_entry(get_entry(buff,2,": "),1,")");
|
|
if(buff ~ /Desc:/) desc[god] = get_entry(get_entry(buff,2,": "),1,",");
|
|
if(buff ~ /Priest/ || gift[god]) {
|
|
if(!buff) continue;
|
|
special[god,gift[god]++] = buff;
|
|
}
|
|
# printf(" %s \n", buff);
|
|
}
|
|
close(crosscmd);
|
|
for(i=1;i<=god;i++) {
|
|
printf("<table border=1 cellpadding=3 width=100%%><tr><th width=20%%>%s</th><td>%s</td></tr>\n", name[i], capitalize(desc[i]));
|
|
if(enemy[i]) printf("<tr><td>Enemy cult:</td><td>%s</td></tr>\n", enemy[i]);
|
|
# if(servant[i]) printf("<tr><td>Servant:</td><td>%s</td></tr>\n ", servant[i]);
|
|
if(aligned[i]) prt_var("<tr><td>Aligned race(s):",aligned[i],",",3);
|
|
if(erace[i]) prt_var("<tr><td>Enemy race(s): ",erace[i],",",3);
|
|
if(atype[i]) prt_var("<tr><td>Attacktype(s): ",atype[i],",",3);
|
|
if(immune[i]) prt_var("<tr><td>Immunity: ",immune[i],",",3);
|
|
if(prot[i]) prt_var("<tr><td>Protected: ",prot[i],",",3);
|
|
if(vuln[i]) prt_var("<tr><td>Vulnerable: ",vuln[i],",",3);
|
|
if(attuned[i]) prt_var("<tr><td>Attuned: ",attuned[i],",",3);
|
|
if(repelled[i]) prt_var("<tr><td>Repelled: ",repelled[i],",",3);
|
|
if(denied[i]) prt_var("<tr><td>Denied: ",denied[i],",",3);
|
|
for(j=1;j<gift[i];j++) {
|
|
if(j==1) printf("<tr><td>Added gifts/limits:</td><td> ");
|
|
if (j!=1) print(", ");
|
|
printf("%s",special[i,j]);
|
|
}
|
|
if (gift[i]!=0) print("</td></tr>\n");
|
|
print("</table><p>");
|
|
}
|
|
}
|
|
|
|
function prt_var (hstr,vstr,sep,len) {
|
|
printf("%s </td><td> ",hstr); prtlong(vstr,sep,len);
|
|
}
|
|
|
|
|
|
function get_entry (str,start,sep) {
|
|
nr = split(str, var, sep);
|
|
for(k=start;k<=nr;k++) {
|
|
if(var[k]==" ") continue;
|
|
break;
|
|
}
|
|
while(var[k] ~ /_/ ) { sub("_", " ", var[k]); }
|
|
return var[k];
|
|
}
|
|
|
|
function prtlong (str,sep,max) {
|
|
nr = split(str, var, sep);
|
|
printf("\n");
|
|
for(l=1;l<=nr;l++) {
|
|
if(var[l] == "(null)") var[l] = "None";
|
|
if(l==nr) printf("%s </td></tr>\n",capitalize(var[l]));
|
|
else printf("%s,",capitalize(var[l]));
|
|
}
|
|
}
|
|
|
|
function capitalize(str) {
|
|
return toupper(substr(str, 1, 1)) substr(str, 2);
|
|
}
|
|
|