DataMuseum.dk

Presents historical artifacts from the history of:

DKUUG/EUUG Conference tapes

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about DKUUG/EUUG Conference tapes

Excavated with: AutoArchaeologist - Free & Open Source Software. 

top - metrics - download
Index: T i

⟦676a23e0b⟧ TextFile

    Length: 2973 (0xb9d)
    Types: TextFile
    Names: »icon.c«

Derivation

└─⟦b20c6495f⟧ Bits:30007238 EUUGD18: Wien-båndet, efterår 1987
    └─⟦this⟧ »EUUGD18/General/Wanderer/icon.c«

TextFile

#include "wand_head.h"

void draw_symbol(x,y,ch)        /* this is where the pretty graphics are */
				/* all defined - change them if you want.. */
int  x,y;
char ch;
{
    char icon[2][4],
         (*iconrow)[4] = icon;
    switch(ch)
    {
    case ' ':                    /*  space  */
        strcpy(*iconrow++,"   ");
        strcpy(*iconrow,  "   ");
        break;
    case '#':                   /*  rock  */
        strcpy(*iconrow++,"###");
        strcpy(*iconrow,  "###");
        break;
    case '<':                   /*  arrows  */
        strcpy(*iconrow++,"<--");
        strcpy(*iconrow,  "<--");
        break;
    case '>':
        strcpy(*iconrow++,"-->");
        strcpy(*iconrow,  "-->");
        break;
    case 'O':                    /* boulder  */
        strcpy(*iconrow++,"/^\\");
        strcpy(*iconrow,  "\\_/");
        break;
    case ':':                    /*  earth  */
        strcpy(*iconrow++,". .");
        strcpy(*iconrow,  " . ");
        break;
    case '/':                    /*  slopes */
        strcpy(*iconrow++," _/");
        strcpy(*iconrow,  "/  ");
        break;
    case '\\':
        strcpy(*iconrow++,"\\_ ");
        strcpy(*iconrow,  "  \\");
        break;
    case '*':                     /*  diamond  */
        strcpy(*iconrow++,"/$\\");
        strcpy(*iconrow,  "\\$/");
        break;
    case '=':                     /*  rock  */
        strcpy(*iconrow++,"=-=");
        strcpy(*iconrow,  "-=-");
        break;
    case '@':                     /*  YOU!!! */
        strcpy(*iconrow++," o ");
        strcpy(*iconrow,  "<|>");
        break;
    case 'T':                   /*  teleport  */
        strcpy(*iconrow++,"(*)");
        strcpy(*iconrow,  "(*)");
        break;
    case 'X':                    /*  exits  */
        strcpy(*iconrow++,"Way");
        strcpy(*iconrow,  "Out");
        break;
    case '!':                    /*  landmine  */
        strcpy(*iconrow++," I ");
        strcpy(*iconrow,  " o ");
        break;
    case 'M':                     /* big monster  */
        strcpy(*iconrow++,"}o{");
        strcpy(*iconrow,  "/^\\");
        break;
    case 'S':                     /* baby monster */
        strcpy(*iconrow++,"-o-");
        strcpy(*iconrow,  "/*\\");
        break;
    case '^':			 /* balloon */
        strcpy(*iconrow++,"/~\\");
        strcpy(*iconrow,  "\\_X");
        break;
    case 'C':                    /* time capsule */
        strcpy(*iconrow++,"   ");
        strcpy(*iconrow,  "<O>");
        break;
    case '+':                    /* cage */
        strcpy(*iconrow++,"TTT");
        strcpy(*iconrow,  "III");
        break;
    default:                         /* this is what it uses if it doesnt */
				     /* recognise the character  */
        strcpy(*iconrow++,"OOO");
        strcpy(*iconrow,  "OOO");
        break;
    };
    move(y+1,x+1);
    iconrow--;
    addstr(*iconrow++);
    move(y+2,x+1);
    addstr(*iconrow);
}