[fceu.git] / svga.c

/* FCE Ultra - NES/Famicom Emulator
 *
 * Copyright notice for this file:
 *  Copyright (C) 1998 BERO
 *  Copyright (C) 2002 Ben Parnell
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 */

/*                      SVGA High Level Routines
                          FCE / FCE Ultra
*/
#include <stdio.h>
#include <stdlib.h>
#include <math.h>
#include <string.h>

#include <stdarg.h>


#ifndef M_PI
#define M_PI 3.14159265358979323846
#endif

#include "types.h"
#include "svga.h"
#include "fce.h"
#include "general.h"
#include "video.h"
#include "sound.h"
#include "version.h"
#include "nsf.h"
#include "palette.h"
#include "fds.h"
#include "netplay.h"
#include "state.h"
#include "cart.h"
#include "input.h"

#include "vsuni.h"

FCEUS FSettings;

static int howlong;
static char errmsg[65];

void FCEU_PrintError(char *format, ...)
{
 char temp[2048];

 va_list ap;

 va_start(ap,format);
 vsprintf(temp,format,ap);
 FCEUD_PrintError(temp);

 va_end(ap);
}

void FCEU_DispMessage(char *format, ...)
{
 va_list ap;

 va_start(ap,format);
 vsprintf(errmsg,format,ap);
 va_end(ap);

 howlong=180;
 if (errmsg[0] != '|')
  printf("%s\n", errmsg);
}

void FCEUI_SetRenderedLines(int ntscf, int ntscl, int palf, int pall)
{
 FSettings.UsrFirstSLine[0]=ntscf;
 FSettings.UsrLastSLine[0]=ntscl;
 FSettings.UsrFirstSLine[1]=palf;
 FSettings.UsrLastSLine[1]=pall;
 if(PAL)
 {
  FSettings.FirstSLine=FSettings.UsrFirstSLine[1];
  FSettings.LastSLine=FSettings.UsrLastSLine[1];
 }
 else
 {
  FSettings.FirstSLine=FSettings.UsrFirstSLine[0];
  FSettings.LastSLine=FSettings.UsrLastSLine[0];
 }

}

void FCEUI_SetVidSystem(int a)
{
 FSettings.PAL=a?1:0;
 FCEU_ResetVidSys();
 FCEU_ResetPalette();
}

int FCEUI_GetCurrentVidSystem(int *slstart, int *slend)
{
 if(slstart)
  *slstart=FSettings.FirstSLine;
 if(slend)
  *slend=FSettings.LastSLine;
 return(PAL);
}

#ifdef NETWORK
void FCEUI_SetNetworkPlay(int type)
{
 FSettings.NetworkPlay=type;
}
#endif

void FCEUI_SetGameGenie(int a)
{
 FSettings.GameGenie=a?1:0;
}

#ifndef NETWORK
#define netplay 0
#endif

static uint8 StateShow=0;

uint8 Exit=0;

uint8 DIPS=0;
//uint8 vsdip=0;
//int coinon=0;

//uint8 pale=0;
uint8 CommandQueue=0;

static int controlselect=0;
static int ntsccol=0;
static int ntsctint=46+10;
static int ntschue=72;
static int controllength=0;

#if 0
pal *palo;
static pal *palpoint[8]=
     {
     palette,
     palettevscv,
     palettevssmb,
     palettevsmar,
     palettevsgoon,
     palettevsslalom,
     palettevseb,
     rp2c04001
     };
#endif

void FCEUI_SetSnapName(int a)
{
 FSettings.SnapName=a;
}

void FCEUI_SaveExtraDataUnderBase(int a)
{
 FSettings.SUnderBase=a;
}

#if 0
void FCEUI_SetPaletteArray(uint8 *pal)
{
 if(!pal)
  palpoint[0]=palette;
 else
 {
  int x;
  palpoint[0]=palettec;
  for(x=0;x<64;x++)
  {
   palpoint[0][x].r=*((uint8 *)pal+x+x+x);
   palpoint[0][x].g=*((uint8 *)pal+x+x+x+1);
   palpoint[0][x].b=*((uint8 *)pal+x+x+x+2);
  }
 }
 FCEU_ResetPalette();
}
#endif

void FCEUI_SelectState(int w)
{
 if(netplay!=2 && FCEUGameInfo.type!=GIT_NSF)
  CommandQueue=42+w;
}

void FCEUI_SaveState(void)
{
 if(netplay!=2 && FCEUGameInfo.type!=GIT_NSF)
  CommandQueue=40;
}

void FCEUI_LoadState(void)
{
 if(netplay!=2 && FCEUGameInfo.type!=GIT_NSF)
  CommandQueue=41;
}

int32 FCEUI_GetDesiredFPS(void)
{
  if(PAL)
   return(838977920); // ~50.007
  else
   return(1008307711);	// ~60.1
}

static int dosnapsave=0;
void FCEUI_SaveSnapshot(void)
{
 dosnapsave=1;
}

/* I like the sounds of breaking necks. */
static void ReallySnap(void)
{
 int x=SaveSnapshot();
 if(!x)
  FCEU_DispMessage("Error saving screen snapshot.");
 else
  FCEU_DispMessage("Screen snapshot %d saved.",x-1);
}

void DriverInterface(int w, void *d)
{
 switch(w)
 {
  case DES_NTSCCOL:ntsccol=*(int *)d;FCEU_ResetPalette();break;
  case DES_RESET:if(netplay!=2) CommandQueue=30;break;
  case DES_POWER:if(netplay!=2) CommandQueue=31;break;
  case DES_GETNTSCTINT:*(int*)d=ntsctint;break;
  case DES_GETNTSCHUE:*(int*)d=ntschue;break;
  case DES_SETNTSCTINT:ntsctint=*(int*)d;if(ntsccol)FCEU_ResetPalette();break;
  case DES_SETNTSCHUE:ntschue=*(int*)d;if(ntsccol)FCEU_ResetPalette();break;

  case DES_FDSINSERT:if(netplay!=2) CommandQueue=2;break;
  case DES_FDSEJECT:if(netplay!=2) CommandQueue=3;break;
  case DES_FDSSELECT:if(netplay!=2) CommandQueue=1;break;
/*
  case DES_NSFINC:NSFControl(1);break;
  case DES_NSFDEC:NSFControl(2);break;
  case DES_NSFRES:NSFControl(0);break;
*/
  case DES_VSUNIDIPSET:CommandQueue=10+(int)d;break;
  case DES_VSUNITOGGLEDIPVIEW:CommandQueue=10;break;
  case DES_VSUNICOIN:CommandQueue=19;break;
  case DES_NTSCSELHUE:if(ntsccol && FCEUGameInfo.type!=GIT_VSUNI && !PAL && FCEUGameInfo.type!=GIT_NSF){controlselect=1;controllength=360;}break;
  case DES_NTSCSELTINT:if(ntsccol && FCEUGameInfo.type!=GIT_VSUNI && !PAL && FCEUGameInfo.type!=GIT_NSF){controlselect=2;controllength=360;}break;
#if 0
  case DES_NTSCDEC:
		  if(ntsccol && FCEUGameInfo.type!=GIT_VSUNI && !PAL && FCEUGameInfo.type!=GIT_NSF)
		  {
		   char which;
		   if(controlselect)
		   {
		    if(controllength)
		    {
		     which=controlselect==1?ntschue:ntsctint;
		     which--;
		     if(which<0) which=0;
			 if(controlselect==1)
			  ntschue=which;
			 else ntsctint=which;
		     CalculatePalette();
		    }
		   controllength=360;
		    }
		   }
		  break;
  case DES_NTSCINC:
		   if(ntsccol && FCEUGameInfo.type!=GIT_VSUNI && !PAL && FCEUGameInfo.type!=GIT_NSF)
		     if(controlselect)
		     {
		      if(controllength)
		      {
		       switch(controlselect)
		       {
		        case 1:ntschue++;
		               if(ntschue>128) ntschue=128;
		               CalculatePalette();
		               break;
		        case 2:ntsctint++;
		               if(ntsctint>128) ntsctint=128;
		               CalculatePalette();
		               break;
		       }
		      }
		      controllength=360;
		     }
          	    break;
#endif
  }
}

#if 0
static uint8 lastd=0;
void SetNESDeemph(uint8 d, int force)
{
 static uint16 rtmul[7]={32768*1.239,32768*.794,32768*1.019,32768*.905,32768*1.023,32768*.741,32768*.75};
 static uint16 gtmul[7]={32768*.915,32768*1.086,32768*.98,32768*1.026,32768*.908,32768*.987,32768*.75};
 static uint16 btmul[7]={32768*.743,32768*.882,32768*.653,32768*1.277,32768*.979,32768*.101,32768*.75};
 uint32 r,g,b;
 int x;

 /* If it's not forced(only forced when the palette changes),
    don't waste cpu time if the same deemphasis bits are set as the last call.
 */
 if(!force)
 {
  if(d==lastd)
   return;
 }
 else	/* Only set this when palette has changed. */
 {
  r=rtmul[6];
  g=rtmul[6];
  b=rtmul[6];

  for(x=0;x<0x40;x++)
  {
   uint32 m,n,o;
   m=palo[x].r;
   n=palo[x].g;
   o=palo[x].b;
   m=(m*r)>>15;
   n=(n*g)>>15;
   o=(o*b)>>15;
   if(m>0xff) m=0xff;
   if(n>0xff) n=0xff;
   if(o>0xff) o=0xff;
   FCEUD_SetPalette(x|0x40,m,n,o);


  }
 }
 if(!d) return;	/* No deemphasis, so return. */

  r=rtmul[d-1];
  g=gtmul[d-1];
  b=btmul[d-1];

    for(x=0;x<0x40;x++)
    {
     uint32 m,n,o;

     m=palo[x].r;
     n=palo[x].g;
     o=palo[x].b;
     m=(m*r)>>15;
     n=(n*g)>>15;
     o=(o*b)>>15;
     if(m>0xff) m=0xff;
     if(n>0xff) n=0xff;
     if(o>0xff) o=0xff;

     FCEUD_SetPalette(x|0xC0,m,n,o);

    }

 lastd=d;
}

#define HUEVAL  ((double)((double)ntschue/(double)2)+(double)300)
#define TINTVAL ((double)((double)ntsctint/(double)128))

static void CalculatePalette(void)
{
 int x,z;
 int r,g,b;
 double s,y,theta;
 static uint8 cols[16]={0,24,21,18,15,12,9,6,3,0,33,30,27,0,0,0};
 static uint8 br1[4]={6,9,12,12};
 static double br2[4]={.29,.45,.73,.9};
 static double br3[4]={0,.24,.47,.77};

 for(x=0;x<=3;x++)
  for(z=0;z<16;z++)
  {
   s=(double)TINTVAL;
   y=(double)br2[x];
   if(z==0)  {s=0;y=((double)br1[x])/12;}

   if(z>=13)
   {
    s=y=0;
    if(z==13)
     y=(double)br3[x];
   }

   theta=(double)M_PI*(double)(((double)cols[z]*10+HUEVAL)/(double)180);
   r=(int)(((double)y+(double)s*(double)sin(theta))*(double)256);
   g=(int)(((double)y-(double)((double)27/(double)53)*s*(double)sin(theta)+(double)((double)10/(double)53)*s*cos(theta))*(double)256);
   b=(int)(((double)y-(double)s*(double)cos(theta))*(double)256);

   // TODO:  Fix RGB to compensate for phosphor changes(add to red??).

   if(r>255) r=255;
   if(g>255) g=255;
   if(b>255) b=255;
   if(r<0) r=0;
   if(g<0) g=0;
   if(b<0) b=0;

   paletten[(x<<4)+z].r=r;
   paletten[(x<<4)+z].g=g;
   paletten[(x<<4)+z].b=b;
  }
 WritePalette();
}
#endif

#include "drawing.h"
#ifdef FRAMESKIP
void FCEU_PutImageDummy(void)
{
 if(FCEUGameInfo.type!=GIT_NSF)
 {
  if(controllength) controllength--;
 }
 if(StateShow) StateShow--; /* DrawState() */
 if(howlong) howlong--;	/* DrawMessage() */
 #ifdef FPS
 {
  extern uint64 frcount;
  frcount++;
 }
 #endif

}
#endif

void FCEU_PutImage(void)
{
        if(FCEUGameInfo.type==GIT_NSF)
	{
         DrawNSF(XBuf);
	 /* Save snapshot after NSF screen is drawn.  Why would we want to
	    do it before?
	 */
         if(dosnapsave)
         {
          ReallySnap();
          dosnapsave=0;
         }
	}
        else
        {
	 /* Save snapshot before overlay stuff is written. */
         if(dosnapsave)
         {
          ReallySnap();
          dosnapsave=0;
         }
	 if(FCEUGameInfo.type==GIT_VSUNI)
		 FCEU_VSUniDraw(XBuf);
         //if(StateShow) DrawState();

	 //FCEU_DrawSaveStates(XBuf);
	 //FCEU_DrawMovies(XBuf);
	 //FCEU_DrawNTSCControlBars(XBuf);
	 //FCEU_DrawRecordingStatus(XBuf);

         //if(controllength) {controllength--;DrawBars();}
        }
	DrawMessage();
	#ifdef FPS
	{
	extern uint64 frcount;
	frcount++;
	}
	#endif
	DrawInput(XBuf+8);
}

#if 0
static int ipalette=0;

void LoadGamePalette(void)
{
  uint8 ptmp[192];
  FILE *fp;
  ipalette=0;
  if((fp=fopen(FCEU_MakeFName(FCEUMKF_PALETTE,0,0),"rb")))
  {
   int x;
   fread(ptmp,1,192,fp);
   fclose(fp);
   for(x=0;x<64;x++)
   {
    palettei[x].r=ptmp[x+x+x];
    palettei[x].g=ptmp[x+x+x+1];
    palettei[x].b=ptmp[x+x+x+2];
   }
   ipalette=1;
  }
}

void FCEU_ResetPalette(void)
{
   ChoosePalette();
   WritePalette();
}

static void ChoosePalette(void)
{
    if(FCEUGameInfo.type==GIT_NSF)
     palo=NSFPalette;
    else if(ipalette)
     palo=palettei;
    else if(ntsccol && !PAL && FCEUGameInfo.type!=GIT_VSUNI)
     {
      palo=paletten;
      CalculatePalette();
     }
    else
     palo=palpoint[pale];
}

void WritePalette(void)
{
    int x;

    for(x=0;x<6;x++)
     FCEUD_SetPalette(x+128,unvpalette[x].r,unvpalette[x].g,unvpalette[x].b);
    if(FCEUGameInfo.type==GIT_NSF)
    {
     for(x=0;x<39;x++)
      FCEUD_SetPalette(x,palo[x].r,palo[x].g,palo[x].b);
    }
    else
    {
     for(x=0;x<64;x++)
      FCEUD_SetPalette(x,palo[x].r,palo[x].g,palo[x].b);
     SetNESDeemph(lastd,1);
    }
}

void FlushCommandQueue(void)
{
  if(!netplay && CommandQueue) {DoCommand(CommandQueue);CommandQueue=0;}
}

void DoCommand(uint8 c)
{
 switch(c)
 {
  case 1:FDSControl(FDS_SELECT);break;
  case 2:FDSControl(FDS_IDISK);break;
  case 3:FDSControl(FDS_EJECT);break;

  case 10:DIPS^=2;break;
  case 11:vsdip^=1;DIPS|=2;break;
  case 12:vsdip^=2;DIPS|=2;break;
  case 13:vsdip^=4;DIPS|=2;break;
  case 14:vsdip^=8;DIPS|=2;break;
  case 15:vsdip^=0x10;DIPS|=2;break;
  case 16:vsdip^=0x20;DIPS|=2;break;
  case 17:vsdip^=0x40;DIPS|=2;break;
  case 18:vsdip^=0x80;DIPS|=2;break;
  case 19:coinon=6;break;
  case 30:ResetNES();break;
  case 31:PowerNES();break;
  case 40:CheckStates();StateShow=0;SaveState();break;
  case 41:CheckStates();StateShow=0;LoadState();break;
  case 42: case 43: case 44: case 45: case 46: case 47: case 48: case 49:
  case 50: case 51:StateShow=180;CurrentState=c-42;CheckStates();break;
 }
}
#endif
Commit	Line	Data
c62d2810	1	/* FCE Ultra - NES/Famicom Emulator
	2	*
	3	* Copyright notice for this file:
22f08d95	4	* Copyright (C) 1998 BERO
c62d2810	5	* Copyright (C) 2002 Ben Parnell
	6	*
	7	* This program is free software; you can redistribute it and/or modify
	8	* it under the terms of the GNU General Public License as published by
	9	* the Free Software Foundation; either version 2 of the License, or
	10	* (at your option) any later version.
	11	*
	12	* This program is distributed in the hope that it will be useful,
	13	* but WITHOUT ANY WARRANTY; without even the implied warranty of
	14	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	15	* GNU General Public License for more details.
	16	*
	17	* You should have received a copy of the GNU General Public License
	18	* along with this program; if not, write to the Free Software
	19	* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
	20	*/
	21
	22	/* SVGA High Level Routines
	23	FCE / FCE Ultra
	24	*/
	25	#include <stdio.h>
	26	#include <stdlib.h>
	27	#include <math.h>
	28	#include <string.h>
	29
	30	#include <stdarg.h>
	31
	32
	33	#ifndef M_PI
	34	#define M_PI 3.14159265358979323846
	35	#endif
	36
	37	#include "types.h"
22f08d95	38	#include "svga.h"
c62d2810	39	#include "fce.h"
	40	#include "general.h"
	41	#include "video.h"
	42	#include "sound.h"
	43	#include "version.h"
	44	#include "nsf.h"
	45	#include "palette.h"
	46	#include "fds.h"
	47	#include "netplay.h"
	48	#include "state.h"
	49	#include "cart.h"
	50	#include "input.h"
	51
92764e62	52	#include "vsuni.h"
92764e62	53
c62d2810	54	FCEUS FSettings;
	55
	56	static int howlong;
	57	static char errmsg[65];
	58
	59	void FCEU_PrintError(char *format, ...)
	60	{
	61	char temp[2048];
	62
	63	va_list ap;
	64
	65	va_start(ap,format);
	66	vsprintf(temp,format,ap);
	67	FCEUD_PrintError(temp);
	68
	69	va_end(ap);
	70	}
	71
	72	void FCEU_DispMessage(char *format, ...)
	73	{
	74	va_list ap;
	75
	76	va_start(ap,format);
	77	vsprintf(errmsg,format,ap);
	78	va_end(ap);
	79
	80	howlong=180;
989672f4	81	if (errmsg[0] != '\|')
989672f4	82	printf("%s\n", errmsg);
c62d2810	83	}
	84
	85	void FCEUI_SetRenderedLines(int ntscf, int ntscl, int palf, int pall)
	86	{
	87	FSettings.UsrFirstSLine[0]=ntscf;
	88	FSettings.UsrLastSLine[0]=ntscl;
	89	FSettings.UsrFirstSLine[1]=palf;
	90	FSettings.UsrLastSLine[1]=pall;
	91	if(PAL)
	92	{
	93	FSettings.FirstSLine=FSettings.UsrFirstSLine[1];
	94	FSettings.LastSLine=FSettings.UsrLastSLine[1];
	95	}
	96	else
	97	{
	98	FSettings.FirstSLine=FSettings.UsrFirstSLine[0];
	99	FSettings.LastSLine=FSettings.UsrLastSLine[0];
	100	}
	101
	102	}
	103
	104	void FCEUI_SetVidSystem(int a)
	105	{
	106	FSettings.PAL=a?1:0;
	107	FCEU_ResetVidSys();
	108	FCEU_ResetPalette();
	109	}
	110
	111	int FCEUI_GetCurrentVidSystem(int slstart, int slend)
	112	{
	113	if(slstart)
	114	*slstart=FSettings.FirstSLine;
	115	if(slend)
	116	*slend=FSettings.LastSLine;
	117	return(PAL);
	118	}
	119
	120	#ifdef NETWORK
	121	void FCEUI_SetNetworkPlay(int type)
	122	{
	123	FSettings.NetworkPlay=type;
	124	}
	125	#endif
	126
	127	void FCEUI_SetGameGenie(int a)
	128	{
	129	FSettings.GameGenie=a?1:0;
	130	}
	131
c62d2810	132	#ifndef NETWORK
	133	#define netplay 0
	134	#endif
	135
	136	static uint8 StateShow=0;
	137
	138	uint8 Exit=0;
	139
	140	uint8 DIPS=0;
d97315ac	141	//uint8 vsdip=0;
d97315ac	142	//int coinon=0;
c62d2810	143
92764e62	144	//uint8 pale=0;
c62d2810	145	uint8 CommandQueue=0;
	146
	147	static int controlselect=0;
	148	static int ntsccol=0;
	149	static int ntsctint=46+10;
	150	static int ntschue=72;
	151	static int controllength=0;
	152
92764e62	153	#if 0
c62d2810	154	pal *palo;
	155	static pal *palpoint[8]=
	156	{
	157	palette,
	158	palettevscv,
	159	palettevssmb,
	160	palettevsmar,
	161	palettevsgoon,
	162	palettevsslalom,
	163	palettevseb,
	164	rp2c04001
	165	};
92764e62	166	#endif
c62d2810	167
	168	void FCEUI_SetSnapName(int a)
	169	{
	170	FSettings.SnapName=a;
	171	}
	172
	173	void FCEUI_SaveExtraDataUnderBase(int a)
	174	{
	175	FSettings.SUnderBase=a;
	176	}
	177
92764e62	178	#if 0
c62d2810	179	void FCEUI_SetPaletteArray(uint8 *pal)
	180	{
	181	if(!pal)
	182	palpoint[0]=palette;
	183	else
	184	{
	185	int x;
	186	palpoint[0]=palettec;
	187	for(x=0;x<64;x++)
	188	{
	189	palpoint[0][x].r=((uint8 )pal+x+x+x);
	190	palpoint[0][x].g=((uint8 )pal+x+x+x+1);
	191	palpoint[0][x].b=((uint8 )pal+x+x+x+2);
	192	}
	193	}
	194	FCEU_ResetPalette();
	195	}
92764e62	196	#endif
c62d2810	197
	198	void FCEUI_SelectState(int w)
	199	{
22f08d95	200	if(netplay!=2 && FCEUGameInfo.type!=GIT_NSF)
c62d2810	201	CommandQueue=42+w;
	202	}
	203
	204	void FCEUI_SaveState(void)
	205	{
	206	if(netplay!=2 && FCEUGameInfo.type!=GIT_NSF)
	207	CommandQueue=40;
	208	}
	209
	210	void FCEUI_LoadState(void)
	211	{
22f08d95	212	if(netplay!=2 && FCEUGameInfo.type!=GIT_NSF)
c62d2810	213	CommandQueue=41;
	214	}
	215
	216	int32 FCEUI_GetDesiredFPS(void)
	217	{
	218	if(PAL)
	219	return(838977920); // ~50.007
	220	else
	221	return(1008307711); // ~60.1
	222	}
	223
	224	static int dosnapsave=0;
	225	void FCEUI_SaveSnapshot(void)
	226	{
	227	dosnapsave=1;
	228	}
	229
	230	/* I like the sounds of breaking necks. */
	231	static void ReallySnap(void)
	232	{
	233	int x=SaveSnapshot();
	234	if(!x)
	235	FCEU_DispMessage("Error saving screen snapshot.");
	236	else
	237	FCEU_DispMessage("Screen snapshot %d saved.",x-1);
	238	}
	239
	240	void DriverInterface(int w, void *d)
	241	{
	242	switch(w)
	243	{
	244	case DES_NTSCCOL:ntsccol=(int )d;FCEU_ResetPalette();break;
	245	case DES_RESET:if(netplay!=2) CommandQueue=30;break;
	246	case DES_POWER:if(netplay!=2) CommandQueue=31;break;
	247	case DES_GETNTSCTINT:(int)d=ntsctint;break;
	248	case DES_GETNTSCHUE:(int)d=ntschue;break;
	249	case DES_SETNTSCTINT:ntsctint=(int)d;if(ntsccol)FCEU_ResetPalette();break;
	250	case DES_SETNTSCHUE:ntschue=(int)d;if(ntsccol)FCEU_ResetPalette();break;
	251
	252	case DES_FDSINSERT:if(netplay!=2) CommandQueue=2;break;
	253	case DES_FDSEJECT:if(netplay!=2) CommandQueue=3;break;
	254	case DES_FDSSELECT:if(netplay!=2) CommandQueue=1;break;
d97315ac	255	/*
c62d2810	256	case DES_NSFINC:NSFControl(1);break;
c62d2810	257	case DES_NSFDEC:NSFControl(2);break;
22f08d95	258	case DES_NSFRES:NSFControl(0);break;
d97315ac	259	*/
c62d2810	260	case DES_VSUNIDIPSET:CommandQueue=10+(int)d;break;
	261	case DES_VSUNITOGGLEDIPVIEW:CommandQueue=10;break;
	262	case DES_VSUNICOIN:CommandQueue=19;break;
	263	case DES_NTSCSELHUE:if(ntsccol && FCEUGameInfo.type!=GIT_VSUNI && !PAL && FCEUGameInfo.type!=GIT_NSF){controlselect=1;controllength=360;}break;
	264	case DES_NTSCSELTINT:if(ntsccol && FCEUGameInfo.type!=GIT_VSUNI && !PAL && FCEUGameInfo.type!=GIT_NSF){controlselect=2;controllength=360;}break;
92764e62	265	#if 0
c62d2810	266	case DES_NTSCDEC:
	267	if(ntsccol && FCEUGameInfo.type!=GIT_VSUNI && !PAL && FCEUGameInfo.type!=GIT_NSF)
	268	{
	269	char which;
	270	if(controlselect)
	271	{
	272	if(controllength)
	273	{
	274	which=controlselect==1?ntschue:ntsctint;
	275	which--;
	276	if(which<0) which=0;
22f08d95	277	if(controlselect==1)
	278	ntschue=which;
	279	else ntsctint=which;
c62d2810	280	CalculatePalette();
	281	}
	282	controllength=360;
	283	}
	284	}
	285	break;
22f08d95	286	case DES_NTSCINC:
c62d2810	287	if(ntsccol && FCEUGameInfo.type!=GIT_VSUNI && !PAL && FCEUGameInfo.type!=GIT_NSF)
	288	if(controlselect)
	289	{
	290	if(controllength)
	291	{
	292	switch(controlselect)
	293	{
	294	case 1:ntschue++;
	295	if(ntschue>128) ntschue=128;
	296	CalculatePalette();
	297	break;
	298	case 2:ntsctint++;
	299	if(ntsctint>128) ntsctint=128;
	300	CalculatePalette();
	301	break;
	302	}
	303	}
	304	controllength=360;
	305	}
	306	break;
92764e62	307	#endif
c62d2810	308	}
	309	}
	310
92764e62	311	#if 0
c62d2810	312	static uint8 lastd=0;
	313	void SetNESDeemph(uint8 d, int force)
	314	{
	315	static uint16 rtmul[7]={327681.239,32768.794,327681.019,32768.905,327681.023,32768.741,32768*.75};
	316	static uint16 gtmul[7]={32768.915,327681.086,32768.98,327681.026,32768.908,32768.987,32768*.75};
	317	static uint16 btmul[7]={32768.743,32768.882,32768.653,327681.277,32768.979,32768.101,32768*.75};
	318	uint32 r,g,b;
	319	int x;
	320
22f08d95	321	/* If it's not forced(only forced when the palette changes),
22f08d95	322	don't waste cpu time if the same deemphasis bits are set as the last call.
c62d2810	323	*/
22f08d95	324	if(!force)
c62d2810	325	{
22f08d95	326	if(d==lastd)
c62d2810	327	return;
	328	}
	329	else /* Only set this when palette has changed. */
	330	{
	331	r=rtmul[6];
	332	g=rtmul[6];
	333	b=rtmul[6];
	334
	335	for(x=0;x<0x40;x++)
	336	{
	337	uint32 m,n,o;
	338	m=palo[x].r;
	339	n=palo[x].g;
	340	o=palo[x].b;
	341	m=(m*r)>>15;
	342	n=(n*g)>>15;
	343	o=(o*b)>>15;
	344	if(m>0xff) m=0xff;
	345	if(n>0xff) n=0xff;
	346	if(o>0xff) o=0xff;
	347	FCEUD_SetPalette(x\|0x40,m,n,o);
5232c20c	348
5232c20c	349
c62d2810	350	}
	351	}
	352	if(!d) return; /* No deemphasis, so return. */
	353
	354	r=rtmul[d-1];
	355	g=gtmul[d-1];
	356	b=btmul[d-1];
	357
	358	for(x=0;x<0x40;x++)
	359	{
	360	uint32 m,n,o;
	361
	362	m=palo[x].r;
	363	n=palo[x].g;
	364	o=palo[x].b;
	365	m=(m*r)>>15;
	366	n=(n*g)>>15;
	367	o=(o*b)>>15;
	368	if(m>0xff) m=0xff;
	369	if(n>0xff) n=0xff;
	370	if(o>0xff) o=0xff;
	371
	372	FCEUD_SetPalette(x\|0xC0,m,n,o);
5232c20c	373
c62d2810	374	}
22f08d95	375
c62d2810	376	lastd=d;
	377	}
	378
	379	#define HUEVAL ((double)((double)ntschue/(double)2)+(double)300)
	380	#define TINTVAL ((double)((double)ntsctint/(double)128))
	381
	382	static void CalculatePalette(void)
	383	{
	384	int x,z;
	385	int r,g,b;
	386	double s,y,theta;
	387	static uint8 cols[16]={0,24,21,18,15,12,9,6,3,0,33,30,27,0,0,0};
	388	static uint8 br1[4]={6,9,12,12};
	389	static double br2[4]={.29,.45,.73,.9};
	390	static double br3[4]={0,.24,.47,.77};
22f08d95	391
c62d2810	392	for(x=0;x<=3;x++)
	393	for(z=0;z<16;z++)
	394	{
	395	s=(double)TINTVAL;
	396	y=(double)br2[x];
	397	if(z==0) {s=0;y=((double)br1[x])/12;}
22f08d95	398
c62d2810	399	if(z>=13)
	400	{
	401	s=y=0;
	402	if(z==13)
22f08d95	403	y=(double)br3[x];
c62d2810	404	}
	405
	406	theta=(double)M_PI(double)(((double)cols[z]10+HUEVAL)/(double)180);
	407	r=(int)(((double)y+(double)s(double)sin(theta))(double)256);
	408	g=(int)(((double)y-(double)((double)27/(double)53)s(double)sin(theta)+(double)((double)10/(double)53)scos(theta))*(double)256);
22f08d95	409	b=(int)(((double)y-(double)s(double)cos(theta))(double)256);
c62d2810	410
	411	// TODO: Fix RGB to compensate for phosphor changes(add to red??).
	412
	413	if(r>255) r=255;
	414	if(g>255) g=255;
	415	if(b>255) b=255;
	416	if(r<0) r=0;
	417	if(g<0) g=0;
	418	if(b<0) b=0;
22f08d95	419
c62d2810	420	paletten[(x<<4)+z].r=r;
	421	paletten[(x<<4)+z].g=g;
	422	paletten[(x<<4)+z].b=b;
	423	}
	424	WritePalette();
	425	}
92764e62	426	#endif
c62d2810	427
	428	#include "drawing.h"
	429	#ifdef FRAMESKIP
	430	void FCEU_PutImageDummy(void)
	431	{
	432	if(FCEUGameInfo.type!=GIT_NSF)
	433	{
	434	if(controllength) controllength--;
	435	}
	436	if(StateShow) StateShow--; /* DrawState() */
	437	if(howlong) howlong--; /* DrawMessage() */
	438	#ifdef FPS
	439	{
	440	extern uint64 frcount;
	441	frcount++;
	442	}
	443	#endif
	444
	445	}
	446	#endif
	447
	448	void FCEU_PutImage(void)
	449	{
	450	if(FCEUGameInfo.type==GIT_NSF)
	451	{
	452	DrawNSF(XBuf);
	453	/* Save snapshot after NSF screen is drawn. Why would we want to
	454	do it before?
	455	*/
	456	if(dosnapsave)
	457	{
	458	ReallySnap();
	459	dosnapsave=0;
	460	}
	461	}
	462	else
22f08d95	463	{
c62d2810	464	/* Save snapshot before overlay stuff is written. */
	465	if(dosnapsave)
	466	{
	467	ReallySnap();
	468	dosnapsave=0;
	469	}
92764e62	470	if(FCEUGameInfo.type==GIT_VSUNI)
	471	FCEU_VSUniDraw(XBuf);
	472	//if(StateShow) DrawState();
	473
	474	//FCEU_DrawSaveStates(XBuf);
	475	//FCEU_DrawMovies(XBuf);
	476	//FCEU_DrawNTSCControlBars(XBuf);
	477	//FCEU_DrawRecordingStatus(XBuf);
	478
	479	//if(controllength) {controllength--;DrawBars();}
c62d2810	480	}
	481	DrawMessage();
	482	#ifdef FPS
	483	{
	484	extern uint64 frcount;
	485	frcount++;
	486	}
	487	#endif
	488	DrawInput(XBuf+8);
	489	}
	490
92764e62	491	#if 0
c62d2810	492	static int ipalette=0;
	493
	494	void LoadGamePalette(void)
	495	{
	496	uint8 ptmp[192];
	497	FILE *fp;
	498	ipalette=0;
	499	if((fp=fopen(FCEU_MakeFName(FCEUMKF_PALETTE,0,0),"rb")))
	500	{
	501	int x;
	502	fread(ptmp,1,192,fp);
	503	fclose(fp);
	504	for(x=0;x<64;x++)
	505	{
	506	palettei[x].r=ptmp[x+x+x];
	507	palettei[x].g=ptmp[x+x+x+1];
	508	palettei[x].b=ptmp[x+x+x+2];
	509	}
	510	ipalette=1;
	511	}
	512	}
	513
	514	void FCEU_ResetPalette(void)
	515	{
	516	ChoosePalette();
	517	WritePalette();
	518	}
	519
	520	static void ChoosePalette(void)
	521	{
	522	if(FCEUGameInfo.type==GIT_NSF)
22f08d95	523	palo=NSFPalette;
c62d2810	524	else if(ipalette)
	525	palo=palettei;
	526	else if(ntsccol && !PAL && FCEUGameInfo.type!=GIT_VSUNI)
	527	{
	528	palo=paletten;
	529	CalculatePalette();
	530	}
	531	else
22f08d95	532	palo=palpoint[pale];
c62d2810	533	}
	534
	535	void WritePalette(void)
	536	{
	537	int x;
	538
	539	for(x=0;x<6;x++)
	540	FCEUD_SetPalette(x+128,unvpalette[x].r,unvpalette[x].g,unvpalette[x].b);
	541	if(FCEUGameInfo.type==GIT_NSF)
	542	{
	543	for(x=0;x<39;x++)
22f08d95	544	FCEUD_SetPalette(x,palo[x].r,palo[x].g,palo[x].b);
c62d2810	545	}
	546	else
	547	{
	548	for(x=0;x<64;x++)
	549	FCEUD_SetPalette(x,palo[x].r,palo[x].g,palo[x].b);
	550	SetNESDeemph(lastd,1);
	551	}
	552	}
	553
	554	void FlushCommandQueue(void)
	555	{
	556	if(!netplay && CommandQueue) {DoCommand(CommandQueue);CommandQueue=0;}
	557	}
	558
	559	void DoCommand(uint8 c)
	560	{
	561	switch(c)
	562	{
	563	case 1:FDSControl(FDS_SELECT);break;
	564	case 2:FDSControl(FDS_IDISK);break;
	565	case 3:FDSControl(FDS_EJECT);break;
	566
	567	case 10:DIPS^=2;break;
	568	case 11:vsdip^=1;DIPS\|=2;break;
	569	case 12:vsdip^=2;DIPS\|=2;break;
	570	case 13:vsdip^=4;DIPS\|=2;break;
	571	case 14:vsdip^=8;DIPS\|=2;break;
	572	case 15:vsdip^=0x10;DIPS\|=2;break;
	573	case 16:vsdip^=0x20;DIPS\|=2;break;
	574	case 17:vsdip^=0x40;DIPS\|=2;break;
	575	case 18:vsdip^=0x80;DIPS\|=2;break;
	576	case 19:coinon=6;break;
	577	case 30:ResetNES();break;
	578	case 31:PowerNES();break;
	579	case 40:CheckStates();StateShow=0;SaveState();break;
	580	case 41:CheckStates();StateShow=0;LoadState();break;
	581	case 42: case 43: case 44: case 45: case 46: case 47: case 48: case 49:
	582	case 50: case 51:StateShow=180;CurrentState=c-42;CheckStates();break;
	583	}
	584	}
d97315ac	585	#endif
d97315ac	586