// /adm/simul_efun/percent.c // from the Dead Souls mudlib // returns the percent one value is of another // created by Descartes of Borg 15 april 1993 float percent(mixed numerator, mixed denominator) { float a, b; if(!floatp(numerator) && !intp(numerator)) return 0.0; else a = (floatp(numerator) ? numerator : to_float(numerator)); if(!floatp(denominator) && !intp(denominator)) return 0.0; else b = (floatp(denominator) ? denominator : to_float(denominator)); if((b < 1 && b > -1) || !b || b == 0 || b == 0.0 ) return 0.0; return ((a/b)*100); }