src/drawing.c

   1 /* NetHack 3.6  drawing.c       $NHDT-Date: 1447124657 2015/11/10 03:04:17 $  $NHDT-Branch: master $:$NHDT-Revision: 1.49 $ */
   2 /* Copyright (c) NetHack Development Team 1992.                   */
   3 /* NetHack may be freely redistributed.  See license for details. */
   4
   5 #include "hack.h"
   6 #include "tcap.h"
   7
   8 /* Relevant header information in rm.h, objclass.h, and monsym.h. */
   9
  10 #ifdef C
  11 #undef C
  12 #endif
  13
  14 #ifdef TEXTCOLOR
  15 #define C(n) n
  16 #else
  17 #define C(n)
  18 #endif
  19
  20 struct symsetentry symset[NUM_GRAPHICS];
  21
  22 int currentgraphics = 0;
  23
  24 nhsym showsyms[SYM_MAX] = DUMMY; /* symbols to be displayed */
  25 nhsym l_syms[SYM_MAX] = DUMMY;   /* loaded symbols          */
  26 nhsym r_syms[SYM_MAX] = DUMMY;   /* rogue symbols           */
  27
  28 nhsym warnsyms[WARNCOUNT] = DUMMY; /* the current warning display symbols */
  29 const char invisexplain[] = "remembered, unseen, creature";
  30
  31 /* Default object class symbols.  See objclass.h.
  32  * {symbol, name, explain}
  33  *     name:    used in object_detect().
  34  *     explain: used in do_look().
  35  */
  36 const struct class_sym def_oc_syms[MAXOCLASSES] = {
  37     { '\0', "", "" }, /* placeholder for the "random class" */
  38     { ILLOBJ_SYM, "illegal objects", "strange object" },
  39     { WEAPON_SYM, "weapons", "weapon" },
  40     { ARMOR_SYM, "armor", "suit or piece of armor" },
  41     { RING_SYM, "rings", "ring" },
  42     { AMULET_SYM, "amulets", "amulet" },
  43     { TOOL_SYM, "tools", "useful item (pick-axe, key, lamp...)" },
  44     { FOOD_SYM, "food", "piece of food" },
  45     { POTION_SYM, "potions", "potion" },
  46     { SCROLL_SYM, "scrolls", "scroll" },
  47     { SPBOOK_SYM, "spellbooks", "spellbook" },
  48     { WAND_SYM, "wands", "wand" },
  49     { GOLD_SYM, "coins", "pile of coins" },
  50     { GEM_SYM, "rocks", "gem or rock" },
  51     { ROCK_SYM, "large stones", "boulder or statue" },
  52     { BALL_SYM, "iron balls", "iron ball" },
  53     { CHAIN_SYM, "chains", "iron chain" },
  54     { VENOM_SYM, "venoms", "splash of venom" }
  55 };
  56
  57 /* Default monster class symbols.  See monsym.h. */
  58 const struct class_sym def_monsyms[MAXMCLASSES] = {
  59     { '\0', "", "" },
  60     { DEF_ANT, "", "ant or other insect" },
  61     { DEF_BLOB, "", "blob" },
  62     { DEF_COCKATRICE, "", "cockatrice" },
  63     { DEF_DOG, "", "dog or other canine" },
  64     { DEF_EYE, "", "eye or sphere" },
  65     { DEF_FELINE, "", "cat or other feline" },
  66     { DEF_GREMLIN, "", "gremlin" },
  67     { DEF_HUMANOID, "", "humanoid" },
  68     { DEF_IMP, "", "imp or minor demon" },
  69     { DEF_JELLY, "", "jelly" },
  70     { DEF_KOBOLD, "", "kobold" },
  71     { DEF_LEPRECHAUN, "", "leprechaun" },
  72     { DEF_MIMIC, "", "mimic" },
  73     { DEF_NYMPH, "", "nymph" },
  74     { DEF_ORC, "", "orc" },
  75     { DEF_PIERCER, "", "piercer" },
  76     { DEF_QUADRUPED, "", "quadruped" },
  77     { DEF_RODENT, "", "rodent" },
  78     { DEF_SPIDER, "", "arachnid or centipede" },
  79     { DEF_TRAPPER, "", "trapper or lurker above" },
  80     { DEF_UNICORN, "", "unicorn or horse" },
  81     { DEF_VORTEX, "", "vortex" },
  82     { DEF_WORM, "", "worm" },
  83     { DEF_XAN, "", "xan or other mythical/fantastic insect" },
  84     { DEF_LIGHT, "", "light" },
  85     { DEF_ZRUTY, "", "zruty" },
  86     { DEF_ANGEL, "", "angelic being" },
  87     { DEF_BAT, "", "bat or bird" },
  88     { DEF_CENTAUR, "", "centaur" },
  89     { DEF_DRAGON, "", "dragon" },
  90     { DEF_ELEMENTAL, "", "elemental" },
  91     { DEF_FUNGUS, "", "fungus or mold" },
  92     { DEF_GNOME, "", "gnome" },
  93     { DEF_GIANT, "", "giant humanoid" },
  94     { '\0', "", "invisible monster" },
  95     { DEF_JABBERWOCK, "", "jabberwock" },
  96     { DEF_KOP, "", "Keystone Kop" },
  97     { DEF_LICH, "", "lich" },
  98     { DEF_MUMMY, "", "mummy" },
  99     { DEF_NAGA, "", "naga" },
 100     { DEF_OGRE, "", "ogre" },
 101     { DEF_PUDDING, "", "pudding or ooze" },
 102     { DEF_QUANTMECH, "", "quantum mechanic" },
 103     { DEF_RUSTMONST, "", "rust monster or disenchanter" },
 104     { DEF_SNAKE, "", "snake" },
 105     { DEF_TROLL, "", "troll" },
 106     { DEF_UMBER, "", "umber hulk" },
 107     { DEF_VAMPIRE, "", "vampire" },
 108     { DEF_WRAITH, "", "wraith" },
 109     { DEF_XORN, "", "xorn" },
 110     { DEF_YETI, "", "apelike creature" },
 111     { DEF_ZOMBIE, "", "zombie" },
 112     { DEF_HUMAN, "", "human or elf" },
 113     { DEF_GHOST, "", "ghost" },
 114     { DEF_GOLEM, "", "golem" },
 115     { DEF_DEMON, "", "major demon" },
 116     { DEF_EEL, "", "sea monster" },
 117     { DEF_LIZARD, "", "lizard" },
 118     { DEF_WORM_TAIL, "", "long worm tail" },
 119     { DEF_MIMIC_DEF, "", "mimic" },
 120 };
 121
 122 const struct symdef def_warnsyms[WARNCOUNT] = {
 123     /* white warning  */
 124     { '0', "unknown creature causing you worry",    C(CLR_WHITE) },
 125     /* pink warning   */
 126     { '1', "unknown creature causing you concern",  C(CLR_RED) },
 127     /* red warning    */
 128     { '2', "unknown creature causing you anxiety",  C(CLR_RED) },
 129     /* ruby warning   */
 130     { '3', "unknown creature causing you disquiet", C(CLR_RED) },
 131     /* purple warning */
 132     { '4', "unknown creature causing you alarm",    C(CLR_MAGENTA) },
 133     /* black warning  */
 134     { '5', "unknown creature causing you dread",    C(CLR_BRIGHT_MAGENTA) },
 135 };
 136
 137 /*
 138  *  Default screen symbols with explanations and colors.
 139  */
 140 const struct symdef defsyms[MAXPCHARS] = {
 141 /* 0*/ { ' ', "dark part of a room", C(NO_COLOR) },  /* stone */
 142        { '|', "wall", C(CLR_GRAY) },                 /* vwall */
 143        { '-', "wall", C(CLR_GRAY) },                 /* hwall */
 144        { '-', "wall", C(CLR_GRAY) },                 /* tlcorn */
 145        { '-', "wall", C(CLR_GRAY) },                 /* trcorn */
 146        { '-', "wall", C(CLR_GRAY) },                 /* blcorn */
 147        { '-', "wall", C(CLR_GRAY) },                 /* brcorn */
 148        { '-', "wall", C(CLR_GRAY) },                 /* crwall */
 149        { '-', "wall", C(CLR_GRAY) },                 /* tuwall */
 150        { '-', "wall", C(CLR_GRAY) },                 /* tdwall */
 151 /*10*/ { '|', "wall", C(CLR_GRAY) },                 /* tlwall */
 152        { '|', "wall", C(CLR_GRAY) },                 /* trwall */
 153        { '.', "doorway", C(CLR_GRAY) },              /* ndoor */
 154        { '-', "open door", C(CLR_BROWN) },           /* vodoor */
 155        { '|', "open door", C(CLR_BROWN) },           /* hodoor */
 156        { '+', "closed door", C(CLR_BROWN) },         /* vcdoor */
 157        { '+', "closed door", C(CLR_BROWN) },         /* hcdoor */
 158        { '#', "iron bars", C(HI_METAL) },            /* bars */
 159        { '#', "tree", C(CLR_GREEN) },                /* tree */
 160        { '.', "floor of a room", C(CLR_GRAY) },      /* room */
 161 /*20*/ { '.', "dark part of a room", C(CLR_BLACK) }, /* dark room */
 162        { '#', "corridor", C(CLR_GRAY) },             /* dark corr */
 163        { '#', "lit corridor", C(CLR_GRAY) },   /* lit corr (see mapglyph.c) */
 164        { '<', "staircase up", C(CLR_GRAY) },         /* upstair */
 165        { '>', "staircase down", C(CLR_GRAY) },       /* dnstair */
 166        { '<', "ladder up", C(CLR_BROWN) },           /* upladder */
 167        { '>', "ladder down", C(CLR_BROWN) },         /* dnladder */
 168        { '_', "altar", C(CLR_GRAY) },                /* altar */
 169        { '|', "grave", C(CLR_GRAY) },                /* grave */
 170        { '\\', "opulent throne", C(HI_GOLD) },       /* throne */
 171 /*30*/ { '#', "sink", C(CLR_GRAY) },                 /* sink */
 172        { '{', "fountain", C(CLR_BLUE) },             /* fountain */
 173        { '}', "water", C(CLR_BLUE) },                /* pool */
 174        { '.', "ice", C(CLR_CYAN) },                  /* ice */
 175        { '}', "molten lava", C(CLR_RED) },           /* lava */
 176        { '.', "lowered drawbridge", C(CLR_BROWN) },  /* vodbridge */
 177        { '.', "lowered drawbridge", C(CLR_BROWN) },  /* hodbridge */
 178        { '#', "raised drawbridge", C(CLR_BROWN) },   /* vcdbridge */
 179        { '#', "raised drawbridge", C(CLR_BROWN) },   /* hcdbridge */
 180        { ' ', "air", C(CLR_CYAN) },                  /* open air */
 181 /*40*/ { '#', "cloud", C(CLR_GRAY) },                /* [part of] a cloud */
 182        { '}', "water", C(CLR_BLUE) },                /* under water */
 183        { '^', "arrow trap", C(HI_METAL) },           /* trap */
 184        { '^', "dart trap", C(HI_METAL) },            /* trap */
 185        { '^', "falling rock trap", C(CLR_GRAY) },    /* trap */
 186        { '^', "squeaky board", C(CLR_BROWN) },       /* trap */
 187        { '^', "bear trap", C(HI_METAL) },            /* trap */
 188        { '^', "land mine", C(CLR_RED) },             /* trap */
 189        { '^', "rolling boulder trap", C(CLR_GRAY) }, /* trap */
 190        { '^', "sleeping gas trap", C(HI_ZAP) },      /* trap */
 191 /*50*/ { '^', "rust trap", C(CLR_BLUE) },            /* trap */
 192        { '^', "fire trap", C(CLR_ORANGE) },          /* trap */
 193        { '^', "pit", C(CLR_BLACK) },                 /* trap */
 194        { '^', "spiked pit", C(CLR_BLACK) },          /* trap */
 195        { '^', "hole", C(CLR_BROWN) },                /* trap */
 196        { '^', "trap door", C(CLR_BROWN) },           /* trap */
 197        { '^', "teleportation trap", C(CLR_MAGENTA) },  /* trap */
 198        { '^', "level teleporter", C(CLR_MAGENTA) },    /* trap */
 199        { '^', "magic portal", C(CLR_BRIGHT_MAGENTA) }, /* trap */
 200        { '"', "web", C(CLR_GRAY) },                    /* web */
 201 /*60*/ { '^', "statue trap", C(CLR_GRAY) },            /* trap */
 202        { '^', "magic trap", C(HI_ZAP) },               /* trap */
 203        { '^', "anti-magic field", C(HI_ZAP) },         /* trap */
 204        { '^', "polymorph trap", C(CLR_BRIGHT_GREEN) }, /* trap */
 205        { '^', "vibrating square", C(CLR_YELLOW) },     /* trap */
 206        { '|', "wall", C(CLR_GRAY) },            /* vbeam */
 207        { '-', "wall", C(CLR_GRAY) },            /* hbeam */
 208        { '\\', "wall", C(CLR_GRAY) },           /* lslant */
 209        { '/', "wall", C(CLR_GRAY) },            /* rslant */
 210        { '*', "", C(CLR_WHITE) },               /* dig beam */
 211        { '!', "", C(CLR_WHITE) },               /* camera flash beam */
 212        { ')', "", C(HI_WOOD) },                 /* boomerang open left */
 213 /*70*/ { '(', "", C(HI_WOOD) },                 /* boomerang open right */
 214        { '0', "", C(HI_ZAP) },                  /* 4 magic shield symbols */
 215        { '#', "", C(HI_ZAP) },
 216        { '@', "", C(HI_ZAP) },
 217        { '*', "", C(HI_ZAP) },
 218        { '#', "poison cloud", C(CLR_BRIGHT_GREEN) },   /* part of a cloud */
 219        { '?', "valid position", C(CLR_BRIGHT_GREEN) }, /*  target position */
 220        { '/', "", C(CLR_GREEN) },         /* swallow top left      */
 221        { '-', "", C(CLR_GREEN) },         /* swallow top center    */
 222        { '\\', "", C(CLR_GREEN) },        /* swallow top right     */
 223 /*80*/ { '|', "", C(CLR_GREEN) },         /* swallow middle left   */
 224        { '|', "", C(CLR_GREEN) },         /* swallow middle right  */
 225        { '\\', "", C(CLR_GREEN) },        /* swallow bottom left   */
 226        { '-', "", C(CLR_GREEN) },         /* swallow bottom center */
 227        { '/', "", C(CLR_GREEN) },         /* swallow bottom right  */
 228        { '/', "", C(CLR_ORANGE) },        /* explosion top left     */
 229        { '-', "", C(CLR_ORANGE) },        /* explosion top center   */
 230        { '\\', "", C(CLR_ORANGE) },       /* explosion top right    */
 231        { '|', "", C(CLR_ORANGE) },        /* explosion middle left  */
 232        { ' ', "", C(CLR_ORANGE) },        /* explosion middle center*/
 233 /*90*/ { '|', "", C(CLR_ORANGE) },        /* explosion middle right */
 234        { '\\', "", C(CLR_ORANGE) },       /* explosion bottom left  */
 235        { '-', "", C(CLR_ORANGE) },        /* explosion bottom center*/
 236        { '/', "", C(CLR_ORANGE) },        /* explosion bottom right */
 237 };
 238
 239 /* default rogue level symbols */
 240 static const uchar def_r_oc_syms[MAXOCLASSES] = {
 241 /* 0*/ '\0', ILLOBJ_SYM, WEAPON_SYM, ']', /* armor */
 242        RING_SYM,
 243 /* 5*/ ',',                     /* amulet */
 244        TOOL_SYM, ':',           /* food */
 245        POTION_SYM, SCROLL_SYM,
 246 /*10*/ SPBOOK_SYM, WAND_SYM,
 247        GEM_SYM,                /* gold -- yes it's the same as gems */
 248        GEM_SYM, ROCK_SYM,
 249 /*15*/ BALL_SYM, CHAIN_SYM, VENOM_SYM
 250 };
 251
 252 #undef C
 253
 254 #ifdef TERMLIB
 255 void NDECL((*decgraphics_mode_callback)) = 0; /* set in tty_start_screen() */
 256 #endif /* TERMLIB */
 257
 258 #ifdef PC9800
 259 void NDECL((*ibmgraphics_mode_callback)) = 0; /* set in tty_start_screen() */
 260 void NDECL((*ascgraphics_mode_callback)) = 0; /* set in tty_start_screen() */
 261 #endif
 262
 263 /*
 264  * Convert the given character to an object class.  If the character is not
 265  * recognized, then MAXOCLASSES is returned.  Used in detect.c, invent.c,
 266  * objnam.c, options.c, pickup.c, sp_lev.c, lev_main.c, and tilemap.c.
 267  */
 268 int
 269 def_char_to_objclass(ch)
 270 char ch;
 271 {
 272     int i;
 273     for (i = 1; i < MAXOCLASSES; i++)
 274         if (ch == def_oc_syms[i].sym)
 275             break;
 276     return i;
 277 }
 278
 279 /*
 280  * Convert a character into a monster class.  This returns the _first_
 281  * match made.  If there are are no matches, return MAXMCLASSES.
 282  * Used in detect.c, options.c, read.c, sp_lev.c, and lev_main.c
 283  */
 284 int
 285 def_char_to_monclass(ch)
 286 char ch;
 287 {
 288     int i;
 289     for (i = 1; i < MAXMCLASSES; i++)
 290         if (ch == def_monsyms[i].sym)
 291             break;
 292     return i;
 293 }
 294
 295 /*
 296  * Explanations of the functions found below:
 297  *
 298  * init_symbols()
 299  *                     Sets the current display symbols, the
 300  *                     loadable symbols to the default NetHack
 301  *                     symbols, including the r_syms rogue level
 302  *                     symbols. This would typically be done
 303  *                     immediately after execution begins. Any
 304  *                     previously loaded external symbol sets are
 305  *                     discarded.
 306  *
 307  * switch_symbols(arg)
 308  *                     Called to swap in new current display symbols
 309  *                     (showsyms) from either the default symbols,
 310  *                     or from the loaded symbols.
 311  *
 312  *                     If (arg == 0) then showsyms are taken from
 313  *                     defsyms, def_oc_syms, and def_monsyms.
 314  *
 315  *                     If (arg != 0), which is the normal expected
 316  *                     usage, then showsyms are taken from the
 317  *                     adjustable display symbols found in l_syms.
 318  *                     l_syms may have been loaded from an external
 319  *                     symbol file by config file options or interactively
 320  *                     in the Options menu.
 321  *
 322  * assign_graphics(arg)
 323  *
 324  *                     This is used in the game core to toggle in and
 325  *                     out of other {rogue} level display modes.
 326  *
 327  *                     If arg is ROGUESET, this places the rogue level
 328  *                     symbols from r_syms into showsyms.
 329  *
 330  *                     If arg is PRIMARY, this places the symbols
 331  *                     from l_monsyms into showsyms.
 332  *
 333  * update_l_symset()
 334  *                     Update a member of the loadable (l_*) symbol set.
 335  *
 336  * update_r_symset()
 337  *                     Update a member of the rogue (r_*) symbol set.
 338  *
 339  */
 340
 341 void
 342 init_symbols()
 343 {
 344     init_l_symbols();
 345     init_showsyms();
 346     init_r_symbols();
 347 }
 348
 349 void
 350 update_bouldersym()
 351 {
 352     showsyms[SYM_BOULDER + SYM_OFF_X] = iflags.bouldersym;
 353     l_syms[SYM_BOULDER + SYM_OFF_X] = iflags.bouldersym;
 354     r_syms[SYM_BOULDER + SYM_OFF_X] = iflags.bouldersym;
 355 }
 356
 357 void
 358 init_showsyms()
 359 {
 360     register int i;
 361
 362     for (i = 0; i < MAXPCHARS; i++)
 363         showsyms[i + SYM_OFF_P] = defsyms[i].sym;
 364     for (i = 0; i < MAXOCLASSES; i++)
 365         showsyms[i + SYM_OFF_O] = def_oc_syms[i].sym;
 366     for (i = 0; i < MAXMCLASSES; i++)
 367         showsyms[i + SYM_OFF_M] = def_monsyms[i].sym;
 368     for (i = 0; i < WARNCOUNT; i++)
 369         showsyms[i + SYM_OFF_W] = def_warnsyms[i].sym;
 370     for (i = 0; i < MAXOTHER; i++) {
 371         if (i == SYM_BOULDER)
 372             showsyms[i + SYM_OFF_X] = iflags.bouldersym
 373                                         ? iflags.bouldersym
 374                                         : def_oc_syms[ROCK_CLASS].sym;
 375         else if (i == SYM_INVISIBLE)
 376             showsyms[i + SYM_OFF_X] = DEF_INVISIBLE;
 377     }
 378 }
 379
 380 /* initialize defaults for the loadable symset */
 381 void
 382 init_l_symbols()
 383 {
 384     register int i;
 385
 386     for (i = 0; i < MAXPCHARS; i++)
 387         l_syms[i + SYM_OFF_P] = defsyms[i].sym;
 388     for (i = 0; i < MAXOCLASSES; i++)
 389         l_syms[i + SYM_OFF_O] = def_oc_syms[i].sym;
 390     for (i = 0; i < MAXMCLASSES; i++)
 391         l_syms[i + SYM_OFF_M] = def_monsyms[i].sym;
 392     for (i = 0; i < WARNCOUNT; i++)
 393         l_syms[i + SYM_OFF_W] = def_warnsyms[i].sym;
 394     for (i = 0; i < MAXOTHER; i++) {
 395         if (i == SYM_BOULDER)
 396             l_syms[i + SYM_OFF_X] = iflags.bouldersym
 397                                       ? iflags.bouldersym
 398                                       : def_oc_syms[ROCK_CLASS].sym;
 399         else if (i == SYM_INVISIBLE)
 400             l_syms[i + SYM_OFF_X] = DEF_INVISIBLE;
 401     }
 402
 403     clear_symsetentry(PRIMARY, FALSE);
 404 }
 405
 406 void
 407 init_r_symbols()
 408 {
 409     register int i;
 410
 411     /* These are defaults that can get overwritten
 412        later by the roguesymbols option */
 413
 414     for (i = 0; i < MAXPCHARS; i++)
 415         r_syms[i + SYM_OFF_P] = defsyms[i].sym;
 416     r_syms[S_vodoor] = r_syms[S_hodoor] = r_syms[S_ndoor] = '+';
 417     r_syms[S_upstair] = r_syms[S_dnstair] = '%';
 418
 419     for (i = 0; i < MAXOCLASSES; i++)
 420         r_syms[i + SYM_OFF_O] = def_r_oc_syms[i];
 421     for (i = 0; i < MAXMCLASSES; i++)
 422         r_syms[i + SYM_OFF_M] = def_monsyms[i].sym;
 423     for (i = 0; i < WARNCOUNT; i++)
 424         r_syms[i + SYM_OFF_W] = def_warnsyms[i].sym;
 425     for (i = 0; i < MAXOTHER; i++) {
 426         if (i == SYM_BOULDER)
 427             r_syms[i + SYM_OFF_X] = iflags.bouldersym
 428                                       ? iflags.bouldersym
 429                                       : def_oc_syms[ROCK_CLASS].sym;
 430         else if (i == SYM_INVISIBLE)
 431             r_syms[i + SYM_OFF_X] = DEF_INVISIBLE;
 432     }
 433
 434     clear_symsetentry(ROGUESET, FALSE);
 435     /* default on Rogue level is no color
 436      * but some symbol sets can override that
 437      */
 438     symset[ROGUESET].nocolor = 1;
 439 }
 440
 441 void
 442 assign_graphics(whichset)
 443 int whichset;
 444 {
 445     register int i;
 446
 447     switch (whichset) {
 448     case ROGUESET:
 449         /* Adjust graphics display characters on Rogue levels */
 450
 451         for (i = 0; i < SYM_MAX; i++)
 452             showsyms[i] = r_syms[i];
 453
 454 #if defined(MSDOS) && defined(USE_TILES)
 455         if (iflags.grmode)
 456             tileview(FALSE);
 457 #endif
 458         currentgraphics = ROGUESET;
 459         break;
 460
 461     case PRIMARY:
 462     default:
 463         for (i = 0; i < SYM_MAX; i++)
 464             showsyms[i] = l_syms[i];
 465
 466 #if defined(MSDOS) && defined(USE_TILES)
 467         if (iflags.grmode)
 468             tileview(TRUE);
 469 #endif
 470         currentgraphics = PRIMARY;
 471         break;
 472     }
 473 }
 474
 475 void
 476 switch_symbols(nondefault)
 477 int nondefault;
 478 {
 479     register int i;
 480
 481     if (nondefault) {
 482         for (i = 0; i < SYM_MAX; i++)
 483             showsyms[i] = l_syms[i];
 484 #ifdef PC9800
 485         if (SYMHANDLING(H_IBM) && ibmgraphics_mode_callback)
 486             (*ibmgraphics_mode_callback)();
 487         else if (!symset[currentgraphics].name && ascgraphics_mode_callback)
 488             (*ascgraphics_mode_callback)();
 489 #endif
 490 #ifdef TERMLIB
 491         if (SYMHANDLING(H_DEC) && decgraphics_mode_callback)
 492             (*decgraphics_mode_callback)();
 493 #endif
 494     } else
 495         init_symbols();
 496 }
 497
 498 void
 499 update_l_symset(symp, val)
 500 struct symparse *symp;
 501 int val;
 502 {
 503     l_syms[symp->idx] = val;
 504 }
 505
 506 void
 507 update_r_symset(symp, val)
 508 struct symparse *symp;
 509 int val;
 510 {
 511     r_syms[symp->idx] = val;
 512 }
 513
 514 void
 515 clear_symsetentry(which_set, name_too)
 516 int which_set;
 517 boolean name_too;
 518 {
 519     if (symset[which_set].desc)
 520         free((genericptr_t) symset[which_set].desc);
 521     symset[which_set].desc = (char *) 0;
 522
 523     symset[which_set].handling = H_UNK;
 524     symset[which_set].nocolor = 0;
 525     /* initialize restriction bits */
 526     symset[which_set].primary = 0;
 527     symset[which_set].rogue = 0;
 528
 529     if (name_too) {
 530         if (symset[which_set].name)
 531             free((genericptr_t) symset[which_set].name);
 532         symset[which_set].name = (char *) 0;
 533     }
 534 }
 535
 536 /*
 537  * If you are adding code somewhere to be able to recognize
 538  * particular types of symset "handling", define a
 539  * H_XXX macro in include/rm.h and add the name
 540  * to this array at the matching offset.
 541  */
 542 const char *known_handling[] = {
 543     "UNKNOWN", /* H_UNK */
 544     "IBM",     /* H_IBM */
 545     "DEC",     /* H_DEC */
 546     (const char *) 0,
 547 };
 548
 549 /*
 550  * Accepted keywords for symset restrictions.
 551  * These can be virtually anything that you want to
 552  * be able to test in the code someplace.
 553  * Be sure to:
 554  *    - add a corresponding Bitfield to the symsetentry struct in rm.h
 555  *    - initialize the field to zero in parse_sym_line in the SYM_CONTROL
 556  *      case 0 section of the idx switch. The location is prefaced with
 557  *      with a comment stating "initialize restriction bits".
 558  *    - set the value appropriately based on the index of your keyword
 559  *      under the case 5 sections of the same SYM_CONTROL idx switches.
 560  *    - add the field to clear_symsetentry()
 561  */
 562 const char *known_restrictions[] = {
 563     "primary", "rogue", (const char *) 0,
 564 };
 565
 566 struct symparse loadsyms[] = {
 567     { SYM_CONTROL, 0, "start" },
 568     { SYM_CONTROL, 0, "begin" },
 569     { SYM_CONTROL, 1, "finish" },
 570     { SYM_CONTROL, 2, "handling" },
 571     { SYM_CONTROL, 3, "description" },
 572     { SYM_CONTROL, 4, "color" },
 573     { SYM_CONTROL, 4, "colour" },
 574     { SYM_CONTROL, 5, "restrictions" },
 575     { SYM_PCHAR, S_stone, "S_stone" },
 576     { SYM_PCHAR, S_vwall, "S_vwall" },
 577     { SYM_PCHAR, S_hwall, "S_hwall" },
 578     { SYM_PCHAR, S_tlcorn, "S_tlcorn" },
 579     { SYM_PCHAR, S_trcorn, "S_trcorn" },
 580     { SYM_PCHAR, S_blcorn, "S_blcorn" },
 581     { SYM_PCHAR, S_brcorn, "S_brcorn" },
 582     { SYM_PCHAR, S_crwall, "S_crwall" },
 583     { SYM_PCHAR, S_tuwall, "S_tuwall" },
 584     { SYM_PCHAR, S_tdwall, "S_tdwall" },
 585     { SYM_PCHAR, S_tlwall, "S_tlwall" },
 586     { SYM_PCHAR, S_trwall, "S_trwall" },
 587     { SYM_PCHAR, S_ndoor, "S_ndoor" },
 588     { SYM_PCHAR, S_vodoor, "S_vodoor" },
 589     { SYM_PCHAR, S_hodoor, "S_hodoor" },
 590     { SYM_PCHAR, S_vcdoor, "S_vcdoor" },
 591     { SYM_PCHAR, S_hcdoor, "S_hcdoor" },
 592     { SYM_PCHAR, S_bars, "S_bars" },
 593     { SYM_PCHAR, S_tree, "S_tree" },
 594     { SYM_PCHAR, S_room, "S_room" },
 595     { SYM_PCHAR, S_corr, "S_corr" },
 596     { SYM_PCHAR, S_litcorr, "S_litcorr" },
 597     { SYM_PCHAR, S_upstair, "S_upstair" },
 598     { SYM_PCHAR, S_dnstair, "S_dnstair" },
 599     { SYM_PCHAR, S_upladder, "S_upladder" },
 600     { SYM_PCHAR, S_dnladder, "S_dnladder" },
 601     { SYM_PCHAR, S_altar, "S_altar" },
 602     { SYM_PCHAR, S_grave, "S_grave" },
 603     { SYM_PCHAR, S_throne, "S_throne" },
 604     { SYM_PCHAR, S_sink, "S_sink" },
 605     { SYM_PCHAR, S_fountain, "S_fountain" },
 606     { SYM_PCHAR, S_pool, "S_pool" },
 607     { SYM_PCHAR, S_ice, "S_ice" },
 608     { SYM_PCHAR, S_lava, "S_lava" },
 609     { SYM_PCHAR, S_vodbridge, "S_vodbridge" },
 610     { SYM_PCHAR, S_hodbridge, "S_hodbridge" },
 611     { SYM_PCHAR, S_vcdbridge, "S_vcdbridge" },
 612     { SYM_PCHAR, S_hcdbridge, "S_hcdbridge" },
 613     { SYM_PCHAR, S_air, "S_air" },
 614     { SYM_PCHAR, S_cloud, "S_cloud" },
 615     { SYM_PCHAR, S_poisoncloud, "S_poisoncloud" },
 616     { SYM_PCHAR, S_water, "S_water" },
 617     { SYM_PCHAR, S_arrow_trap, "S_arrow_trap" },
 618     { SYM_PCHAR, S_dart_trap, "S_dart_trap" },
 619     { SYM_PCHAR, S_falling_rock_trap, "S_falling_rock_trap" },
 620     { SYM_PCHAR, S_squeaky_board, "S_squeaky_board" },
 621     { SYM_PCHAR, S_bear_trap, "S_bear_trap" },
 622     { SYM_PCHAR, S_land_mine, "S_land_mine" },
 623     { SYM_PCHAR, S_rolling_boulder_trap, "S_rolling_boulder_trap" },
 624     { SYM_PCHAR, S_sleeping_gas_trap, "S_sleeping_gas_trap" },
 625     { SYM_PCHAR, S_rust_trap, "S_rust_trap" },
 626     { SYM_PCHAR, S_fire_trap, "S_fire_trap" },
 627     { SYM_PCHAR, S_pit, "S_pit" },
 628     { SYM_PCHAR, S_spiked_pit, "S_spiked_pit" },
 629     { SYM_PCHAR, S_hole, "S_hole" },
 630     { SYM_PCHAR, S_trap_door, "S_trap_door" },
 631     { SYM_PCHAR, S_teleportation_trap, "S_teleportation_trap" },
 632     { SYM_PCHAR, S_level_teleporter, "S_level_teleporter" },
 633     { SYM_PCHAR, S_magic_portal, "S_magic_portal" },
 634     { SYM_PCHAR, S_web, "S_web" },
 635     { SYM_PCHAR, S_statue_trap, "S_statue_trap" },
 636     { SYM_PCHAR, S_magic_trap, "S_magic_trap" },
 637     { SYM_PCHAR, S_anti_magic_trap, "S_anti_magic_trap" },
 638     { SYM_PCHAR, S_polymorph_trap, "S_polymorph_trap" },
 639     { SYM_PCHAR, S_vbeam, "S_vbeam" },
 640     { SYM_PCHAR, S_hbeam, "S_hbeam" },
 641     { SYM_PCHAR, S_lslant, "S_lslant" },
 642     { SYM_PCHAR, S_rslant, "S_rslant" },
 643     { SYM_PCHAR, S_digbeam, "S_digbeam" },
 644     { SYM_PCHAR, S_flashbeam, "S_flashbeam" },
 645     { SYM_PCHAR, S_boomleft, "S_boomleft" },
 646     { SYM_PCHAR, S_boomright, "S_boomright" },
 647     { SYM_PCHAR, S_goodpos, "S_goodpos" },
 648     { SYM_PCHAR, S_ss1, "S_ss1" },
 649     { SYM_PCHAR, S_ss2, "S_ss2" },
 650     { SYM_PCHAR, S_ss3, "S_ss3" },
 651     { SYM_PCHAR, S_ss4, "S_ss4" },
 652     { SYM_PCHAR, S_sw_tl, "S_sw_tl" },
 653     { SYM_PCHAR, S_sw_tc, "S_sw_tc" },
 654     { SYM_PCHAR, S_sw_tr, "S_sw_tr" },
 655     { SYM_PCHAR, S_sw_ml, "S_sw_ml" },
 656     { SYM_PCHAR, S_sw_mr, "S_sw_mr" },
 657     { SYM_PCHAR, S_sw_bl, "S_sw_bl" },
 658     { SYM_PCHAR, S_sw_bc, "S_sw_bc" },
 659     { SYM_PCHAR, S_sw_br, "S_sw_br" },
 660     { SYM_PCHAR, S_explode1, "S_explode1" },
 661     { SYM_PCHAR, S_explode2, "S_explode2" },
 662     { SYM_PCHAR, S_explode3, "S_explode3" },
 663     { SYM_PCHAR, S_explode4, "S_explode4" },
 664     { SYM_PCHAR, S_explode5, "S_explode5" },
 665     { SYM_PCHAR, S_explode6, "S_explode6" },
 666     { SYM_PCHAR, S_explode7, "S_explode7" },
 667     { SYM_PCHAR, S_explode8, "S_explode8" },
 668     { SYM_PCHAR, S_explode9, "S_explode9" },
 669     { SYM_OC, WEAPON_CLASS + SYM_OFF_O, "S_weapon" },
 670     { SYM_OC, ARMOR_CLASS + SYM_OFF_O, "S_armor" },
 671     { SYM_OC, ARMOR_CLASS + SYM_OFF_O, "S_armour" },
 672     { SYM_OC, RING_CLASS + SYM_OFF_O, "S_ring" },
 673     { SYM_OC, AMULET_CLASS + SYM_OFF_O, "S_amulet" },
 674     { SYM_OC, TOOL_CLASS + SYM_OFF_O, "S_tool" },
 675     { SYM_OC, FOOD_CLASS + SYM_OFF_O, "S_food" },
 676     { SYM_OC, POTION_CLASS + SYM_OFF_O, "S_potion" },
 677     { SYM_OC, SCROLL_CLASS + SYM_OFF_O, "S_scroll" },
 678     { SYM_OC, SPBOOK_CLASS + SYM_OFF_O, "S_book" },
 679     { SYM_OC, WAND_CLASS + SYM_OFF_O, "S_wand" },
 680     { SYM_OC, COIN_CLASS + SYM_OFF_O, "S_coin" },
 681     { SYM_OC, GEM_CLASS + SYM_OFF_O, "S_gem" },
 682     { SYM_OC, ROCK_CLASS + SYM_OFF_O, "S_rock" },
 683     { SYM_OC, BALL_CLASS + SYM_OFF_O, "S_ball" },
 684     { SYM_OC, CHAIN_CLASS + SYM_OFF_O, "S_chain" },
 685     { SYM_OC, VENOM_CLASS + SYM_OFF_O, "S_venom" },
 686     { SYM_MON, S_ANT + SYM_OFF_M, "S_ant" },
 687     { SYM_MON, S_BLOB + SYM_OFF_M, "S_blob" },
 688     { SYM_MON, S_COCKATRICE + SYM_OFF_M, "S_cockatrice" },
 689     { SYM_MON, S_DOG + SYM_OFF_M, "S_dog" },
 690     { SYM_MON, S_EYE + SYM_OFF_M, "S_eye" },
 691     { SYM_MON, S_FELINE + SYM_OFF_M, "S_feline" },
 692     { SYM_MON, S_GREMLIN + SYM_OFF_M, "S_gremlin" },
 693     { SYM_MON, S_HUMANOID + SYM_OFF_M, "S_humanoid" },
 694     { SYM_MON, S_IMP + SYM_OFF_M, "S_imp" },
 695     { SYM_MON, S_JELLY + SYM_OFF_M, "S_jelly" },
 696     { SYM_MON, S_KOBOLD + SYM_OFF_M, "S_kobold" },
 697     { SYM_MON, S_LEPRECHAUN + SYM_OFF_M, "S_leprechaun" },
 698     { SYM_MON, S_MIMIC + SYM_OFF_M, "S_mimic" },
 699     { SYM_MON, S_NYMPH + SYM_OFF_M, "S_nymph" },
 700     { SYM_MON, S_ORC + SYM_OFF_M, "S_orc" },
 701     { SYM_MON, S_PIERCER + SYM_OFF_M, "S_piercer" },
 702     { SYM_MON, S_QUADRUPED + SYM_OFF_M, "S_quadruped" },
 703     { SYM_MON, S_RODENT + SYM_OFF_M, "S_rodent" },
 704     { SYM_MON, S_SPIDER + SYM_OFF_M, "S_spider" },
 705     { SYM_MON, S_TRAPPER + SYM_OFF_M, "S_trapper" },
 706     { SYM_MON, S_UNICORN + SYM_OFF_M, "S_unicorn" },
 707     { SYM_MON, S_VORTEX + SYM_OFF_M, "S_vortex" },
 708     { SYM_MON, S_WORM + SYM_OFF_M, "S_worm" },
 709     { SYM_MON, S_XAN + SYM_OFF_M, "S_xan" },
 710     { SYM_MON, S_LIGHT + SYM_OFF_M, "S_light" },
 711     { SYM_MON, S_ZRUTY + SYM_OFF_M, "S_zruty" },
 712     { SYM_MON, S_ANGEL + SYM_OFF_M, "S_angel" },
 713     { SYM_MON, S_BAT + SYM_OFF_M, "S_bat" },
 714     { SYM_MON, S_CENTAUR + SYM_OFF_M, "S_centaur" },
 715     { SYM_MON, S_DRAGON + SYM_OFF_M, "S_dragon" },
 716     { SYM_MON, S_ELEMENTAL + SYM_OFF_M, "S_elemental" },
 717     { SYM_MON, S_FUNGUS + SYM_OFF_M, "S_fungus" },
 718     { SYM_MON, S_GNOME + SYM_OFF_M, "S_gnome" },
 719     { SYM_MON, S_GIANT + SYM_OFF_M, "S_giant" },
 720     { SYM_MON, S_JABBERWOCK + SYM_OFF_M, "S_jabberwock" },
 721     { SYM_MON, S_KOP + SYM_OFF_M, "S_kop" },
 722     { SYM_MON, S_LICH + SYM_OFF_M, "S_lich" },
 723     { SYM_MON, S_MUMMY + SYM_OFF_M, "S_mummy" },
 724     { SYM_MON, S_NAGA + SYM_OFF_M, "S_naga" },
 725     { SYM_MON, S_OGRE + SYM_OFF_M, "S_ogre" },
 726     { SYM_MON, S_PUDDING + SYM_OFF_M, "S_pudding" },
 727     { SYM_MON, S_QUANTMECH + SYM_OFF_M, "S_quantmech" },
 728     { SYM_MON, S_RUSTMONST + SYM_OFF_M, "S_rustmonst" },
 729     { SYM_MON, S_SNAKE + SYM_OFF_M, "S_snake" },
 730     { SYM_MON, S_TROLL + SYM_OFF_M, "S_troll" },
 731     { SYM_MON, S_UMBER + SYM_OFF_M, "S_umber" },
 732     { SYM_MON, S_VAMPIRE + SYM_OFF_M, "S_vampire" },
 733     { SYM_MON, S_WRAITH + SYM_OFF_M, "S_wraith" },
 734     { SYM_MON, S_XORN + SYM_OFF_M, "S_xorn" },
 735     { SYM_MON, S_YETI + SYM_OFF_M, "S_yeti" },
 736     { SYM_MON, S_ZOMBIE + SYM_OFF_M, "S_zombie" },
 737     { SYM_MON, S_HUMAN + SYM_OFF_M, "S_human" },
 738     { SYM_MON, S_GHOST + SYM_OFF_M, "S_ghost" },
 739     { SYM_MON, S_GOLEM + SYM_OFF_M, "S_golem" },
 740     { SYM_MON, S_DEMON + SYM_OFF_M, "S_demon" },
 741     { SYM_MON, S_EEL + SYM_OFF_M, "S_eel" },
 742     { SYM_MON, S_LIZARD + SYM_OFF_M, "S_lizard" },
 743     { SYM_MON, S_WORM_TAIL + SYM_OFF_M, "S_worm_tail" },
 744     { SYM_MON, S_MIMIC_DEF + SYM_OFF_M, "S_mimic_def" },
 745     { SYM_OTH, SYM_BOULDER + SYM_OFF_X, "S_boulder" },
 746     { SYM_OTH, SYM_INVISIBLE + SYM_OFF_X, "S_invisible" },
 747     { 0, 0, (const char *) 0 } /* fence post */
 748 };
 749
 750 /*drawing.c*/