WARP
Param.damprob[WARP] = 70; /* warp drive 7.0% */
damage(WARP, (frac + 1.0) * Ship.warp * (franf() + 0.25) * 0.20);
if (damaged(WARP))
out(WARP);