/* Handle case where base is in same quadrant as starship */\r
if (batx==quadx && baty==quady) {\r
if (starch[batx][baty] > 999) starch[batx][baty] -= 10;\r
- quad[basex][basey]= IHDOT;\r
+ frozen.quad[basex][basey]= IHDOT;\r
basex=basey=0;\r
newcnd();\r
skip(1);\r
}\r
\r
/* handle initial nova */\r
- quad[ix][iy] = IHDOT;\r
+ frozen.quad[ix][iy] = IHDOT;\r
crmena(1, IHSTAR, 2, ix, iy);\r
prout(" novas.");\r
state.galaxy[quadx][quady] -= 1;\r
ii = hits[mm][1]+nn-2;\r
jj = hits[mm][2]+j-2;\r
if (ii < 1 || ii > 10 || jj < 1 || jj > 10) continue;\r
- iquad = quad[ii][jj];\r
+ iquad = frozen.quad[ii][jj];\r
switch (iquad) {\r
// case IHDOT: /* Empty space ends reaction\r
// case IHQUEST:\r
state.starkl++;\r
crmena(1, IHSTAR, 2, ii, jj);\r
prout(" novas.");\r
- quad[ii][jj] = IHDOT;\r
+ frozen.quad[ii][jj] = IHDOT;\r
break;\r
case IHP: /* Destroy planet */\r
state.newstuf[quadx][quady] -= 1;\r
finish(FPNOVA);\r
return;\r
}\r
- quad[ii][jj] = IHDOT;\r
+ frozen.quad[ii][jj] = IHDOT;\r
break;\r
case IHB: /* Destroy base */\r
state.galaxy[quadx][quady] -= 10;\r
newcnd();\r
crmena(1, IHB, 2, ii, jj);\r
prout(" destroyed.");\r
- quad[ii][jj] = IHDOT;\r
+ frozen.quad[ii][jj] = IHDOT;\r
break;\r
case IHE: /* Buffet ship */\r
case IHF:\r
skip(1);\r
break;\r
}\r
- iquad1 = quad[newcx][newcy];\r
+ iquad1 = frozen.quad[newcx][newcy];\r
if (iquad1 == IHBLANK) {\r
proutn(", blasted into ");\r
crmena(0, IHBLANK, 2, newcx, newcy);\r
}\r
proutn(", buffeted to");\r
cramlc(2, newcx, newcy);\r
- quad[ii][jj] = IHDOT;\r
- quad[newcx][newcy] = iquad;\r
+ frozen.quad[ii][jj] = IHDOT;\r
+ frozen.quad[newcx][newcy] = iquad;\r
kx[ll] = newcx;\r
ky[ll] = newcy;\r
kavgd[ll] = sqrt(square(sectx-newcx)+square(secty-newcy));\r
num = Rand()* (state.galaxy[nqx][nqy]%10) + 1;\r
for (nsx=1; nsx < 10; nsx++) {\r
for (nsy=1; nsy < 10; nsy++) {\r
- if (quad[nsx][nsy]==IHSTAR) {\r
+ if (frozen.quad[nsx][nsy]==IHSTAR) {\r
num--;\r
if (num==0) break;\r
}\r