From: sparky4 <sparky4@cock.li>
Date: Fri, 5 Aug 2016 17:54:36 +0000 (-0500)
Subject: hmmm
X-Git-Url: http://4ch.mooo.com/gitweb/?a=commitdiff_plain;h=0e834f9efe191399836e7ba6e1817ae824d025f9;p=plz.git

hmmm
---

diff --git a/asmyt.asm b/asmyt.asm
index d901c9b..3fac231 100755
--- a/asmyt.asm
+++ b/asmyt.asm
@@ -12,15 +12,15 @@ ASSUME cs:poro
 PUBLIC C plzline, C setplzparas, C psini, C lsini4, C lsini16
 
 LABEL psini BYTE
-;;INCLUDE 'psini.inc'
+INCLUDE 'psini.inc'
 ;	  db	 16384 dup(?)
 
 LABEL lsini4 WORD
-;;INCLUDE 'lsini4.inc'
+INCLUDE 'lsini4.inc'
 ;	  db	 16384 dup(?)
 
 LABEL lsini16 WORD
-;;INCLUDE 'lsini16.inc'
+INCLUDE 'lsini16.inc'
 ;	  db	 16384 dup(?)
 
 PROC    C plzline
diff --git a/asmyt.err b/asmyt.err
deleted file mode 100755
index 306fb1b..0000000
--- a/asmyt.err
+++ /dev/null
@@ -1,10 +0,0 @@
-asmyt.asm(26): Error! E514: Colon is expected
-asmyt.asm(30): Error! E065: Operator is expected
-asmyt.asm(89): Error! E065: Operator is expected
-asmyt.asm(93): Error! E600: 'C' is already defined
-asmyt.asm(95): Error! E611: ARG may only be used within a PROC and before the first instruction
-asmyt.asm(114): Error! E506: Block nesting error
-asmyt.asm(118): Error! E600: 'C' is already defined
-asmyt.asm(120): Error! E611: ARG may only be used within a PROC and before the first instruction
-asmyt.asm(128): Error! E002: Invalid instruction with current CPU setting
-asmyt.asm(134): Error! E506: Block nesting error
diff --git a/asmyt.o b/asmyt.o
new file mode 100755
index 0000000..a398f3e
Binary files /dev/null and b/asmyt.o differ
diff --git a/copper.lib b/copper.lib
index cf5aecc..1cd1560 100755
Binary files a/copper.lib and b/copper.lib differ
diff --git a/plzpart.map b/plzpart.map
index a7aef91..cc1717e 100755
--- a/plzpart.map
+++ b/plzpart.map
@@ -1,7 +1,7 @@
 Open Watcom Linker Version 2.0 beta Feb  1 2016 01:01:49 (32-bit)
 Copyright (c) 2002-2016 The Open Watcom Contributors. All Rights Reserved.
 Portions Copyright (c) 1985-2002 Sybase, Inc. All Rights Reserved.
-Created on:       16/08/04 08:44:52
+Created on:       16/08/05 12:44:40
 Executable Image: plzpart.exe
 creating a DOS executable
 Error! E2028: init_copper_ is an undefined reference
diff --git a/u2plz/MAIN.C b/u2plz/MAIN.C
index bf421c4..b1bb0b3 100755
--- a/u2plz/MAIN.C
+++ b/u2plz/MAIN.C
@@ -1,13 +1,13 @@
-#include "..\dis\dis.h"
+//#include "..\dis\dis.h"
 
 extern plz();
-extern vect();
+//extern vect();
 
 main()  {
-	dis_partstart();
+	//cd udis_partstart();
 	init_copper();
-	initvect();
+	//initvect();
 	plz();
-	vect();
+	//vect();
 	close_copper();
-	}
\ No newline at end of file
+	}
diff --git a/u2plz/MAIN.OBJ b/u2plz/MAIN.OBJ
new file mode 100755
index 0000000..b773069
Binary files /dev/null and b/u2plz/MAIN.OBJ differ
diff --git a/u2plz/PLZ.C b/u2plz/PLZ.C
index 420736d..bfcc59e 100755
--- a/u2plz/PLZ.C
+++ b/u2plz/PLZ.C
@@ -65,19 +65,19 @@ plz(){
 	long	tim=0,count=0;
 	int	ch=0,sync=2;
 
-	while(dis_musplus()<0 && !dis_exit());
-	dis_setmframe(0);
+	//while(dis_musplus()<0 && !dis_exit());
+	//dis_setmframe(0);
 
 	init_plz();
 	cop_drop=128;
 	cop_fadepal=pals[curpal++];
 
 	frame_count=0;
-	while(!dis_exit())
+	while(!kbhit())
 		{
 		tim+=frame_count; frame_count=0; count++;
-		if(dis_getmframe()>timetable[ttptr])
-			{
+		//if(dis_getmframe()>timetable[ttptr])
+		//	{
 			memset(fadepal,0,768);
 			cop_drop=1;
 			cop_fadepal=pals[curpal++];
@@ -90,7 +90,7 @@ plz(){
 			ik2=inittable[ttptr][5];
 			ik3=inittable[ttptr][6];
 			ik4=inittable[ttptr][7];
-			}
+		//	}
 		if(curpal==5 && cop_drop>64) break;
 
 		asm	mov dx, 3c4h
diff --git a/u2plz/PLZFILL.BAK b/u2plz/PLZFILL.BAK
new file mode 100755
index 0000000..ae73c18
--- /dev/null
+++ b/u2plz/PLZFILL.BAK
@@ -0,0 +1,186 @@
+#include <stdio.h>
+#include <conio.h>
+#include <dos.h>
+#include <math.h>
+#include "tweak.h"
+
+extern far do_line(char far *to, int dx, int dy, int cnt, char far *from, long txx1, long txy1, long txx2, long txy2, int dseg);
+extern far do_block(int ycnt);
+extern far do_clear(char far *vmem, int far *otau, int far *ntau);
+
+extern int acstau[256];
+int	sini[2000];
+char	(* far vmem)[160]=MK_FP(0x0a000,0);
+extern char far kuva1[128][256];
+extern char far kuva2[128][256];
+extern char far kuva3[128][256];
+extern char far dist1[128][256];
+char	far buu[1000];
+char	sinx[128], siny[128];
+char	pal[768];
+
+int	clrtau[8][256][2];
+int	clrptr=0;
+
+initvect() {
+	int	a,b,x,y,s,d=0,p=0,ch;
+
+	for(a=0;a<1524;a++)
+		{
+		sini[a]=s=sin(a/1024.0*M_PI*4)*127;
+		s-=sini[a];
+		}
+
+/*	for(a=0;a<65;a++) for(b=0;b<256;b++) // chessboard
+		{ x=1; if((a>>4)&1) x^=3; if((b>>5)&1) x^=3; kuva[a][b]=x; }
+
+	pal[0*192+3*1]=pal[0*192+3*1+1]=pal[0*192+3*1+2]=40;
+	pal[0*192+3*2]=pal[0*192+3*2+1]=pal[0*192+3*2+2]=60;
+*/
+	for(a=1;a<32;a++)		// must-sini-valk
+		{ pal[0*192+a*3]=0; pal[0*192+a*3+1]=0; pal[0*192+a*3+2]=a*2; }
+	for(a=0;a<32;a++)
+		{ pal[0*192+a*3+32*3]=a*2; pal[0*192+a*3+1+32*3]=a*2; pal[0*192+a*3+2+32*3]=63; }
+
+	for(a=0;a<32;a++)		// must-pun-kelt
+		{ pal[1*192+a*3]=a*2; pal[1*192+a*3+1]=0; pal[1*192+a*3+2]=0; }
+	for(a=0;a<32;a++)
+		{ pal[1*192+a*3+32*3]=63; pal[1*192+a*3+1+32*3]=a*2; pal[1*192+a*3+2+32*3]=0; }
+
+
+	for(a=0;a<32;a++)		// must-orans-viol
+		{ pal[2*192+a*3]=a; pal[2*192+a*3+1]=0; pal[2*192+a*3+2]=a*2/3; }
+	for(a=0;a<32;a++)
+		{ pal[2*192+a*3+32*3]=31-a; pal[2*192+a*3+1+32*3]=a*2; pal[2*192+a*3+2+32*3]=21; }
+
+
+	for(y=0;y<64;y++) for(x=0;x<256;x++)
+		{
+		kuva1[y][x]=sini[(y*4+sini[x*2])&511]/4+32;
+		kuva2[y][x]=sini[(y*4+sini[x*2])&511]/4+32+64;
+		kuva3[y][x]=sini[(y*4+sini[x*2])&511]/4+32+128;
+		}
+
+	for(y=0;y<128;y++) for(x=0;x<256;x++)
+		dist1[y][x]=sini[y*8]/3;
+
+	for(a=0;a<8*256;a++) { clrtau[0][a][0]=640; clrtau[0][a][1]=0; }
+	}
+
+extern far char * to;
+extern far char * from;
+extern far int * ctau;
+extern far int dseg;
+extern far int	xx, yy;
+extern far long	ay1,ay2,ax1,ax2,xx1,yy1,xx2,yy2;
+extern far long	txx1,txy1,tay1,tax1;
+extern far long	txx2,txy2,tay2,tax2;
+
+int	kuvataus[]={FP_SEG(kuva1),FP_SEG(kuva2),FP_SEG(kuva3),FP_SEG(kuva1)};
+int	disttaus[]={FP_SEG(dist1),FP_SEG(dist1),FP_SEG(dist1),FP_SEG(dist1)};
+
+do_poly(x1,y1,x2,y2,x3,y3,x4,y4,color, dd)
+int	x1,y1,x2,y2,x3,y3,x4,y4,color, dd;
+	{
+	int    	a,b,c,d,n=0,m,s1,s2,d1,d2,dx1,dy1,dx2,dy2;
+
+	struct  points {
+		int	x,y; } pnts[4],txt[4]={{64,4},{190,4},{190,60},{64,60}};
+//		int	x,y; } pnts[4],txt[4]={{1,1},{63,1},{63,63},{1,63}};
+
+	dd=(dd+1)&63;
+
+	pnts[0].x=x1; pnts[0].y=y1;
+	pnts[1].x=x2; pnts[1].y=y2;
+	pnts[2].x=x3; pnts[2].y=y3;
+	pnts[3].x=x4; pnts[3].y=y4;
+
+	for(n=0,a=1;a<4;a++) if(pnts[a].y<pnts[n].y) n=a;
+
+	s1=n; s2=n; d1=(s1+1)&3; d2=(s2-1)&3;
+	dx1=pnts[d1].x-pnts[s1].x;
+	dy1=pnts[d1].y-pnts[s1].y; if(dy1==0) dy1++;
+	ax1=65536L*dx1/dy1;
+	xx1=((long)pnts[s1].x<<16)+0x8000L;
+	txx1=((long)txt[s1].x<<16)+0x8000L;
+	txy1=((long)txt[s1].y<<16)+0x8000L;
+	tax1=65536L*(txt[d1].x-txt[s1].x)/dy1;
+	tay1=65536L*(txt[d1].y-txt[s1].y)/dy1;
+
+	dx2=pnts[d2].x-pnts[s2].x;
+	dy2=pnts[d2].y-pnts[s2].y; if(dy2==0) dy2++;
+	ax2=65536L*dx2/dy2;
+	xx2=((long)pnts[s2].x<<16)+0x8000L;
+	txx2=((long)txt[s2].x<<16)+0x8000L;
+	txy2=((long)txt[s2].y<<16)+0x8000L;
+	tax2=65536L*(txt[d2].x-txt[s2].x)/dy2;
+	tay2=65536L*(txt[d2].y-txt[s2].y)/dy2;
+
+	yy=(long)pnts[s1].y;
+	from=MK_FP(kuvataus[color],0);
+	to=vmem[yy];		// initialize gfx pointers
+	dseg=disttaus[color]+dd*16;
+	ctau=&clrtau[clrptr][yy];
+	for(n=0;n<4;)
+		{
+		if(pnts[d1].y<pnts[d2].y) m=pnts[d1].y; else m=pnts[d2].y;
+		do_block(m-yy); yy=m;
+
+		if(pnts[d1].y==pnts[d2].y)
+			{
+			s1=d1; d1=(s1+1)&3;
+			s2=d2; d2=(s2-1)&3; n+=2;
+
+			dx1=pnts[d1].x-pnts[s1].x;
+			dy1=pnts[d1].y-pnts[s1].y; if(dy1==0) dy1++;
+			ax1=65536L*dx1/dy1;
+			xx1=((long)pnts[s1].x<<16)+0x8000L;
+			txx1=((long)txt[s1].x<<16)+0x8000L;
+			txy1=((long)txt[s1].y<<16)+0x8000L;
+			tax1=65536L*(txt[d1].x-txt[s1].x)/dy1;
+			tay1=65536L*(txt[d1].y-txt[s1].y)/dy1;
+
+			dx2=pnts[d2].x-pnts[s2].x;
+			dy2=pnts[d2].y-pnts[s2].y; if(dy2==0) dy2++;
+			ax2=65536L*dx2/dy2;
+			xx2=((long)pnts[s2].x<<16)+0x8000L;
+			txx2=((long)txt[s2].x<<16)+0x8000L;
+			txy2=((long)txt[s2].y<<16)+0x8000L;
+			tax2=65536L*(txt[d2].x-txt[s2].x)/dy2;
+			tay2=65536L*(txt[d2].y-txt[s2].y)/dy2;
+			}
+		else if(pnts[d1].y<pnts[d2].y)
+			{
+			s1=d1; d1=(s1+1)&3; n++;
+			dx1=pnts[d1].x-pnts[s1].x;
+			dy1=pnts[d1].y-pnts[s1].y; if(dy1==0) dy1++;
+			ax1=65536L*dx1/dy1;
+			xx1=((long)pnts[s1].x<<16)+0x8000L;
+			txx1=((long)txt[s1].x<<16)+0x8000L;
+			txy1=((long)txt[s1].y<<16)+0x8000L;
+			tax1=65536L*(txt[d1].x-txt[s1].x)/dy1;
+			tay1=65536L*(txt[d1].y-txt[s1].y)/dy1;
+			}
+		else 	{
+			s2=d2; d2=(s2-1)&3; n++;
+			dx2=pnts[d2].x-pnts[s2].x;
+			dy2=pnts[d2].y-pnts[s2].y; if(dy2==0) dy2++;
+			ax2=65536L*dx2/dy2;
+			xx2=((long)pnts[s2].x<<16)+0x8000L;
+			txx2=((long)txt[s2].x<<16)+0x8000L;
+			txy2=((long)txt[s2].y<<16)+0x8000L;
+			tax2=65536L*(txt[d2].x-txt[s2].x)/dy2;
+			tay2=65536L*(txt[d2].y-txt[s2].y)/dy2;
+			}
+		}
+	}
+
+clear()
+	{
+	int	*otau=clrtau[(clrptr-3)&7], *ntau=clrtau[clrptr];
+
+	clrptr=(clrptr+1)&7;
+
+	do_clear(vmem[0],otau,ntau);
+	}
+
diff --git a/u2plz/PLZPART.DSK b/u2plz/PLZPART.DSK
index 193d8de..1f92fd1 100755
Binary files a/u2plz/PLZPART.DSK and b/u2plz/PLZPART.DSK differ
diff --git a/u2plz/PLZPART.PRJ b/u2plz/PLZPART.PRJ
index 6978e8d..105ddb1 100755
Binary files a/u2plz/PLZPART.PRJ and b/u2plz/PLZPART.PRJ differ