//si pas de lib ouverte
void f_finish_(char is_pretty)	//22
{
	int ii;
	if(is_interh)
	{
		SetIntVec (AUTO_INT_5, OldInt5);
	}
	OSInitKeyInitDelay(336);
	OSInitBetweenKeyDelay (48);
	
	#ifdef WITH_GRAPHH
	for(ii=0;ii<4;ii++){ if(scr_copy[ii]!=NULL) free(scr_copy[ii]);}
	#endif
	
	if(is_pretty) WinClose (&wind);
	
//	#ifdef GTC_ONCALC
//	#ifdef WITH_GRAPHH
//	closeasm();
//	#endif
//	#endif
	exit(4);
}