Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Posting-Version: version B 2.10.2 9/5/84; site gloria.UUCP
Path: utzoo!linus!philabs!cmcl2!seismo!rochester!rocksanne!sunybcs!gloria!colonel
From: colonel@gloria.UUCP (Col. G. L. Sicherman)
Newsgroups: net.sources.games
Subject: rogue color filter for GIGIs
Message-ID: <1095@gloria.UUCP>
Date: Mon, 8-Apr-85 16:37:14 EST
Article-I.D.: gloria.1095
Posted: Mon Apr  8 16:37:14 1985
Date-Received: Wed, 10-Apr-85 04:37:59 EST
Distribution: net
Organization: The Jack of Clubs Precision Instruments Co.
Lines: 78

/*
 *	rg - GIGI output color filter for rogue.
 *
 *	adds a little color when you play rogue on GIGI terminals.
 */

#include <ctype.h>
#include <stdio.h>

#define puts(x)	fputs(x,stdout)
#define	ESC	'\033'

#define ARMOR	']'
#define FOOD	':'
#define GOLD	'*'
#define	POTION	'!'
#define	RING	'='
#define	SCROLL	'?'
#define	STICK	'/'
#define TRAP	'^'
#define WEAPON	')'

main()
{
	int c;
	while (EOF!=(c=getchar())) switch(c) {
	case ESC:
		putchar(c);
		while (EOF!=(c=getchar())) {
			putchar(c);
			if (!isdigit(c) && '['!=c && ';'!=c) break;
		}
		break;
	case ARMOR:
	case WEAPON:
		puts("\033[34m");
		putchar(c);
		puts("\033[37m");
		break;
	case FOOD:
		puts("\033[32m");
		putchar(c);
		puts("\033[37m");
		break;
	case GOLD:
		puts("\033[33m");
		putchar(c);
		puts("\033[37m");
		break;
	case POTION:
	case RING:
	case SCROLL:
	case STICK:
		puts("\033[35m");
		putchar(c);
		puts("\033[37m");
		break;
	case TRAP:
		puts("\033[36m");
		putchar(c);
		puts("\033[37m");
		break;
	case 'A': case 'B': case 'C': case 'D': case 'E': case 'F': case 'G':
	case 'H': case 'I': case 'J': case 'K': case 'L': case 'M':
	case 'N': case 'O': case 'P': case 'Q': case 'R': case 'S': case 'T':
	case 'U': case 'V': case 'W': case 'X': case 'Y': case 'Z':
		puts("\033[31m");
		putchar(c);
		puts("\033[37m");
		break;
	default:
		putchar(c);
	}
	exit(0);
}
-- 
Col. G. L. Sicherman
...{rocksvax|decvax}!sunybcs!colonel