//***********************************************************
//
//	ＣＴ－３０００Ａ オプション等判定プログラム
//
//	port_base : PCI I/O port base address

define	port_base	0x????	// 要修正

void fld_wait(short);

main()
{
  
// ３０００Ａ／３０００ボードの判定
  outp(port_base+2,0xf);
  fld_wait(2);
  if(inp(port_base+2)&0x8)	// UPDATE = 1 ?
    printf("This board is CT-3000A\n");
  else
    printf("This board is CT-3000 (Old type)\n");
  
// A(1) / MEMORY オプションの判定
  if(((inp(port_base+1)&0x13) == 3) || ((inp(port_base+1)&0x13) == 0x11))
    printf("This board is CT-3000A(1)\n");
  else
    printf("This board is CT-3000A (No Option-1)\n");

// A(2) / AVERAGING UNIT オプションの判定
  outp(port_base+2,0x9);	// ２画面平均
  fld_wait(2);
  if((inp(port_base+2)&0x8) == 0)	// UPDATE bit = 0 ?
  　 printf("A(2) option exist.\n");
  else
    printf("A(2) option not exist.\n");

// 最大平均回数の判定
  outp(port_base+2,0x40);	// 8BIT_CULC bit = 1
  if((inp(port_base+2)&0x40) == 0)
    printf("Max averaging = 256.\n");
  else
    printf("Max averaging = 64.\n");
}


//
//	f_numb　フィールド　ディレイ関数
//	（f_numb * １６．６ｍｓ ：
//	 無信号又は標準方式ビデオ入力時）
//
void fld_wait(short f_numb)
{
  short i,flg;
  long wdt;
  
  for(i=0;i<f_numb;i++)
  {
    flg = inp(port_base) & 0x80;　// frame_index ?
    for(wdt=0;wdt<0x100000;wdt++)
      if((inp(port_base)&0x80)^flg) break;
  };
};