epxb.cpp

#define _USE_MATH_DEFINES
#include <algorithm>
#include <cmath>
#include <cstdlib>
#include <cstring>

#include "includes/FilterCommon.h"
#include "includes/Interpolate.h"

extern "C"
{
	static unsigned char* ScaledImage = NULL;

	const int FilterID = 0x5D1E;
	const char* FilterName = "EPX (B)";
	const char* FilterDescription = "SNES9x's EPXB modified by Hawkynt to support thresholds";

	bool ComparisonThreshold = false;
	const int FilterScaleX = 2;
	const int FilterScaleY = 2;

	#include "includes/Init.h"

	void Apply(int argc, void** argv)
	{
		if (argc >= 3)
		{
			auto Input = ((unsigned char*)(argv[0]));
			auto srcx = *((int*)(argv[1]));
			auto srcy = *((int*)(argv[2]));

			Init(srcx, srcy);
			
			int P[5];

			for (auto y = 0; y < srcy; y++)
			{
				for (auto x = 0; x < srcx; x++)
				{
					auto c0 = CLR(Input, srcx, srcy, x, y, -1, -1);
					auto c1 = CLR(Input, srcx, srcy, x, y, 0, -1);
					auto c2 = CLR(Input, srcx, srcy, x, y, 1, -1);
					auto c3 = CLR(Input, srcx, srcy, x, y, -1, 0);
					auto c4 = CLR(Input, srcx, srcy, x, y);
					auto c5 = CLR(Input, srcx, srcy, x, y, 1, 0);
					auto c6 = CLR(Input, srcx, srcy, x, y, -1, 1);
					auto c7 = CLR(Input, srcx, srcy, x, y, 0, 1);
					auto c8 = CLR(Input, srcx, srcy, x, y, 1, 1);

					P[1] = P[2] = P[3] = P[4] = c4;

					if (
						IsNotLike(c3, c5) &&
						IsNotLike(c1, c7) && ( // diagonal
						(
							IsLike(c4, c3) ||
							IsLike(c4, c7) ||
							IsLike(c4, c5) ||
							IsLike(c4, c1) || ( // edge smoothing
							(
								IsNotLike(c0, c8) ||
								IsLike(c4, c6) ||
								IsLike(c4, c2)
								) && (
									IsNotLike(c6, c2) ||
									IsLike(c4, c0) ||
									IsLike(c4, c8)
									)
								)
							)
							)
						) {
						if (
							IsLike(c1, c3) && (
								IsNotLike(c4, c0) ||
								IsNotLike(c4, c8) ||
								IsNotLike(c1, c2) ||
								IsNotLike(c3, c6)
								)
							) {
							P[1] = Interpolate(c1, c3);
						}
						if (
							IsLike(c5, c1) && (
								IsNotLike(c4, c2) ||
								IsNotLike(c4, c6) ||
								IsNotLike(c5, c8) ||
								IsNotLike(c1, c0)
								)
							) {
							P[2] = Interpolate(c5, c1);
						}
						if (
							IsLike(c3, c7) && (
								IsNotLike(c4, c6) ||
								IsNotLike(c4, c2) ||
								IsNotLike(c3, c0) ||
								IsNotLike(c7, c8)
								)
							) {
							P[3] = Interpolate(c3, c7);
						}
						if (
							IsLike(c7, c5) && (
								IsNotLike(c4, c8) ||
								IsNotLike(c4, c0) ||
								IsNotLike(c7, c6) ||
								IsNotLike(c5, c2)
								)
							) {
							P[4] = Interpolate(c7, c5);
						}
					}

					for (auto Pixel = 1; Pixel < 5; Pixel++)
					{
						Write4RGB(ScaledImage, srcx, srcy, x, y, Pixel, P[Pixel]);
					}
				}
			}
		}
	}
}