Ejemplo n.º 1
0
void gui_puts(char *str, int mode)
{
	while (str && *str)
	{
		grpprt(*str++, mode);
	}
}
Ejemplo n.º 2
0
main()
{
	float a,e,u,o,p,q,h,i,j,k,x,y;
	int f,t,z,s;
	static char warn[] = "ANY KEY QUITS";

	a = -1.1;	/* links  (-2..0) */
	e = .95;	/* rechts (0..2)  */
	u = -1.33;	/* onder  (-2..0) */
	o = 1.85;	/* boven  (0..2)  */
	f = 15; 	/* diepte (1..)   */

	x=((e-a)/(MAXX-1));
	y=((o-u)/(MAXY-1));

	p=a;
	q=o;
	screen(SCR);
	color(15,1,1);
	setpg(1,1);			/* teken op pagina 1 */
	cls();
	inispr(4);			/* sprites uit */
	glocate(10,200);

	for(z=0;z<strlen(warn);z++)
	  grpprt(warn[z],PSET); 	/* zet text op het scherm */

	for(z=1;z<9;z++)		/* verander paletkleuren */
	  setplt(z,(z-1)<<4);
	for(z=9;z<16;z++)
	  setplt(z,((7-(z-9))<<4)+((z-8)<<8));

	for(z=10;z<MAXY;z++)		/* verticale resolutie */
	{
	for(s=0;s<(MAXX);s++)		/* horizontale resolutie */
	{
	  t=0;
	  h=i=j=k=0;
lus:
	  if ((t==f) || ((j+k) >= 8))
	  {
	     pset(s,z,t,PSET);		/* pset (x,y,kleur,logop */
	     p += x;
	  }
	  else {
		  i *= h; i += i; i -= q; h = (j-k-p);
		  j = (h*h); k = (i*i); t++;
		  goto lus;
	       }
	} /* loop S */
	p=a;
	q -= y;
	if (kbhit())			/* indien toetsdruk */
	   {
	     reset_all();
	     exit(0);			/* eindig */
	   }
	}  /* loop Z */
	beep();
	z = getch();			/* wacht op toetsdruk */
	reset_all();
} /* main */