BloodAndHonorRevised.js

/////////////////////////////////////////////////
/***********************************************/
var BloodAndHonor = {
    author: {
        name: "John C." || "Echo" || "SplenectomY",
		company: "Team Asshat" || "The Alehounds",
		contact: "[email protected]",
	},
	version: "0.8",
	gist: "https://gist.github.com/SplenectomY/097dac3e427ec50f32c9",
	forum: "https://app.roll20.net/forum/post/1477230/",
	wiki: "https://wiki.roll20.net/Script:Blood_And_Honor:_Automatic_blood_spatter,_pooling_and_trail_effects",
/***********************************************/
/////////////////////////////////////////////////
	
	// This value should match the size of a standard grid in your campaign
	// Default is 70 px x 70 px square, Roll20's default.
	tokenSize: 70,
	
	// If you have it installed, this will plug in TheAaron's isGM auth module,
	// which will make it so only the GM can use the !clearblood command
	// Change to "true" if you want to check for authorization
	useIsGM: false,
	
	// YOU MUST ADD YOUR OWN SPATTERS AND POOLS TO YOUR LIBRARY
	// AND GET THE IMAGE LINK VIA YOUR WEB BROWSER.
	// FOLLOW THE INSTRUCTIONS HERE:
	//  https://wiki.roll20.net/API:Objects#imgsrc_and_av...
	// You can add as many as you'd like to either category.
	// Spatters are also used for blood trails.
	spatters: [
		"https://s3.amazonaws.com/files.d20.io/images/5205/thumb.png?1336251791",
        "https://s3.amazonaws.com/files.d20.io/images/17252689/ffp4DUnkhVGqjzErZqDe8A/thumb.png?1458180613",
        "https://s3.amazonaws.com/files.d20.io/images/17252681/HFQD2W3CRFt9ulheP6_jIQ/thumb.png?1458180582",
        "https://s3.amazonaws.com/files.d20.io/images/17252673/DTm-ohwN_Jdhk13dCPqEVw/thumb.png?1458180559",
	],
	pools: [
		"https://s3.amazonaws.com/files.d20.io/images/17253108/pRxtDtszPkwvkFgRlN9cBg/thumb.png?1458181931",
        "https://s3.amazonaws.com/files.d20.io/images/17253758/7W5xqMFPPkfO5uFHArhNFA/thumb.png?1458183837",
        "https://s3.amazonaws.com/files.d20.io/images/17253763/dhBlV_AWzSHHr_BE0MXIgw/thumb.png?1458183856",
        "https://s3.amazonaws.com/files.d20.io/images/17253764/h0JxYxVf7wBmq9pRxlzPtg/thumb.png?1458183860",
        
	],
	chooseBlood: function chooseBlood(type) {
		if (type == "spatter") return BloodAndHonor.spatters[randomInteger(BloodAndHonor.spatters.length) - 1];
		if (type == "pool") return BloodAndHonor.pools[randomInteger(BloodAndHonor.pools.length) - 1];
	},
	getOffset: function getOffset() {
		if (randomInteger(2) == 1) return 1;
		else return -1;
	},
	bloodColor: function bloodColor(gmnotes) {
		if (gmnotes.indexOf("bloodcolor_purple") !== -1) return "#0000ff";
		if (gmnotes.indexOf("bloodcolor_blue") !== -1) return "#00ffff";
		if (gmnotes.indexOf("bloodcolor_orange") !== -1) return "#ffff00";
		else return "transparent"
	},
	createBlood: function createBlood(gPage_id,gLeft,gTop,gWidth,gType,gColor) {
		gLeft = gLeft + (randomInteger(Math.floor(gWidth / 2)) * BloodAndHonor.getOffset());
		gTop = gTop + (randomInteger(Math.floor(gWidth / 2)) * BloodAndHonor.getOffset());
		setTimeout(function(){
			toFront(fixedCreateObj("graphic",{
				imgsrc: gType,
				gmnotes: "blood",
				pageid: gPage_id,
				left: gLeft,
				tint_color: gColor,
				top: gTop,
				rotation: randomInteger(360) - 1,
				width: gWidth,
				height: gWidth,
				layer: "map",
			}));
		},50);
	},
	timeout: 0
};




fixedCreateObj = (function () {
	return function () {
		var obj = createObj.apply(this, arguments);
			if (obj && !obj.fbpath) {
				obj.fbpath = obj.changed._fbpath.replace(/([^\/]*\/){4}/, "/");
			}
		return obj;
	};
}());




on("ready", function() {
    
    var handleTimeout = function() {
        if(BloodAndHonor.timeout > 0) {
            BloodAndHonor.timeout = BloodAndHonor.timeout - 1;
        }
        setTimeout(handleTimeout, 1000);
    };
    
    handleTimeout();

	on("change:graphic:bar3_value", function(obj, prev) {
		if (obj.get("bar3_max") === "" || obj.get("layer") != "objects" || (obj.get("gmnotes")).indexOf("noblood") !== -1) return;
		// Create spatter near token if "bloodied".
		// Chance of spatter depends on severity of damage
		else if (obj.get("bar3_value") <= obj.get("bar3_max") / 2 && prev["bar3_value"] > obj.get("bar3_value") && obj.get("bar3_value") > 0) {
			if (randomInteger(obj.get("bar3_max")) > obj.get("bar3_value")) {
				var bloodMult = 1 + ((obj.get("bar3_value") - prev["bar3_value"]) / obj.get("bar3_max"));
				BloodAndHonor.createBlood(obj.get("_pageid"), obj.get("left"), obj.get("top"), Math.floor(BloodAndHonor.tokenSize * bloodMult), BloodAndHonor.chooseBlood("spatter"), BloodAndHonor.bloodColor(obj.get("gmnotes")));
			}
		}
		// Create pool near token if health drops below 1.
		else if (obj.get("bar3_value") <= 0) {
			BloodAndHonor.createBlood(obj.get("_pageid"), obj.get("left"), obj.get("top"), Math.floor(BloodAndHonor.tokenSize * 1.5), BloodAndHonor.chooseBlood("pool"), BloodAndHonor.bloodColor(obj.get("gmnotes")));
		}
	});




//Make blood trails, chance goes up depending on how injured a token is
	on("change:graphic:lastmove", function(obj) {
		if (BloodAndHonor.timeout == 0) {
			if (obj.get("bar3_value") <= obj.get("bar3_max") / 2 && (obj.get("gmnotes")).indexOf("noblood") == -1) {
				if (randomInteger(obj.get("bar3_max")) > obj.get("bar3_value")) {
					BloodAndHonor.createBlood(obj.get("_pageid"), obj.get("left"), obj.get("top"), Math.floor(BloodAndHonor.tokenSize / 2), BloodAndHonor.chooseBlood("spatter"), BloodAndHonor.bloodColor(obj.get("gmnotes")));
					BloodAndHonor.timeout += 2;
				}
			}
		}
	});
	
	on("chat:message", function(msg) {
		if (msg.type == "api" && msg.content.indexOf("!clearblood") !== -1) {
			if (BloodAndHonor.useIsGM && !isGM(msg.playerid)) {
				sendChat(msg.who,"/w " + msg.who + " You are not authorized to use that command!");
				return;
			} else {
				objects = filterObjs(function(obj) {	
					if(obj.get("type") == "graphic" && obj.get("gmnotes") == "blood") return true;
					else return false;
				});
				_.each(objects, function(obj) {
					//obj.set("left",0); obj.set("top",0);
                    obj.remove();
				});
			}
		}
	});
});