sw1:
switch(MODFLG)
	{
  case 4  : 
  case 5  : PMXMAX=319; PMYMAX=200;  break;	/* CGA		 4c	!!*/
  case 6  : PMXMAX=639; PMYMAX=200;  break;	/* CGA		 4c	!!*/
/*case 7  : mode = 6;  break;	*/		/* HERC. 25 x  80    M	*/
  case 7  : PMXMAX=639; PMYMAX=400;  MODFLG=64; break;	/* AT&T		!!*/
/*case 8  : PMXMAX=639; PMYMAX=400;  MODFLG=72; break;*//* AT&T		!!*/
  case 8  : PMXMAX=639; PMYMAX=400;  MODFLG=47; break;	/* TSENG	!!*/
  case 13 : PMXMAX=319; PMYMAX=200;  break;	/* EGA		16c	!!*/
  case 14 : PMXMAX=639; PMYMAX=200;  break;	/* EGA		16c	!!*/
  case 15 : 					/* EGA	640 x 350    M	!!*/
  case 16 : PMXMAX=639; PMYMAX=350;  break;	/* EGA	  	16c	!!*/
  case 17 : PMXMAX=639; PMYMAX=480;  break;	/* VGA, MONO	 2c	!!*/
  case 18 : PMXMAX=639; PMYMAX=480;  break;	/* VGA		16c	!!*/
  case 19 : PMXMAX=319; PMYMAX=200;  break;	/* MCGA		16c	!!*/
  case 20 : PMXMAX=719; PMYMAX=348;  break;	/* HERCULES      2c	!!*/
  case 25 : PMXMAX=639; PMYMAX=480;  break;	/* PGA		256c	!!*/
  case 30 : PMXMAX=319; PMYMAX=200;  break;	/* Tecmar	 16c	!!*/
  case 31 : PMXMAX=639; PMYMAX=200;  break;	/* Tecmar	 16c	!!*/
  case 32 : PMXMAX=639; PMYMAX=400;  break;	/* Tecmar	 16c	!!*/
  case 40 : PMXMAX=639; PMYMAX=480;  break;	/* Vega		 16c	!!*/
  case 41 : PMXMAX=799; PMYMAX=600;  break;	/* Tseng	 16c	!!*/
  case 46 : PMXMAX=639; PMYMAX=480;  break;	/* Tseng	256c	!!*/
  case 47 : PMXMAX=639; PMYMAX=400;  break;	/* Tseng	256c	!!*/
  case 48 : PMXMAX=799; PMYMAX=600;  break;	/* Tseng	256c	!!*/
  case 55 : PMXMAX=1023;PMYMAX=768;  break;	/* Tseng	 16c	!!*/
  case 56 : PMXMAX=1023;PMYMAX=768;  break;	/* Tseng	256c	!!*/
  case 64 : PMXMAX=639; PMYMAX=400;  break;	/* AT&T		  M	!!*/
  case 65 : PMXMAX=639; PMYMAX=200;  break;	/* DEB		 16c	!!*/
  case 66 : PMXMAX=639; PMYMAX=400;  break;	/* DEB		 16c	!!*/
  case 72 : PMXMAX=639; PMYMAX=400;  break;	/* AT&T		  M	!!*/
  case 80 : PMXMAX=639; PMYMAX=480;  break;	/* Paradise 	 16c	!!*/

default:	jsnav(); Return;
	}
init2a:	init3();
}

init3()
{	i_graf(MODFLG,palflg,bakflg);	}