IT WORKS! I don't know why, but I stuck this back into the middle
procedure start begin
variable who, cur_dmg_thresh, cur_dmg_resist, color, msg, m;
and it compiled and it works!
@Zorchar, @NovaRain, @Lexx - thank you for your time and patience. :drunk: