#include <ctype.h>

#include "extern.h"

listtmp()
	{  int cnt = 0,ret;

		strcpy(ssent,"\n"); rsout();

		fpw = fopen(temp_fil,"r");
		if ( fpw == NULL ) return(0);
		fgets(fbuff,255,fpw); fgets(fbuff,255,fpw);

		while(1)
		{	
			if ( fgets(fbuff,255,fpw) == NULL ) break;
			cnt++;
			sprintf(ssent,"%d:%s",cnt,fbuff);
			ret = rsout();
            if ( islower(ret) ) ret -= 0x20;
			if ( ret == 'J' || ret == 'X' )
					  { strcpy(ssent,"\n===== •\Ž¦’†Ž~ =====\n");
					    rsout(); 
					    break;
					  }
		}
		fclose(fpw);

		return(0);
	}