示例#1
0
文件: lookmenu.c 项目: nasa/QuIP
static COMMAND_FUNC( prquic )
{
	FILE *fp;
	int i;
	int in_db;
	Trial_Class *tcp;

	fp=try_nice( nameof("quic file"), "w");
	tcp = pick_trial_class("");
	in_db = ASKIF("transform x values to decibels");

	if( fp == NULL || tcp == NULL ) return;

	if( no_data(SINGLE_QSP_ARG,"prquic") ) return;

	fprintf(fp,"%c\n",004);		/* EOT */
	pntquic(fp,tcp,in_db);
	fclose(fp);
}
示例#2
0
文件: lookmenu.c 项目: E-LLP/QuIP
static COMMAND_FUNC( prquic )
{
	FILE *fp;
	int i;
	int in_db;
	Trial_Class *tcp;

	fp=TRYNICE( NAMEOF("quic file"), "w");
	tcp = PICK_TRIAL_CLASS("");
	in_db = ASKIF("transform x values to decibels");

	if( fp == NULL || tcp == NULL ) return;

	if( no_data(SINGLE_QSP_ARG,"prquic") ) return;

	fprintf(fp,"%c\n",004);		/* EOT */
	pntquic(fp,tcp,in_db);
	fclose(fp);
}