index.js

String.prototype.clr = function(p1) {
	return `<font color='#${p1}'>${this}</font>`;
};

const path = require('path'),
	fs = require('fs');

module.exports = function ff(mod) {
	const _m = {
		h: [],
		b: [],
		x: [],

		u1: 999999999,
		u2: 899999999
	};

	try {
		_m.c = require('./config.json');
	}
	catch (event) {
		_m.c = {
			enable: true,
			debug: false,
			range: 25,
			angle: 0.261799,
			distance: 150,
			direction: 1,
			cooldown: 4000,
		};
		fs.writeFile(path.join(__dirname, 'config.json'), JSON.stringify(_m.c, undefined, '\t'), () => {
			mod.log(`Generated a new config.json.`);
		});
	}

	mod.hook('S_LOGIN', 14, ({ templateId }) => {
		_m.m = [1, 10].includes(_m.i = (templateId - 10101) % 100) ? 1 : [6, 7].includes(_m.i) ? 0 : -1;	
		_m.g = [{ gameId: mod.game.me.gameId }];

		if (_m.c.enable) {
			load();
		}
	});

	mod.game.on('leave_game', () => {
		unload();
	});

	mod.command.add(['jaunt'], (p1, p2, p3) => {
		switch (p1 ? p1 = p1.toLowerCase() : p1) {
			case undefined:
				if ((_m.c.enable = !_m.c.enable) === true) {
					load();
				}
				else {
					unload();
				}
				return mod.command.message(`Module ${_m.c.enable ? 'enabled'.clr('15FF02') : 'disabled'.clr('FF0202')}.`);
			case 'on':
				if (_m.c.enable) {
					return mod.command.message(`Module is already enabled.`.clr('FF0202'));
				}
				load();
				return mod.command.message(`Module ${(_m.c.enable = !_m.c.enable) === true ? 'enabled.'.clr('15FF02') : ''}`);
			case 'off':
				if (!_m.c.enable) {
					return mod.command.message(`Module is already disabled.`.clr('FF0202'));
				}
				unload();
				return mod.command.message(`Module ${(_m.c.enable = !_m.c.enable) === false ? 'disabled.'.clr('FF0202') : ''}`);
			case 'debug':
				if (p2) {
					switch (p2) {
						case 'i':
							return mod.command.message(`Debug: _m.i = ${_m.i = p3}`);
						case 'm':
							return mod.command.message(`Debug: _m.m = ${_m.m = p3}`);
					}
				}
				return mod.command.message(`Module debugging ${(_m.c.debug = !_m.c.debug) === true ? 'enabled.'.clr('15FF02') : 'disabled.'.clr('FF0202')}`);
			case 'unstuck':
				mod.send('C_PLAYER_LOCATION', 5, Object.assign({}, _m.p, { loc: _m.s, w: 0, dest: _m.s, type: 7, time: _m.p.time - _m.t + Date.now() - 50 }));
				mod.send('S_INSTANT_MOVE', 3, { gameId: mod.game.me.gameId, loc: _m.s, w: 0 });
				setTimeout(() => {
					if ((_m.s.z - _m.p.loc.z) > 100) {
						let v1 = Object.assign({}, _m.s, { z: _m.s.z + 100 });

						mod.send('C_PLAYER_LOCATION', 5, Object.assign({}, _m.p, { loc: v1, w: 0, dest: v1, type: 7, time: _m.p.time - _m.t + Date.now() - 50 }));
						mod.send('S_INSTANT_MOVE', 3, { gameId: mod.game.me.gameId, loc: v1, w: 0 });
					}
				}, 50);
				return;
			default:
				if (!p2) {
					return mod.command.message(`No parameter.`.clr('FF0202'));
				}
				else if (isNaN(p2)) {
					return mod.command.message(`${p2} is an invalid parameter.`.clr('FF0202'));
				}

				switch (p1) {
					case 'range':
						_m.c.range = parseInt(p2);
						if (_m.c.range < 0) {
							mod.command.message(`Range out of bounds, defaulted to ${_m.c.range = 25}m.`.clr('FF0202'));
						}
						else {
							mod.command.message(`Range set to ${_m.c.range}m.`);
						}
						break;
					case 'angle':
						_m.c.angle = parseFloat(p2);
						if (_m.c.angle < 0.0872665 || _m.c.angle > 6.28318) {
							mod.command.message(`Angle out of bounds, defaulted to 15°(${_m.c.angle = 0.261799}).`.clr('FF0202'));
						}
						else {
							mod.command.message(`Angle set to ${_m.c.angle}.`);
						}
						break;
					case 'distance':
						_m.c.distance = parseInt(p2);
						if (_m.c.distance < 100 || _m.c.distance > 150) {
							mod.command.message(`Distance out of bounds, defaulted to ${_m.c.distance = 150}.`.clr('FF0202'));
						}
						else {
							mod.command.message(`Distance set to ${_m.c.distance}.`);
						}
						break;
					case 'direction':
						_m.c.direction = parseInt(p2);
						if (![-1, 1].includes(_m.c.direction)) {
							mod.command.message(`Direction out of bounds, defaulted to backwards(${_m.c.direction = -1}).`.clr('FF0202'));
						}
						else {
							mod.command.message(`Direction set to ${_m.c.direction}.`);
						}
						break;
					case 'cooldown':
						_m.c.cooldown = parseInt(p2);
						if (_m.c.cooldown < 500) {
							mod.command.message(`Cooldown out of bounds, defaulted to ${_m.c.cooldown = 4000}ms.`.clr('FF0202'));
						}
						else {
							mod.command.message(`Cooldown set to ${_m.c.cooldown}.`);
						}
						break;
					default:
						return mod.command.message(`${p1} is an invalid parameter.`.clr('FF0202'));
				}
		}
		fs.writeFile(path.join(__dirname, 'config.json'), JSON.stringify(_m.c, undefined, '\t'), () => {
			mod.log(`Saved changes to config.json.`);
		});
	});

	function load() {
		function hook() {
			_m.h.push(mod.hook(...arguments));
		}

		function update(p1, p2, p3) {
			for (let i in _m.b) {
				if (_m.b[i].gameId === p1) {
					_m.b[i].loc = p3;
					_m.b[i].w = p2;
				}
			}
		}

		hook('S_SPAWN_NPC', 12, { order: 300, filter: { fake: null } }, ({ gameId, loc, w, templateId, visible, villager, bySpawnEvent, bgTeam }) => {
			if (!visible || villager || bySpawnEvent || bgTeam || [1044, 1045, 1151, 1270, 1709, 1710, 1711, 1712, 5003, 5004, 9996, 9997, 9998, 2041, 2042, 2043, 2100, 4101].includes(templateId)) return;

			_m.b.push({ gameId, loc, w });
			if (_m.c.debug) {
				mod.log(
					`\nS_SPAWN_NPC:` +
					`\ntemplateId = ${templateId}`
				);
			}
		});

		hook('S_USER_EFFECT', 1, { order: 300, filter: { fake: null } }, ({ target, source }) => {
			if (_m.g.some(e => e.gameId === target) && !_m.b.some(e => e.gameId === source)) {
				_m.b.push({ gameId: source });

				mod.command.message('S_USER_EFFECT');	//! DEL
			}
		});

		hook('S_NPC_LOCATION', 3, { order: 300, filter: { fake: null } }, ({ gameId, w, dest }) => {
			if (_m.b.some(e => e.gameId === gameId)) {
				update(gameId, w, dest);

				if (_m.c.debug) {
					if ((_m.a1 = _m.a1 || dest) !== dest && (_m.d = Math.floor(((dest.x - _m.p.loc.x) ** 2 + (dest.y - _m.p.loc.y) ** 2) ** 0.5 / 25)) < 35) {
						mod.send('S_DESPAWN_DROPITEM', 4, { gameId: _m.u2 });
						mod.send('S_SPAWN_DROPITEM', 8, { gameId: --_m.u2, loc: Object.assign({}, dest, { z: dest.z - 500 }), item: 88704, amount: 1, expiry: 0, explode: false, masterwork: false, enchant: 0, source: 0, debug: false, owners: [{ id: 0 }] });
					}
				}
			}
		});

		hook('S_ACTION_STAGE', 9, { order: 300, filter: { fake: null } }, ({ gameId, w, loc }) => {
			if (_m.b.some(e => e.gameId === gameId)) {
				update(gameId, w, loc);

				if (_m.c.debug) {
					if ((_m.a2 = _m.a2 || loc) !== loc && (_m.d = Math.floor(((loc.x - _m.p.loc.x) ** 2 + (loc.y - _m.p.loc.y) ** 2) ** 0.5 / 25)) < 35) {
						mod.send('S_DESPAWN_DROPITEM', 4, { gameId: _m.u2 });
						mod.send('S_SPAWN_DROPITEM', 8, { gameId: --_m.u2, loc: Object.assign({}, loc, { z: loc.z - 500 }), item: 88704, amount: 1, expiry: 0, explode: false, masterwork: false, enchant: 0, source: 0, debug: false, owners: [{ id: 0 }] });
					}
				}
			}
		});

		hook('S_ACTION_END', 5, { order: 300, filter: { fake: null } }, ({ gameId, w, loc }) => {
			if (_m.b.some(e => e.gameId === gameId)) {
				update(gameId, w, loc);

				if (_m.c.debug) {
					if ((_m.a3 = _m.a3 || loc) !== loc && (_m.d = Math.floor(((loc.x - _m.p.loc.x) ** 2 + (loc.y - _m.p.loc.y) ** 2) ** 0.5 / 25)) < 35) {
						mod.send('S_DESPAWN_DROPITEM', 4, { gameId: _m.u2 });
						mod.send('S_SPAWN_DROPITEM', 8, { gameId: --_m.u2, loc: Object.assign({}, loc, { z: loc.z - 500 }), item: 88704, amount: 1, expiry: 0, explode: false, masterwork: false, enchant: 0, source: 0, debug: false, owners: [{ id: 0 }] });
					}
				}
			}
		});

		hook('S_DESPAWN_NPC', 3, { order: 300, filter: { fake: null } }, ({ gameId }) => {
			for (let i in _m.b) {
				if (_m.b[i].gameId === gameId) {
					_m.b.splice(i, 1);
				}
			}
		});

		hook('C_START_INSTANCE_SKILL', 7, { order: -100 }, ({ skill, loc, w, targets }) => {
			if (skill.id !== 60401301 || (!mod.game.me.inCombat && targets[0])) return;

			Object.assign(skill, { type: 0, npc: false, huntingZoneId: 0, reserved: 0 });
			mod.send('S_CANNOT_START_SKILL', 4, { skill });

			if (_m.z) {
				if (!_m.x[2]) {
					_m.x.push('!');

					(function(p1, p2) {
						return () => {
							if (_m.c.debug) {
								mod.send('S_DESPAWN_DROPITEM', 4, { gameId: _m.u1 });
								mod.send('S_SPAWN_DROPITEM', 8, { gameId: --_m.u1, loc: Object.assign(p1[0], { z: p1[0].z - 500 }), item: 88704, amount: 1, expiry: 0, explode: false, masterwork: false, enchant: 0, source: 0, debug: false, owners: [{ id: 0 }] });
								setTimeout(
									(function(p1) {
										return () => mod.send('S_DESPAWN_DROPITEM', 4, { gameId: p1 });
									}(_m.u1)), _m.c.cooldown - (Date.now() - p1[1]) + 50);
							}
							else {
								mod.send('C_PLAYER_LOCATION', 5, Object.assign({}, _m.p, { loc: p1[0], w: p2, dest: p1[0], type: 7, time: _m.p.time - _m.t + Date.now() - 50 }));
								mod.send('S_INSTANT_MOVE', 3, { gameId: mod.game.me.gameId, loc: p1[0], w: p2 });
								setTimeout(() => {
									if ((p1[0] && p1[0].z - _m.p.loc.z) > 100) {
										mod.send('C_PLAYER_LOCATION', 5, Object.assign({}, _m.p, { loc: Object.assign(p1[0], { z: p1[0].z + 100 }), w: p2, dest: p1[0], type: 7, time: _m.p.time - _m.t + Date.now() - 50 }));
										mod.send('S_INSTANT_MOVE', 3, { gameId: mod.game.me.gameId, loc: p1[0], w: p2 });
									}
								}, 100);
							}
							mod.send('S_ABNORMALITY_END', 1, { target: mod.game.me.gameId, id: 2060 });
						};
					}(_m.x, _m.w));
				}
				else {
					mod.command.message(`Wait a moment before using this skill again.`.clr('FF0202'));
				}
				return false;
			}

			if (_m.m) {
				for (let i of _m.b) {
					if ((_m.d = Math.floor(((i.loc.x - loc.x) ** 2 + (i.loc.y - loc.y) ** 2) ** 0.5 / 25)) < _m.c.range) {
						_m.x = _m.x.length ? _m.x[0] < _m.d ? _m.x : [_m.d, i.loc, i.w] : [_m.d, i.loc, i.w];
					}
				}
			}

			if (!_m.x.length || (Math.abs(Math.atan2(_m.x[1].y - loc.y, _m.x[1].x - loc.x) - w) > _m.c.angle) || ((_m.m === 1) && (_m.x[0] <= 15) && ((Math.abs(Math.atan2(loc.y - _m.x[1].y, loc.x - _m.x[1].x) - _m.x[2]) >= 3.14159 ? 6.28319 - Math.abs(Math.atan2(loc.y - _m.x[1].y, loc.x - _m.x[1].x) - _m.x[2]) : Math.abs(Math.atan2(loc.y - _m.x[1].y, loc.x - _m.x[1].x) - _m.x[2])) <= 0.174533))) {
				_m.z = { x: loc.x + _m.c.direction * (_m.c.distance * Math.cos(w) * 2), y: loc.y + _m.c.direction * (_m.c.distance * Math.sin(w) * 2), z: loc.z + 25 };
				_m.w = w;
			}
			else {
				_m.z = { x: _m.x[1].x + _m.m * (_m.c.distance * Math.cos(_m.x[2])), y: _m.x[1].y + _m.m * (_m.c.distance * Math.sin(_m.x[2])), z: _m.x[1].z + 25 };
				_m.w = Math.atan2(_m.x[1].y - _m.z.y, _m.x[1].x - _m.z.x);
			}

			if (_m.c.debug) {
				if (!_m.x.length) {
					mod.command.message('\n\t' + `${_m.x.length}`.clr('FF1493'));
				}
				else {
					const f1 = (p1) => `${Math.round(p1 * 180 / 3.14159)}°`,
						v1 = Math.abs(Math.atan2(_m.x[1].y - loc.y, _m.x[1].x - loc.x) - w),	// player angle to mob
						v2 = Math.abs(Math.atan2(loc.y - _m.x[1].y, loc.x - _m.x[1].x) - _m.x[2]),	// mob angle to player
						v3 = v2 >= 3.14159 ? 6.28319 - v2 : v2;	// mob angle adjustment

					mod.log(`\n\n_m.x[0] = ${_m.x[0]}\n_m.x[1] = { x: ${_m.x[1].x}, y: ${_m.x[1].y}, z: ${_m.x[1].z} }\n_m.x[2] = ${_m.x[2]}\n\nloc = { x: ${loc.x}, y: ${loc.y}, z: ${loc.z} }\nw = ${w}\n`);
					mod.command.message('\n\t' + f1(v1).clr(_m.w === w ? 'FF1493' : 'FFD700') + '\n\t' + f1(v3).clr(_m.w === w ? 'FF1493' : 'FFD700') + (v2 >= 3.14159 ? ' (' + '360° - ' + f1(v2) + ')' : '') + '\n\t' + `${_m.x[0]}m`.clr(_m.w === w ? 'FF1493' : 'FFD700'));
				}

				mod.send('S_SPAWN_DROPITEM', 8, { gameId: --_m.u1, loc: { x: _m.z.x, y: _m.z.y, z: _m.z.z - 500 }, item: 88704, amount: 1, expiry: 0, explode: false, masterwork: false, enchant: 0, source: 0, debug: false, owners: [{ id: 0 }] });
				setTimeout(
					(function(p1) {
						return () => mod.send('S_DESPAWN_DROPITEM', 4, { gameId: p1 });
					}(_m.u1)), _m.c.cooldown);
			}
			else {
				setTimeout(() => {
					mod.send('C_PLAYER_LOCATION', 5, Object.assign({}, _m.p, { loc: _m.z, w: _m.w, dest: _m.z, type: 7, time: _m.p.time - _m.t + Date.now() - 50 }));
					mod.send('S_INSTANT_MOVE', 3, { gameId: mod.game.me.gameId, loc: _m.z, w: _m.w });
					setTimeout(() => {
						if ((_m.z.z - _m.p.loc.z) > 100) {
							mod.send('C_PLAYER_LOCATION', 5, Object.assign({}, _m.p, { loc: Object.assign(_m.z, { z: _m.z.z + 100 }), w: _m.w, dest: _m.z, type: 7, time: _m.p.time - _m.t + Date.now() - 50 }));
							mod.send('S_INSTANT_MOVE', 3, { gameId: mod.game.me.gameId, loc: _m.z, w: _m.w });
						}
					}, 100);
				}, 50);
			}
			_m.x = [loc, Date.now()];

			mod.send('S_ABNORMALITY_BEGIN', 4, { target: mod.game.me.gameId, source: mod.game.me.gameId, id: 2112, duration: 0, unk: 0, stacks: 1, unk2: 0, unk3: 0 });
			mod.send('S_ABNORMALITY_BEGIN', 4, { target: mod.game.me.gameId, source: mod.game.me.gameId, id: 2060, duration: 0, unk: 0, stacks: 1, unk2: 0, unk3: 0 });
			setTimeout(() => {
				mod.send('S_ABNORMALITY_END', 1, { target: mod.game.me.gameId, id: 2112 });
				mod.send('S_ABNORMALITY_END', 1, { target: mod.game.me.gameId, id: 2060 });

				_m.z = _m.w = _m.x.length = 0;
			}, _m.c.cooldown);

			return false;
		});
	}

	mod.hook('C_PLAYER_LOCATION', 5, (event) => {
		_m.p = event;
		_m.t = Date.now();
	});

	mod.hook('S_LOAD_TOPO', 3, { order: 100 }, ({ loc }) => {
		_m.s = loc;
	});

	mod.hook('S_PARTY_MEMBER_LIST', 7, ({ members }) => {
		_m.g = members;

		if (_m.i === 0 && !_m.g.some(e => [1, 10].includes((e.class - 10101) % 100))) {
			if (_m.g.some(e => [0].includes((e.class - 10101) % 100))) {
				mod.command.add(['itank'], () => {
					_m.m = 1;
				});
				setTimeout(() => {
					mod.command.remove(['itank']);
				}, 30000);
			}
		}

		mod.log(typeof members);
		for (let [k, v] of Object.entries(members)) {
			mod.log(k + ':' + v);
				if (!_m.g.some(e => e.gameId === v)) {
					_m.g.push({ [v]: v.class})
				}
		}

		let h = mod.hook('S_LEAVE_PARTY', 1, () => {
			_m.g = [{ gameId: mod.game.me.gameId }];
			_m.m = _m.i === 0 ? -1 : _m.m;

			mod.unhook(h);
		});
	});

	function unload() {
		if (_m.h.length) {
			for (let i of _m.h) {
				mod.unhook(i);
			}
			_m.h.length = 0;
		}
	}

	this.destructor = () => {
		mod.command.remove(['j']);
	};
};