From f8d8ce4d35bfbba5391af2a3fbce2ad88f94dd69 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Juha=20Vehvil=C3=A4inen?= <jusu@users.sourceforge.net>
Date: Tue, 9 Jul 2002 12:36:46 +0000
Subject: PeRColate

svn path=/trunk/Framestein/; revision=31
---
 Plugins/fromage.c | 191 ++++++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 191 insertions(+)
 create mode 100644 Plugins/fromage.c

(limited to 'Plugins/fromage.c')

diff --git a/Plugins/fromage.c b/Plugins/fromage.c
new file mode 100644
index 0000000..0c8b48a
--- /dev/null
+++ b/Plugins/fromage.c
@@ -0,0 +1,191 @@
+// 242.fromage -- does cheezy wipes between two input images.
+//		by r. luke dubois (luke@music.columbia.edu),
+//			computer music center, columbia university, 2001.
+//
+//  Pd / Framestein port by Olaf Matthes <olaf.matthes@gmx.de>, June 2002
+//
+//	objects and source are provided without warranty of any kind, express or implied.
+//
+//  usage: fromage <x> <y> <columns> <rows> <flip>
+//
+
+#include <stdio.h>
+#include <string.h>
+#include "plugin.h"
+
+void perform_effect(struct frame f, struct args a)
+{
+	printf("Using fromage as effect does nothing!\n");
+}
+
+void perform_copy(struct frame f1, struct frame f2, struct args a)
+{
+	short x, y, w, h, wf, hf, x_c, y_c, c, r, columns, rows, checky, checkx, flip = 0;
+	pixel16 *pix1_16, *pix2_16;
+	pixel24 *pix1_24, *pix2_24;
+	pixel32 *pix1_32, *pix2_32;
+	char *t;
+
+	// get params
+	if(!a.s) return;
+	x_c = atoi(a.s);
+	if(!(t = strstr(a.s, " "))) return;
+	y_c = atoi(t+1);
+	if(!(t = strstr(t+1, " "))) return;
+	columns = atoi(t+1);
+	if(!(t = strstr(t+1, " "))) return;
+	rows = atoi(t+1);
+	if(!(t = strstr(t+1, " "))) return;
+	flip = atoi(t+1);
+
+	printf("fromage: x%d y%d c%d r%d - f%d\n", x_c, y_c, columns, rows, flip);
+
+	// calculate size we need to process
+	wf = f1.width<f2.width ? f1.width : f2.width;
+	hf = f1.height<f2.height ? f1.height : f2.height;
+
+    w = wf / columns; // set column width
+    h = hf / rows;    // set row height
+
+	switch(f1.pixelformat)
+	{
+		case 16:
+			for(r = 0; r < (rows + 1); r++)
+			{
+				for(y = r * h; y < h * (r + 1); y++) 
+				{
+                	pix1_16 = scanline16(f1, y);
+                	pix2_16 = scanline16(f2, y);
+
+					if(y >= hf) continue;
+            
+					if(y < (y_c + (r * h))) // occlude or don't occlude
+					{
+						checky = 1;
+					}
+					else
+					{
+						checky = 0;
+					}
+					if(flip) checky = !checky;
+            
+					for(c = 0; c < (columns + 1); c++)
+					{
+            			for(x = c * w; x < w * (c + 1); x++)
+            			{
+            				if (x >= wf) continue;
+                
+							if(x < (x_c + (c * w))) // occlude or don't occlude
+							{
+								checkx = 1;
+							}
+							else
+							{
+								checkx = 0;
+							}
+							if(flip) checkx = !checkx;
+
+							if (checkx || checky)
+							{
+								pix2_16[x] = pix1_16[x]; // set output1
+							}
+            			}
+					}
+
+				 }
+			}
+			break;
+		case 24:
+			for(r = 0; r < (rows + 1); r++)
+			{
+				for(y = r * h; y < h * (r + 1); y++) 
+				{
+                	pix1_24 = scanline24(f1, y);
+                	pix2_24 = scanline24(f2, y);
+
+					if(y >= hf) continue;
+            
+					if(y < (y_c + (r*h))) // occlude or don't occlude
+					{
+						checky = 1;
+					}
+					else
+					{
+						checky = 0;
+					}
+					if(flip) checky = !checky;
+            
+					for(c = 0; c < (columns + 1); c++)
+					{
+            			for(x = c * w; x < w * (c + 1); x++)
+            			{
+            				if (x >= wf) continue;
+                
+							if(x < (x_c + (c * w))) // occlude or don't occlude
+							{
+								checkx = 1;
+							}
+							else
+							{
+								checkx = 0;
+							}
+							if(flip) checkx = !checkx;
+
+							if (checkx || checky)
+							{
+								pix2_24[x] = pix1_24[x]; // set output2
+							}
+            			}
+					}
+
+				 }
+			}
+			break;
+		case 32:
+			for(r = 0; r < (rows + 1); r++)
+			{
+				for(y = r * h; y < h * (r + 1); y++) 
+				{
+                	pix1_32 = scanline32(f1, y);
+                	pix2_32 = scanline32(f2, y);
+
+					if(y >= hf) continue;
+            
+					if(y < (y_c + (r * h))) // occlude or don't occlude
+					{
+						checky = 1;
+					}
+					else
+					{
+						checky = 0;
+					}
+					if(flip) checky = !checky;
+            
+					for(c = 0; c < (columns + 1); c++)
+					{
+            			for(x = c * w; x < w * (c + 1); x++)
+            			{
+            				if (x >= wf) continue;
+                
+							if(x < (x_c + (c * w))) // occlude or don't occlude
+							{
+								checkx = 1;
+							}
+							else
+							{
+								checkx = 0;
+							}
+							if(flip) checkx = !checkx;
+
+							if (checkx || checky)
+							{
+								pix2_32[x] = pix1_32[x]; // set output2
+							}
+            			}
+					}
+
+				 }
+			}
+			break;
+	}
+}
-- 
cgit v1.2.1