eastern-flames/eastern flames/scripts/mod_negative/mod_negative.gml

function mod_negative(val, modval) {
	if val < 1 {
		while val < 0 {
			val += modval;
		}
		return val;
	} else {
		return val % modval;
	}
}