[contraband-cvs] CVS: contraband/config armour.lisp,1.6,1.7 leaders.lisp,1.7,1.8 objects.lisp,1.9,1.10 townies.lisp,1.4,1.5 weapons.lisp,1.3,1.4

[Stig E S. <st...@us...>]

Update of /cvsroot/contraband/contraband/config
In directory sc8-pr-cvs1:/tmp/cvs-serv31313

Modified Files:
	armour.lisp leaders.lisp objects.lisp townies.lisp 
	weapons.lisp 
Log Message:
moved more info to gfx-sym

Index: armour.lisp
===================================================================
RCS file: /cvsroot/contraband/contraband/config/armour.lisp,v
retrieving revision 1.6
retrieving revision 1.7
diff -C2 -d -r1.6 -r1.7
*** armour.lisp	2 Jun 2003 12:33:41 -0000	1.6
--- armour.lisp	26 Jun 2003 21:41:30 -0000	1.7
***************
*** 133,138 ****
  (define-object-kind "leather-boots" "& pair~ of leather boots"
    :numeric-id 2102
!   :x-attr (tile-file +tilefile-armour+)
!   :x-char (tile-number 20)
    :text-attr #\U
    :text-char #\]
--- 133,137 ----
  (define-object-kind "leather-boots" "& pair~ of leather boots"
    :numeric-id 2102
!   :gfx-sym (tile-paint-value +tilefile-armour+ 20)
    :text-attr #\U
    :text-char #\]
***************
*** 161,166 ****
  (define-object-kind "chain-boots" "& pair~ of chain boots"
    :numeric-id 2104
!   :x-attr (tile-file +tilefile-armour+)
!   :x-char (tile-number 22)
    :text-attr #\s
    :text-char #\]
--- 160,164 ----
  (define-object-kind "chain-boots" "& pair~ of chain boots"
    :numeric-id 2104
!   :gfx-sym (tile-paint-value +tilefile-armour+ 22)
    :text-attr #\s
    :text-char #\]
***************
*** 176,181 ****
  (define-object-kind "bronze-boots" "& pair~ of bronze-plated boots"
    :numeric-id 2105
!   :x-attr (tile-file +tilefile-armour+)
!   :x-char (tile-number 22)
    :text-attr #\s
    :text-char #\]
--- 174,178 ----
  (define-object-kind "bronze-boots" "& pair~ of bronze-plated boots"
    :numeric-id 2105
!   :gfx-sym (tile-paint-value +tilefile-armour+ 22)
    :text-attr #\s
    :text-char #\]
***************
*** 191,196 ****
  (define-object-kind "steel-boots" "& pair~ of steel-plated boots"
    :numeric-id 2106
!   :x-attr (tile-file +tilefile-armour+)
!   :x-char (tile-number 22)
    :text-attr #\s
    :text-char #\]
--- 188,192 ----
  (define-object-kind "steel-boots" "& pair~ of steel-plated boots"
    :numeric-id 2106
!   :gfx-sym (tile-paint-value +tilefile-armour+ 22)
    :text-attr #\s
    :text-char #\]
***************
*** 208,213 ****
  (define-object-kind "hat" "& hat~"
    :numeric-id 2200
!   :x-attr (tile-file +tilefile-armour+)
!   :x-char (tile-number 71)
    :text-attr #\u
    :text-char #\]
--- 204,208 ----
  (define-object-kind "hat" "& hat~"
    :numeric-id 2200
!   :gfx-sym (tile-paint-value +tilefile-armour+ 71)
    :text-attr #\u
    :text-char #\]
***************
*** 223,228 ****
  (define-object-kind "leather-cap" "& leather cap~"
    :numeric-id 2201
!   :x-attr (tile-file +tilefile-armour+)
!   :x-char (tile-number 70)
    :text-attr #\u
    :text-char #\]
--- 218,222 ----
  (define-object-kind "leather-cap" "& leather cap~"
    :numeric-id 2201
!   :gfx-sym (tile-paint-value +tilefile-armour+ 70)
    :text-attr #\u
    :text-char #\]
***************
*** 251,256 ****
  (define-object-kind "chain-coif" "& chain-coif~"
    :numeric-id 2203
!   :x-attr (tile-file +tilefile-armour+)
!   :x-char (tile-number 11)
    :text-attr #\s
    :text-char #\]
--- 245,249 ----
  (define-object-kind "chain-coif" "& chain-coif~"
    :numeric-id 2203
!   :gfx-sym (tile-paint-value +tilefile-armour+ 11)
    :text-attr #\s
    :text-char #\]
***************
*** 266,271 ****
  (define-object-kind "iron-helm" "& iron helm~"
    :numeric-id 2204
!   :x-attr (tile-file +tilefile-armour+)
!   :x-char (tile-number 12)
    :text-attr #\s
    :text-char #\]
--- 259,263 ----
  (define-object-kind "iron-helm" "& iron helm~"
    :numeric-id 2204
!   :gfx-sym (tile-paint-value +tilefile-armour+ 12)
    :text-attr #\s
    :text-char #\]
***************
*** 281,286 ****
  (define-object-kind "steel-helm" "& steel helm~"
    :numeric-id 2205
!   :x-attr (tile-file +tilefile-armour+)
!   :x-char (tile-number 13)
    :text-attr #\W
    :text-char #\]
--- 273,277 ----
  (define-object-kind "steel-helm" "& steel helm~"
    :numeric-id 2205
!   :gfx-sym (tile-paint-value +tilefile-armour+ 13)
    :text-attr #\W
    :text-char #\]
***************
*** 299,304 ****
  (define-object-kind "shirt-expensive" "& expensive shirt~"
    :numeric-id 2300
!   :x-attr (tile-file 47)
!   :x-char (tile-number 0)
    :text-attr #\b
    :text-char #\(
--- 290,294 ----
  (define-object-kind "shirt-expensive" "& expensive shirt~"
    :numeric-id 2300
!   :gfx-sym (tile-paint-value 47 0)
    :text-attr #\b
    :text-char #\(
***************
*** 315,320 ****
  (define-object-kind "robe" "& robe~"
    :numeric-id 2301
!   :x-attr (tile-file +tilefile-armour+)
!   :x-char (tile-number 34)
    :text-attr #\b
    :text-char #\(
--- 305,309 ----
  (define-object-kind "robe" "& robe~"
    :numeric-id 2301
!   :gfx-sym (tile-paint-value +tilefile-armour+ 34)
    :text-attr #\b
    :text-char #\(
***************
*** 331,336 ****
  (define-object-kind "leather-armour" "leather armour~"
    :numeric-id 2302
!   :x-attr (tile-file +tilefile-armour+)
!   :x-char (tile-number 38)
    :text-attr #\U
    :text-char #\(
--- 320,324 ----
  (define-object-kind "leather-armour" "leather armour~"
    :numeric-id 2302
!   :gfx-sym (tile-paint-value +tilefile-armour+ 38)
    :text-attr #\U
    :text-char #\(
***************
*** 346,351 ****
  (define-object-kind "studded-leather" "studded leather~"
    :numeric-id 2303
!   :x-attr (tile-file +tilefile-armour+)
!   :x-char (tile-number 39)
    :text-attr #\U
    :text-char #\(
--- 334,338 ----
  (define-object-kind "studded-leather" "studded leather~"
    :numeric-id 2303
!   :gfx-sym (tile-paint-value +tilefile-armour+ 39)
    :text-attr #\U
    :text-char #\(
***************
*** 361,366 ****
  (define-object-kind "chain-mail" "chain mail~"
    :numeric-id 2305
!   :x-attr (tile-file +tilefile-armour+)
!   :x-char (tile-number 45)
    :text-attr #\s
    :text-char #\[
--- 348,352 ----
  (define-object-kind "chain-mail" "chain mail~"
    :numeric-id 2305
!   :gfx-sym (tile-paint-value +tilefile-armour+ 45)
    :text-attr #\s
    :text-char #\[
***************
*** 376,381 ****
  (define-object-kind "metal-lamellar" "metal lamellar armour~"
    :numeric-id 2306
!   :x-attr (tile-file +tilefile-armour+)
!   :x-char (tile-number 51)
    :text-attr #\W
    :text-char #\[
--- 362,366 ----
  (define-object-kind "metal-lamellar" "metal lamellar armour~"
    :numeric-id 2306
!   :gfx-sym (tile-paint-value +tilefile-armour+ 51)
    :text-attr #\W
    :text-char #\[
***************
*** 391,396 ****
  (define-object-kind "steel-plate" "steel plate armour~"
    :numeric-id 2307
!   :x-attr (tile-file +tilefile-armour+)
!   :x-char (tile-number 52)
    :text-attr #\W
    :text-char #\[
--- 376,380 ----
  (define-object-kind "steel-plate" "steel plate armour~"
    :numeric-id 2307
!   :gfx-sym (tile-paint-value +tilefile-armour+ 52)
    :text-attr #\W
    :text-char #\[
***************
*** 406,411 ****
  (define-object-kind "shirt-common" "& common shirt~"
    :numeric-id 2308
!   :x-attr (tile-file 47)
!   :x-char (tile-number 0)
    :text-attr #\b
    :text-char #\(
--- 390,394 ----
  (define-object-kind "shirt-common" "& common shirt~"
    :numeric-id 2308
!   :gfx-sym (tile-paint-value 47 0)
    :text-attr #\b
    :text-char #\(
***************
*** 424,429 ****
  (define-object-kind "pants-expensive" "& expensive pants"
    :numeric-id 2400
!   :x-attr (tile-file 47)
!   :x-char (tile-number 1)
    :text-attr #\b
    :text-char #\(
--- 407,411 ----
  (define-object-kind "pants-expensive" "& expensive pants"
    :numeric-id 2400
!   :gfx-sym (tile-paint-value 47 1)
    :text-attr #\b
    :text-char #\(
***************
*** 439,444 ****
  (define-object-kind "pants-common" "& common pants"
    :numeric-id 2401
!   :x-attr (tile-file 47)
!   :x-char (tile-number 1)
    :text-attr #\b
    :text-char #\(
--- 421,425 ----
  (define-object-kind "pants-common" "& common pants"
    :numeric-id 2401
!   :gfx-sym (tile-paint-value 47 1)
    :text-attr #\b
    :text-char #\(
***************
*** 458,463 ****
  (define-object-kind "coat-expensive" "& expensive coat~"
    :numeric-id 2500
!   :x-attr (tile-file +tilefile-armour+)
!   :x-char (tile-number 6)
    :text-attr #\g
    :text-char #\(
--- 439,443 ----
  (define-object-kind "coat-expensive" "& expensive coat~"
    :numeric-id 2500
!   :gfx-sym (tile-paint-value +tilefile-armour+ 6)
    :text-attr #\g
    :text-char #\(
***************
*** 474,479 ****
  (define-object-kind "cloak" "& cloak~"
    :numeric-id 2501
!   :x-attr (tile-file +tilefile-armour+)
!   :x-char (tile-number 0)
    :text-attr #\g
    :text-char #\(
--- 454,458 ----
  (define-object-kind "cloak" "& cloak~"
    :numeric-id 2501
!   :gfx-sym (tile-paint-value +tilefile-armour+ 0)
    :text-attr #\g
    :text-char #\(
***************
*** 489,494 ****
  (define-object-kind "shadow-cloak" "& shadow cloak~"
    :numeric-id 2502
!   :x-attr (tile-file +tilefile-armour+)
!   :x-char (tile-number 1)
    :text-attr #\D
    :text-char #\(
--- 468,472 ----
  (define-object-kind "shadow-cloak" "& shadow cloak~"
    :numeric-id 2502
!   :gfx-sym (tile-paint-value +tilefile-armour+ 1)
    :text-attr #\D
    :text-char #\(
***************
*** 505,510 ****
  (define-object-kind "coat-common" "& common coat~"
    :numeric-id 2503
!   :x-attr (tile-file +tilefile-armour+)
!   :x-char (tile-number 6)
    :text-attr #\g
    :text-char #\(
--- 483,487 ----
  (define-object-kind "coat-common" "& common coat~"
    :numeric-id 2503
!   :gfx-sym (tile-paint-value +tilefile-armour+ 6)
    :text-attr #\g
    :text-char #\(
***************
*** 523,528 ****
  (define-object-kind "gloves-calfskin" "& set~ of calfskin gloves"
    :numeric-id 2600
!   :x-attr (tile-file +tilefile-armour+)
!   :x-char (tile-number 24)
    :text-attr #\U
    :text-char #\]
--- 500,504 ----
  (define-object-kind "gloves-calfskin" "& set~ of calfskin gloves"
    :numeric-id 2600
!   :gfx-sym (tile-paint-value +tilefile-armour+ 24)
    :text-attr #\U
    :text-char #\]
***************
*** 538,543 ****
  (define-object-kind "gloves-leather" "& set~ of leather gloves"
    :numeric-id 2601
!   :x-attr (tile-file +tilefile-armour+)
!   :x-char (tile-number 23)
    :text-attr #\U
    :text-char #\]
--- 514,518 ----
  (define-object-kind "gloves-leather" "& set~ of leather gloves"
    :numeric-id 2601
!   :gfx-sym (tile-paint-value +tilefile-armour+ 23)
    :text-attr #\U
    :text-char #\]
***************
*** 553,558 ****
  (define-object-kind "gauntlets" "& set~ of gauntlets"
    :numeric-id 2602
!   :x-attr (tile-file +tilefile-armour+)
!   :x-char (tile-number 26)
    :text-attr #\U
    :text-char #\]
--- 528,532 ----
  (define-object-kind "gauntlets" "& set~ of gauntlets"
    :numeric-id 2602
!   :gfx-sym (tile-paint-value +tilefile-armour+ 26)
    :text-attr #\U
    :text-char #\]
***************
*** 568,573 ****
  (define-object-kind "cesti" "& set~ of cesti"
    :numeric-id 2603
!   :x-attr (tile-file +tilefile-armour+)
!   :x-char (tile-number 27)
    :text-attr #\W
    :text-char #\]
--- 542,546 ----
  (define-object-kind "cesti" "& set~ of cesti"
    :numeric-id 2603
!   :gfx-sym (tile-paint-value +tilefile-armour+ 27)
    :text-attr #\W
    :text-char #\]
***************
*** 585,590 ****
  (define-object-kind "small-leather-shield" "& small leather shield~"
    :numeric-id 2700
!   :x-attr (tile-file +tilefile-armour+)
!   :x-char (tile-number 90)
    :text-attr #\U
    :text-char #\)
--- 558,562 ----
  (define-object-kind "small-leather-shield" "& small leather shield~"
    :numeric-id 2700
!   :gfx-sym (tile-paint-value +tilefile-armour+ 90)
    :text-attr #\U
    :text-char #\)
***************
*** 600,605 ****
  (define-object-kind "large-leather-shield" "& large leather shield~"
    :numeric-id 2701
!   :x-attr (tile-file +tilefile-armour+)
!   :x-char (tile-number 29)
    :text-attr #\U
    :text-char #\)
--- 572,576 ----
  (define-object-kind "large-leather-shield" "& large leather shield~"
    :numeric-id 2701
!   :gfx-sym (tile-paint-value +tilefile-armour+ 29)
    :text-attr #\U
    :text-char #\)
***************
*** 615,620 ****
  (define-object-kind "small-metal-shield" "& small metal shield~"
    :numeric-id 2702
!   :x-attr (tile-file +tilefile-armour+)
!   :x-char (tile-number 93)
    :text-attr #\s
    :text-char #\)
--- 586,590 ----
  (define-object-kind "small-metal-shield" "& small metal shield~"
    :numeric-id 2702
!   :gfx-sym (tile-paint-value +tilefile-armour+ 93)
    :text-attr #\s
    :text-char #\)
***************
*** 630,635 ****
  (define-object-kind "large-metal-shield" "& large metal shield~"
    :numeric-id 2703
!   :x-attr (tile-file +tilefile-armour+)
!   :x-char (tile-number 89)
    :text-attr #\s
    :text-char #\)
--- 600,604 ----
  (define-object-kind "large-metal-shield" "& large metal shield~"
    :numeric-id 2703
!   :gfx-sym (tile-paint-value +tilefile-armour+ 89)
    :text-attr #\s
    :text-char #\)

Index: leaders.lisp
===================================================================
RCS file: /cvsroot/contraband/contraband/config/leaders.lisp,v
retrieving revision 1.7
retrieving revision 1.8
diff -C2 -d -r1.7 -r1.8
*** leaders.lisp	20 Apr 2003 00:40:06 -0000	1.7
--- leaders.lisp	26 Jun 2003 21:41:31 -0000	1.8
***************
*** 3,8 ****
  (define-monster-kind "mereo-junifer" "Mereo Junifer"
    :numeric-id  1002
!   :x-attr (tile-file 24)
!   :x-char (tile-number 17)
    :desc "She's respected and loved by her soldiers."
    :text-char #\p
--- 3,7 ----
  (define-monster-kind "mereo-junifer" "Mereo Junifer"
    :numeric-id  1002
!   :gfx-sym (tile-paint-value 24 17)
    :desc "She's respected and loved by her soldiers."
    :text-char #\p
***************
*** 27,32 ****
  (define-monster-kind "captain-perpetro" "Captain Perpetro"
    :numeric-id  1003
!   :x-attr (tile-file 14)
!   :x-char (tile-number 10)
    :desc "He's in command of Renuo civil matters."
    :text-char #\p
--- 26,30 ----
  (define-monster-kind "captain-perpetro" "Captain Perpetro"
    :numeric-id  1003
!   :gfx-sym (tile-paint-value 14 10)
    :desc "He's in command of Renuo civil matters."
    :text-char #\p
***************
*** 51,56 ****
  (define-monster-kind "mereo-ulydes" "Mereo Ulydes"
    :numeric-id  1002
!   :x-attr (tile-file 24)
!   :x-char (tile-number 2)
    :desc "He's the Imperial Mereo of Bartertown."
    :text-char #\p
--- 49,53 ----
  (define-monster-kind "mereo-ulydes" "Mereo Ulydes"
    :numeric-id  1002
!   :gfx-sym (tile-paint-value 24 2)
    :desc "He's the Imperial Mereo of Bartertown."
    :text-char #\p
***************
*** 75,80 ****
  (define-monster-kind "consul-tepesco" "Consul Tepesco"
    :numeric-id  1002
!   :x-attr (tile-file 6)
!   :x-char (tile-number 38)
    :desc "He's the Atrocitan Consul of Bartertown."
    :text-char #\p
--- 72,76 ----
  (define-monster-kind "consul-tepesco" "Consul Tepesco"
    :numeric-id  1002
!   :gfx-sym (tile-paint-value 6 38)
    :desc "He's the Atrocitan Consul of Bartertown."
    :text-char #\p
***************
*** 100,105 ****
  (define-monster-kind "trader-farethan" "Avi Farethan"
    :numeric-id  1101
!   :x-attr (tile-file 24)
!   :x-char (tile-number 67)
    :desc "He's an atrocitan trader."
    :text-char #\p
--- 96,100 ----
  (define-monster-kind "trader-farethan" "Avi Farethan"
    :numeric-id  1101
!   :gfx-sym (tile-paint-value 24 67)
    :desc "He's an atrocitan trader."
    :text-char #\p
***************
*** 118,123 ****
  (define-monster-kind "elf-fossgard" "Fossgard the tailour"
    :numeric-id  1201
!   :x-attr (tile-file 24)
!   :x-char (tile-number 61)
    :desc "He's a well-known elven tailour, known for his mastery of silk."
    :text-char #\e
--- 113,117 ----
  (define-monster-kind "elf-fossgard" "Fossgard the tailour"
    :numeric-id  1201
!   :gfx-sym (tile-paint-value 24 61)
    :desc "He's a well-known elven tailour, known for his mastery of silk."
    :text-char #\e
***************
*** 143,148 ****
  (define-monster-kind "merchant-lodicus" "Lodicus Archus"
    :numeric-id  1102
!   :x-attr (tile-file 14)
!   :x-char (tile-number 8)
    :desc "He's an important merchant in the copian merchant guild."
    :text-char #\p
--- 137,141 ----
  (define-monster-kind "merchant-lodicus" "Lodicus Archus"
    :numeric-id  1102
!   :gfx-sym (tile-paint-value 14 8)
    :desc "He's an important merchant in the copian merchant guild."
    :text-char #\p

Index: objects.lisp
===================================================================
RCS file: /cvsroot/contraband/contraband/config/objects.lisp,v
retrieving revision 1.9
retrieving revision 1.10
diff -C2 -d -r1.9 -r1.10
*** objects.lisp	2 Jun 2003 12:33:40 -0000	1.9
--- objects.lisp	26 Jun 2003 21:41:31 -0000	1.10
***************
*** 20,25 ****
    :text-attr #\w
    :text-char #\?
!   :x-attr (tile-file 10)
!   :x-char (tile-number 19)
    :weight 5
    :cost 125
--- 20,24 ----
    :text-attr #\w
    :text-char #\?
!   :gfx-sym (tile-paint-value 10 19)
    :weight 5
    :cost 125
***************
*** 38,43 ****
    :text-attr #\w
    :text-char #\?
!   :x-attr (tile-file 10)
!   :x-char (tile-number 90)
    :weight 5
    :cost 125
--- 37,41 ----
    :text-attr #\w
    :text-char #\?
!   :gfx-sym (tile-paint-value 10 90)
    :weight 5
    :cost 125
***************
*** 54,59 ****
    :text-attr #\w
    :text-char #\?
!   :x-attr (tile-file 10)
!   :x-char (tile-number 19)
    :weight 5
    :cost 125
--- 52,56 ----
    :text-attr #\w
    :text-char #\?
!   :gfx-sym (tile-paint-value 10 19)
    :weight 5
    :cost 125
***************
*** 71,76 ****
    :text-attr #\w
    :text-char #\?
!   :x-attr (tile-file 10)
!   :x-char (tile-number 19)
    :weight 5
    :cost 125
--- 68,72 ----
    :text-attr #\w
    :text-char #\?
!   :gfx-sym (tile-paint-value 10 19)
    :weight 5
    :cost 125
***************
*** 88,93 ****
    :text-attr #\w
    :text-char #\?
!   :x-attr (tile-file 10)
!   :x-char (tile-number 19)
    :weight 5
    :cost 125
--- 84,88 ----
    :text-attr #\w
    :text-char #\?
!   :gfx-sym (tile-paint-value 10 19)
    :weight 5
    :cost 125
***************
*** 105,110 ****
    :text-attr #\w
    :text-char #\?
!   :x-attr (tile-file 10)
!   :x-char (tile-number 19)
    :weight 5
    :cost 125
--- 100,104 ----
    :text-attr #\w
    :text-char #\?
!   :gfx-sym (tile-paint-value 10 19)
    :weight 5
    :cost 125
***************
*** 122,127 ****
    :text-attr #\w
    :text-char #\?
!   :x-attr (tile-file 10)
!   :x-char (tile-number 86)
    :weight 5
    :cost 125
--- 116,120 ----
    :text-attr #\w
    :text-char #\?
!   :gfx-sym (tile-paint-value 10 86)
    :weight 5
    :cost 125
***************
*** 138,143 ****
    :text-attr #\w
    :text-char #\?
!   :x-attr (tile-file 10)
!   :x-char (tile-number 19)
    :weight 5
    :cost 125
--- 131,135 ----
    :text-attr #\w
    :text-char #\?
!   :gfx-sym (tile-paint-value 10 19)
    :weight 5
    :cost 125
***************
*** 154,159 ****
    :text-attr #\w
    :text-char #\?
!   :x-attr (tile-file 10)
!   :x-char (tile-number 19)
    :weight 5
    :cost 125
--- 146,150 ----
    :text-attr #\w
    :text-char #\?
!   :gfx-sym (tile-paint-value 10 19)
    :weight 5
    :cost 125
***************
*** 170,175 ****
    :text-attr #\w
    :text-char #\?
!   :x-attr (tile-file 10)
!   :x-char (tile-number 19)
    :weight 5
    :cost 125
--- 161,165 ----
    :text-attr #\w
    :text-char #\?
!   :gfx-sym (tile-paint-value 10 19)
    :weight 5
    :cost 125
***************
*** 185,190 ****
  (define-object-kind "green-silk-dress" "& green dress~ of silk"
    :numeric-id 301
!   :x-attr (tile-file 42)
!   :x-char (tile-number 0)
    :text-attr #\g
    :text-char #\(
--- 175,179 ----
  (define-object-kind "green-silk-dress" "& green dress~ of silk"
    :numeric-id 301
!   :gfx-sym (tile-paint-value 42 0)
    :text-attr #\g
    :text-char #\(
***************
*** 199,204 ****
  (define-object-kind "trader-amulet" "& amulet~ of the atrocitan trader's guild"
    :numeric-id 302
!   :x-attr (tile-file 8)
!   :x-char (tile-number 37)
    :text-attr #\b
    :text-char #\"
--- 188,192 ----
  (define-object-kind "trader-amulet" "& amulet~ of the atrocitan trader's guild"
    :numeric-id 302
!   :gfx-sym (tile-paint-value 8 37)
    :text-attr #\b
    :text-char #\"
***************
*** 212,217 ****
  (define-object-kind "facts-machine" "& atrocitan facts-machine~"
    :numeric-id 701
!   :x-attr (tile-file 43)
!   :x-char (tile-number 0)
    :text-attr #\u
    :text-char #\o
--- 200,204 ----
  (define-object-kind "facts-machine" "& atrocitan facts-machine~"
    :numeric-id 701
!   :gfx-sym (tile-paint-value 43 0)
    :text-attr #\u
    :text-char #\o

Index: townies.lisp
===================================================================
RCS file: /cvsroot/contraband/contraband/config/townies.lisp,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -d -r1.4 -r1.5
*** townies.lisp	13 Apr 2003 15:33:17 -0000	1.4
--- townies.lisp	26 Jun 2003 21:41:31 -0000	1.5
***************
*** 3,11 ****
  (define-monster-kind "copian-guard" "Imperial Guard"
    :numeric-id  13
!   :x-attr (tile-file 7)
!   :x-char (tile-number 5)
    :desc "He is there to make you and other citizens safe."
!   :text-char #\p
!   :text-attr #\r
    :power-lvl 10
    :hitpoints '(10 . 10)
--- 3,9 ----
  (define-monster-kind "copian-guard" "Imperial Guard"
    :numeric-id  13
!   :gfx-sym (tile-paint-value 7 5)
    :desc "He is there to make you and other citizens safe."
!   :text-sym (text-paint-value +term-red+ #\p)
    :power-lvl 10
    :hitpoints '(10 . 10)
***************
*** 20,28 ****
  (define-monster-kind "copian-customs-officer" "Customs officer"
    :numeric-id  14
!   :x-attr (tile-file 14)
!   :x-char (tile-number 9)
    :desc "He ensures that papers are ok, all taxes are paid and no illegal goods are trafficked."
!   :text-char #\p
!   :text-attr #\r
    :power-lvl 7
    :hitpoints '(7 . 10)
--- 18,24 ----
  (define-monster-kind "copian-customs-officer" "Customs officer"
    :numeric-id  14
!   :gfx-sym (tile-paint-value 14 9)
    :desc "He ensures that papers are ok, all taxes are paid and no illegal goods are trafficked."
!   :text-sym (text-paint-value +term-red+ #\p)
    :power-lvl 7
    :hitpoints '(7 . 10)

Index: weapons.lisp
===================================================================
RCS file: /cvsroot/contraband/contraband/config/weapons.lisp,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** weapons.lisp	2 Jun 2003 11:17:41 -0000	1.3
--- weapons.lisp	26 Jun 2003 21:41:31 -0000	1.4
***************
*** 18,25 ****
  (define-object-kind "dagger" "& dagger~"
    :numeric-id 1001
!   :x-attr (tile-file +tilefile-weapons+)
!   :x-char (tile-number 3)
!   :text-attr #\W
!   :text-char #\|
    :locations '((0 . 1) (5 . 1) (10 . 1) (20 . 1))
    :weight 12
--- 18,23 ----
  (define-object-kind "dagger" "& dagger~"
    :numeric-id 1001
!   :gfx-sym (tile-paint-value +tilefile-weapons+ 3)
!   :text-sym (text-paint-value +term-l-white+ #\|)
    :locations '((0 . 1) (5 . 1) (10 . 1) (20 . 1))
    :weight 12
***************
*** 33,40 ****
  (define-object-kind "short-sword" "& short sword~"
    :numeric-id 1002
!   :x-attr (tile-file 13)
!   :x-char (tile-number 8)
!   :text-attr #\W
!   :text-char #\|
    :locations '((5 . 1))
    :weight 80
--- 31,36 ----
  (define-object-kind "short-sword" "& short sword~"
    :numeric-id 1002
!   :gfx-sym (tile-paint-value 13 8)
!   :text-sym (text-paint-value +term-l-white+ #\|)
    :locations '((5 . 1))
    :weight 80