1(kern-mk-palette 'pal_expanded 2 (list 3 ;; There are 110 entries in this palette 4 ;; The widest glyph is 2 characters 5 ;; 6 ;; Note: 7 ;; It is best if all glyphs in a palette are of the same width, 8 ;; so all glyphs in this palette should be 2 characters wide, 9 ;; like "xx" rather than "x". 10 ;; 11 ;; This constraint makes it easier to edit maps via search & replace, 12 ;; and makes it easier to change the palette. 13 ;; 14 ;; NOTE: "x#" is reserved for blocking mechanisms, see block-teleporting in 15 ;; naz.scm 16 (list "xx" t_wall) ;; "wall" 17 (list "__" t_deep) ;; "deep water" 18 (list "_!" t_sunlit_deep) ;; "deep water" 19 (list "~*" t_blendable_shoals) ;; "shallow water" 20 (list "_s" t_sludge) 21 (list "~s" t_shallow_sludge) 22 (list "dd" t_dirt) 23 (list "gg" t_gravel) 24 25 (list "%%" t_bog) ;; "bog" 26 (list ".." t_grass) ;; "grass" 27 (list ".!" t_sunlit_grass) ;; "grass" 28 (list "t." t_trees_v) ;; "trees (transparent)" 29 (list "tt" t_trees) ;; "trees" 30 (list "t|" t_trees_d) ;; "trees denser" 31 32 (list "||" t_forest) ;; "forest" 33 (list "|X" t_forest_d) ;; "forest (denser)" 34 (list "|t" t_forest_l) ;; "forest (lighter)" 35 (list "|." t_forest_v) ;; "forest (non-LOS-blocking)" 36 (list "|v" t_forest_b) ;; "forest (totally LOS-blocking)" 37 38 (list "{{" t_hills) ;; "hills" 39 40 (list "^^" t_mountains) ;; "mountains" 41 (list "^." t_mountains_v) ;; "mountains" (non-LOS-blocking) 42 (list "^v" t_mountains_b) ;; "mountains" (below player) 43 (list "^~" t_fake_mountains) 44 45 (list ",," t_flagstones) ;; "flagstones" 46 (list "~," t_inv_wall) 47 (list "d," t_doorway) 48 (list "cc" t_cobblestone) ;; "cobblestone" 49 (list "cx" t_impassable_cobblestone) ;; "cobblestone" 50 51 (list "cg" t_gold_cobble) 52 (list "cy" t_cyan_cobble) 53 (list "cG" t_gray_cobble) 54 (list "cb" t_blue_cobble) 55 (list "co" t_olive_cobble) 56 (list "cw" t_white_cobble) 57 (list "Tb" t_black_tile) 58 (list "Tg" t_gold_spiral_tile) 59 (list "Tb" t_blue_spiral_tile) 60 61 (list "ee" t_deck) ;; "deck" 62 (list "oo" t_mast) ;; "mast" 63 (list "ff" t_fire_terrain) ;; "fire" 64 (list "!!" t_lava) ;; "lava" 65 (list "~!" t_fake_lava) 66 (list "!_" t_deep_lava) 67 (list "&&" t_fireplace) ;; "fireplace" 68 69 (list "x." t_wall_v) ;; "wall" (non-LOS-blocking) 70 (list "~x" t_fake_wall) 71 72 (list "**" t_stars) ;; "stars" 73 (list "*." t_void) 74 (list "??" t_secret_door) ;; "secret door" 75 (list "pp" t_pillar) ;; "pillar" 76 (list "~p" t_false_pillar) 77 (list "bb" t_boulder) ;; "boulder" 78 (list "b~" t_water_rocks) ;; "boulder" in water 79 (list "bt" t_tombstone) 80 (list "bT" t_tombstone2) 81 82 (list "rr" t_wall_rock) ;; "rock wall" 83 (list "r." t_wall_rock_v) ;; "rock wall" (non-LOS-blocking) 84 (list "~r" t_fake_wall_rock) ;; "rock wall" (fake) 85 86 (list "WW" t_ships_wheel) ;; "ship's wheel" 87 (list "x!" t_wall_torch) ;; "wall torch" 88 (list "##" t_ship_hull) ;; "ship's hull" 89 (list "#>" t_ship_hull2) ;; "ship's hull (LOS-blocking)" 90 91 (list ".A" t_a) ;; "an A" 92 (list ".B" t_b) ;; "a B" 93 (list "?B" t_fake_b) ;; "a B" 94 (list ".C" t_c) ;; "a C" 95 (list ".D" t_d) ;; "a D" 96 (list ".E" t_e) ;; "an E" 97 (list ".F" t_f) ;; "an F" 98 (list ".G" t_g) ;; "a G" 99 (list ".H" t_h) ;; "an H" 100 (list ".I" t_i) ;; "an I" 101 (list ".J" t_j) ;; "a J" 102 (list ".K" t_k) ;; "a K" 103 (list ".L" t_l) ;; "an L" 104 (list ".M" t_m) ;; "an M" 105 (list ".N" t_n) ;; "an N" 106 (list ".O" t_o) ;; "an O" 107 (list "~O" t_fake_o) 108 (list ".P" t_p) ;; "a P" 109 (list ".Q" t_q) ;; "a Q" 110 (list ".R" t_r) ;; "an R" 111 (list ".S" t_s) ;; "an S" 112 (list ".T" t_t) ;; "a T" 113 (list ".U" t_u) ;; "a U" 114 (list ".V" t_v) ;; "a V" 115 (list ".W" t_w) ;; "a W" 116 (list ".X" t_x) ;; "an X" 117 (list ".Y" t_y) ;; "a Y" 118 (list ".Z" t_z) ;; "a Z" 119 120 (list ",A" t_rune_a) ;; "a rune" 121 (list ",B" t_rune_b) ;; "a rune" 122 (list ",C" t_rune_c) ;; "a rune" 123 (list ",D" t_rune_d) ;; "a rune" 124 (list ",E" t_rune_e) ;; "a rune" 125 (list ",F" t_rune_f) ;; "a rune" 126 (list ",G" t_rune_g) ;; "a rune" 127 (list ",H" t_rune_h) ;; "a rune" 128 (list ",I" t_rune_i) ;; "a rune" 129 (list ",J" t_rune_j) ;; "a rune" 130 (list ",K" t_rune_k) ;; "a rune" 131 (list ",L" t_rune_l) ;; "a rune" 132 (list ",M" t_rune_m) ;; "a rune" 133 (list ",N" t_rune_n) ;; "a rune" 134 (list ",O" t_rune_o) ;; "a rune" 135 (list ",P" t_rune_p) ;; "a rune" 136 (list ",Q" t_rune_q) ;; "a rune" 137 (list ",R" t_rune_r) ;; "a rune" 138 (list ",S" t_rune_s) ;; "a rune" 139 (list ",T" t_rune_t) ;; "a rune" 140 (list ",U" t_rune_u) ;; "a rune" 141 (list ",V" t_rune_v) ;; "a rune" 142 (list ",W" t_rune_w) ;; "a rune" 143 (list ",X" t_rune_x) ;; "a rune" 144 (list ",Y" t_rune_y) ;; "a rune" 145 (list ",Z" t_rune_z) ;; "a rune" 146 (list ";T" t_rune_th) ;; "a rune" 147 (list ";E" t_rune_ee) ;; "a rune" 148 (list ";N" t_rune_ng) ;; "a rune" 149 (list ";A" t_rune_ea) ;; "a rune" 150 (list ";S" t_rune_st) ;; "a rune" 151 (list ";D" t_rune_dot) ;; "a rune" 152 153 (list "@@" t_counter_2x1_c) ;; "counter" 154 (list "[[" t_counter_2x1_w) ;; "counter" 155 (list "]]" t_counter_2x1_e) ;; "counter" 156 (list "00" t_counter_1x1) ;; "counter" 157 158 (list "++" t_ankh) ;; "ankh" 159 (list "+s" t_statue) ;; "ankh" 160 (list "aa" t_altar) ;; "altar" 161 (list "ar" t_rune_altar) ;; "altar" 162 (list "a!" t_active_altar) ;; "altar" 163 (list "<<" t_leftwing) ;; "castle wall" 164 (list ">>" t_rightwing) ;; "castle wall" 165 (list "w+" t_arrow_slit) ;; "arrow slit" 166 (list "ws" t_window_in_stone) ;; "window" 167 (list "wr" t_window_in_rock) ;; "window" 168 169 (list "==" t_bridge_WE) ;; "east-west bridge" 170 (list "=|" t_bridge_NS) ;; "east-west bridge" 171 (list "=!" t_lava_bridge_NS) 172 (list "vv" t_chasm) ;; "chasm" 173 174 (list "sE" t_equip_sign) 175 (list "sA" t_weapon_sign) 176 (list "sH" t_healer_sign) 177 (list "sT" t_tavern_sign) 178 (list "sI" t_inn_sign) 179 (list "sP" t_alchemy_sign) 180 (list "sR" t_magic_sign) 181 (list "sS" t_str_sign) 182 (list "sD" t_dex_sign) 183 (list "sW" t_wis_sign) 184 185 ;; blended terrains (mostly terrain + corner of something else) 186 187 (list "/0" t_trail_0) ;; "trail" 188 (list "/1" t_trail_1) ;; "trail" 189 (list "/2" t_trail_2) ;; "trail" 190 (list "/3" t_trail_3) ;; "trail" 191 (list "/4" t_trail_4) ;; "trail" 192 (list "/5" t_trail_5) ;; "trail" 193 (list "/6" t_trail_6) ;; "trail" 194 (list "/7" t_trail_7) ;; "trail" 195 (list "/8" t_trail_8) ;; "trail" 196 (list "/9" t_trail_9) ;; "trail" 197 (list "/a" t_trail_a) ;; "trail" 198 (list "/b" t_trail_b) ;; "trail" 199 (list "/c" t_trail_c) ;; "trail" 200 (list "/d" t_trail_d) ;; "trail" 201 (list "/e" t_trail_e) ;; "trail" 202 (list "/f" t_trail_f) ;; "trail" 203 204 (list "~~" t_shoals) ;; shallow + land 205 (list "~1" t_shore_n) 206 (list "~2" t_shore_w) 207 (list "~3" t_shore_nw) 208 (list "~4" t_shore_e) 209 (list "~5" t_shore_ne) 210 (list "~6" t_shore_we) 211 (list "~7" t_shore_nwe) 212 (list "~8" t_shore_s) 213 (list "~9" t_shore_ns) 214 (list "~a" t_shore_ws) 215 (list "~b" t_shore_nws) 216 (list "~c" t_shore_es) 217 (list "~d" t_shore_nes) 218 (list "~e" t_shore_wes) 219 (list "~f" t_shore_c) 220 221 (list "--" t_shallow) ;; water + land 222 (list "-1" t_wshore_n) 223 (list "-2" t_wshore_w) 224 (list "-3" t_wshore_nw) 225 (list "-4" t_wshore_e) 226 (list "-5" t_wshore_ne) 227 (list "-6" t_wshore_we) 228 (list "-7" t_wshore_nwe) 229 (list "-8" t_wshore_s) 230 (list "-9" t_wshore_ns) 231 (list "-a" t_wshore_ws) 232 (list "-b" t_wshore_nws) 233 (list "-c" t_wshore_es) 234 (list "-d" t_wshore_nes) 235 (list "-e" t_wshore_wes) 236 (list "-f" t_wshore_c) 237 238 (list "_1" t_dshore_n) ;; deep water + land 239 (list "_2" t_dshore_w) 240 (list "_3" t_dshore_nw) 241 (list "_4" t_dshore_e) 242 (list "_5" t_dshore_ne) 243 (list "_6" t_dshore_we) 244 (list "_7" t_dshore_nwe) 245 (list "_8" t_dshore_s) 246 (list "_9" t_dshore_ns) 247 (list "_a" t_dshore_ws) 248 (list "_b" t_dshore_nws) 249 (list "_c" t_dshore_es) 250 (list "_d" t_dshore_nes) 251 (list "_e" t_dshore_wes) 252 (list "_f" t_dshore_c) 253 254 (list "*1" t_voids_n) ;; void + land 255 (list "*2" t_voids_w) 256 (list "*3" t_voids_nw) 257 (list "*4" t_voids_e) 258 (list "*5" t_voids_ne) 259 (list "*6" t_voids_we) 260 (list "*7" t_voids_nwe) 261 (list "*8" t_voids_s) 262 (list "*9" t_voids_ns) 263 (list "*a" t_voids_ws) 264 (list "*b" t_voids_nws) 265 (list "*c" t_voids_es) 266 (list "*d" t_voids_nes) 267 (list "*e" t_voids_wes) 268 (list "*f" t_voids_c) 269 270 (list "{1" t_hilledge_n) ;; grass + hills 271 (list "{2" t_hilledge_w) 272 (list "{3" t_hilledge_nw) 273 (list "{4" t_hilledge_e) 274 (list "{5" t_hilledge_ne) 275 (list "{6" t_hilledge_we) 276 (list "{7" t_hilledge_nwe) 277 (list "{8" t_hilledge_s) 278 (list "{9" t_hilledge_ns) 279 (list "{a" t_hilledge_ws) 280 (list "{b" t_hilledge_nws) 281 (list "{c" t_hilledge_es) 282 (list "{d" t_hilledge_nes) 283 (list "{e" t_hilledge_wes) 284 (list "{f" t_hilledge_c) 285 286 (list "%3" t_bog_nw) ;; bog + land 287 (list "%5" t_bog_ne) 288 (list "%7" t_bog_nwe) 289 (list "%a" t_bog_ws) 290 (list "%b" t_bog_nws) 291 (list "%c" t_bog_es) 292 (list "%d" t_bog_nes) 293 (list "%e" t_bog_wes) 294 (list "%f" t_bog_c) 295 296 (list "t3" t_trees_nw) ;; trees + grass 297 (list "t5" t_trees_ne) 298 (list "t7" t_trees_nwe) 299 (list "ta" t_trees_ws) 300 (list "tb" t_trees_nws) 301 (list "tc" t_trees_es) 302 (list "td" t_trees_nes) 303 (list "te" t_trees_wes) 304 (list "tf" t_trees_c) 305 306 (list "t#" t_grasst_nw) ;; grass + trees 307 (list "t%" t_grasst_ne) 308 (list "t&" t_grasst_nwe) 309 (list "tA" t_grasst_ws) 310 (list "tB" t_grasst_nws) 311 (list "tC" t_grasst_es) 312 (list "tD" t_grasst_nes) 313 (list "tE" t_grasst_wes) 314 (list "tF" t_grasst_c) 315 316 (list "~#" t_grassw_nw) ;; grass + water 317 (list "~%" t_grassw_ne) 318 (list "~&" t_grassw_nwe) 319 (list "~A" t_grassw_ws) 320 (list "~B" t_grassw_nws) 321 (list "~C" t_grassw_es) 322 (list "~D" t_grassw_nes) 323 (list "~E" t_grassw_wes) 324 (list "~F" t_grassw_c) 325 326 (list "{#" t_hilli_nw) ;; hills + grass 327 (list "{%" t_hilli_ne) 328 (list "{&" t_hilli_nwe) 329 (list "{A" t_hilli_ws) 330 (list "{B" t_hilli_nws) 331 (list "{C" t_hilli_es) 332 (list "{D" t_hilli_nes) 333 (list "{E" t_hilli_wes) 334 (list "{F" t_hilli_c) 335 336 (list "|#" t_forestg_nw) ;; forest + grass 337 (list "|%" t_forestg_ne) 338 (list "|&" t_forestg_nwe) 339 (list "|A" t_forestg_ws) 340 (list "|B" t_forestg_nws) 341 (list "|C" t_forestg_es) 342 (list "|D" t_forestg_nes) 343 (list "|E" t_forestg_wes) 344 345 (list "tG" t_treew_nw) ;; trees + water 346 (list "tH" t_treew_ne) 347 (list "tI" t_treew_nwe) 348 (list "tJ" t_treew_ws) 349 (list "tK" t_treew_nws) 350 (list "tL" t_treew_es) 351 (list "tM" t_treew_nes) 352 (list "tN" t_treew_wes) 353 (list "tO" t_treew_c) 354 355 (list "{G" t_hillw_nw) ;; hills + water 356 (list "{H" t_hillw_ne) 357 (list "{I" t_hillw_nwe) 358 (list "{J" t_hillw_ws) 359 (list "{K" t_hillw_nws) 360 (list "{L" t_hillw_es) 361 (list "{M" t_hillw_nes) 362 (list "{N" t_hillw_wes) 363 (list "{O" t_hillw_c) 364 365 (list "{g" t_hillv_nw) ;; hills + void 366 (list "{h" t_hillv_ne) 367 (list "{i" t_hillv_nwe) 368 (list "{j" t_hillv_ws) 369 (list "{k" t_hillv_nws) 370 (list "{l" t_hillv_es) 371 (list "{m" t_hillv_nes) 372 (list "{n" t_hillv_wes) 373 374 (list ".g" t_grassv_nw) ;; grass + void 375 (list ".h" t_grassv_ne) 376 (list ".i" t_grassv_nwe) 377 (list ".j" t_grassv_ws) 378 (list ".k" t_grassv_nws) 379 (list ".l" t_grassv_es) 380 (list ".m" t_grassv_nes) 381 (list ".n" t_grassv_wes) 382 383 (list "^g" t_mountv_nw) ;; mounts + void 384 (list "^h" t_mountv_ne) 385 (list "^i" t_mountv_nwe) 386 (list "^j" t_mountv_ws) 387 (list "^k" t_mountv_nws) 388 (list "^l" t_mountv_es) 389 (list "^m" t_mountv_nes) 390 (list "^n" t_mountv_wes) 391 392 (list "^3" t_mountg_nw) ;; mounts + grass 393 (list "^5" t_mountg_ne) 394 (list "^7" t_mountg_nwe) 395 (list "^a" t_mountg_ws) 396 (list "^b" t_mountg_nws) 397 (list "^c" t_mountg_es) 398 (list "^d" t_mountg_nes) 399 (list "^e" t_mountg_wes) 400 (list "^f" t_mountg_c) 401 402 (list "^G" t_mountw_nw) ;; mounts + water 403 (list "^H" t_mountw_ne) 404 (list "^I" t_mountw_nwe) 405 (list "^J" t_mountw_ws) 406 (list "^K" t_mountw_nws) 407 (list "^L" t_mountw_es) 408 (list "^M" t_mountw_nes) 409 (list "^N" t_mountw_wes) 410 (list "^O" t_mountw_c) 411 412 (list "!3" t_lava_nw) ;; lava + land 413 (list "!5" t_lava_ne) 414 (list "!6" t_lava_we) 415 (list "!7" t_lava_nwe) 416 (list "!a" t_lava_ws) 417 (list "!b" t_lava_nws) 418 (list "!c" t_lava_es) 419 (list "!d" t_lava_nes) 420 (list "!e" t_lava_wes) 421 (list "!f" t_lava_c) 422 423 (list "#=" t_rail_ew) 424 (list "#|" t_rail_ns) 425 (list "#a" t_bulwark_n) 426 (list "#b" t_bulwark_w) 427 (list "#c" t_bulwark_e) 428 (list "#d" t_bulwark_s) 429 (list "#A" t_bulwark_v_n) 430 (list "#B" t_bulwark_v_w) 431 (list "#C" t_bulwark_v_e) 432 (list "#D" t_bulwark_v_s) 433 (list "#e" t_bulwark_w_nw) 434 (list "#f" t_bulwark_w_ne) 435 (list "#g" t_bulwark_w_sw) 436 (list "#h" t_bulwark_w_se) 437 (list "#E" t_bulwark_d_nw) 438 (list "#F" t_bulwark_d_ne) 439 (list "#G" t_bulwark_d_sw) 440 (list "#H" t_bulwark_d_se) 441 (list "#i" t_bulwark_v_nw) 442 (list "#j" t_bulwark_v_ne) 443 (list "#k" t_bulwark_v_sw) 444 (list "#l" t_bulwark_v_se) 445 (list "#I" t_bulwark_x_nw) 446 (list "#J" t_bulwark_x_ne) 447 (list "#K" t_bulwark_x_sw) 448 (list "#L" t_bulwark_x_se) 449 (list "#s" t_bulwark_x_ns) 450 (list "#r" t_bulwark_x_ew) 451 452 (list "#m" t_tank_l) 453 (list "#M" t_tank_d) 454 (list "#n" t_tank_nw) 455 (list "#o" t_tank_ne) 456 (list "#p" t_tank_sw) 457 (list "#q" t_tank_se) 458 (list "#N" t_tank_d_nw) 459 (list "#O" t_tank_d_ne) 460 (list "#P" t_tank_d_sw) 461 (list "#Q" t_tank_d_se) 462 463 (list "<n" t_stair_un) 464 (list "<s" t_stair_us) 465 (list "<w" t_stair_uw) 466 (list "<e" t_stair_ue) 467 468 (list "rn" t_nat_rock) 469 (list "r1" t_nat_rock_n) 470 (list "r2" t_nat_rock_w) 471 (list "r3" t_nat_rock_nw) 472 (list "r4" t_nat_rock_e) 473 (list "r5" t_nat_rock_ne) 474 (list "r6" t_nat_rock_we) 475 (list "r7" t_nat_rock_nwe) 476 (list "r8" t_nat_rock_s) 477 (list "r9" t_nat_rock_ns) 478 (list "ra" t_nat_rock_ws) 479 (list "rb" t_nat_rock_nws) 480 (list "rc" t_nat_rock_es) 481 (list "rd" t_nat_rock_nes) 482 (list "re" t_nat_rock_wes) 483 (list "rf" t_nat_rock_nwes) 484 (list "r~" t_fake_wall_nrock) 485 486 ) 487) ;; palette pal_expanded 488 489