+#include <stdio.h>\r
+#include <conio.h>\r
+#include <dos.h>\r
+#include <math.h>\r
#include "tweak.h"\r
\r
-extern far void do_line(char far *to, int dx, int dy, int cnt, char far *from, long txx1, long txy1, long txx2, long txy2, int dseg);\r
-extern far void do_block(int ycnt);\r
-extern far void do_clear(char far *vmem, int far *otau, int far *ntau);\r
+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);\r
+extern far do_block(int ycnt);\r
+extern far do_clear(char far *vmem, int far *otau, int far *ntau);\r
\r
extern int acstau[256];\r
int sini[2000];\r
char (* far vmem)[160]=MK_FP(0x0a000,0);\r
-/*extern*/ char far kuva1[128][256];\r
-/*extern*/ char far kuva2[128][256];\r
-/*extern*/ char far kuva3[128][256];\r
-/*extern*/ char far dist1[128][256];\r
+extern char far kuva1[128][256];\r
+extern char far kuva2[128][256];\r
+extern char far kuva3[128][256];\r
+extern char far dist1[128][256];\r
char far buu[1000];\r
char sinx[128], siny[128];\r
char pal[768];\r
int clrptr=0;\r
\r
void initvect() {\r
- int a/*,b*/,x,y,s/*,d=0,p=0,ch*/;\r
+ int a,b,x,y,s,d=0,p=0,ch;\r
\r
for(a=0;a<1524;a++)\r
{\r
extern far long txx1,txy1,tay1,tax1;\r
extern far long txx2,txy2,tay2,tax2;\r
\r
-char* kuvataus[]={&kuva1[0][0],&kuva2[0][0],&kuva3[0][0],&kuva1[0][0]};\r
-char* disttaus[]={&dist1[0][0],&dist1[0][0],&dist1[0][0],&dist1[0][9]};\r
+int kuvataus[]={FP_SEG(kuva1),FP_SEG(kuva2),FP_SEG(kuva3),FP_SEG(kuva1)};\r
+int disttaus[]={FP_SEG(dist1),FP_SEG(dist1),FP_SEG(dist1),FP_SEG(dist1)};\r
\r
-void do_poly(x1,y1,x2,y2,x3,y3,x4,y4,color, dd)\r
+do_poly(x1,y1,x2,y2,x3,y3,x4,y4,color, dd)\r
int x1,y1,x2,y2,x3,y3,x4,y4,color, dd;\r
{\r
- int a,/*b,c,d,*/n=0,m,s1,s2,d1,d2,dx1,dy1,dx2,dy2;\r
+ int a,b,c,d,n=0,m,s1,s2,d1,d2,dx1,dy1,dx2,dy2;\r
\r
struct points {\r
int x,y; } pnts[4],txt[4]={{64,4},{190,4},{190,60},{64,60}};\r
}\r
}\r
\r
-void clear()\r
+clear()\r
{\r
int *otau=clrtau[(clrptr-3)&7], *ntau=clrtau[clrptr];\r
\r