home *** CD-ROM | disk | FTP | other *** search
/ c't freeware shareware 2001 January / CT_SW0101.ISO / pc / software / spiele / strat / fcraft.tgz / fcraft.tar / clone-000402 / data / ccl / units.ccl < prev    next >
Text File  |  2000-04-02  |  105KB  |  3,848 lines

  1. ;;   ___________             _________              _____  __
  2. ;;   \_      _____/______   ____   ____ \_   ___ \____________ _/ ____\/  |_
  3. ;;    |    __) \_  __ \_/ __ \_/ __ \/    \  \/\_  __ \__  \\   __\\   __\ 
  4. ;;    |     \   |  | \/\  ___/\  ___/\     \____|  | \// __ \|  |   |  |
  5. ;;    \___  /   |__|    \___  >\___  >\______  /|__|  (____  /__|   |__|
  6. ;;      \/            \/       \/         \/           \/
  7. ;;  ______________________                           ______________________
  8. ;;              T H E   W A R   B E G I N S
  9. ;;       FreeCraft - A free fantasy real time strategy game engine
  10. ;;
  11. ;;    units.ccl    -    Define the used unit types.
  12. ;;
  13. ;;    (c) Copyright 1998,2000 by Lutz Sammer
  14. ;;
  15. ;;    $Id: units.ccl,v 1.7 2000/03/17 16:07:33 root Exp $
  16. ;;
  17.  
  18. ;;=============================================================================
  19. ;;    Define unit types.
  20. ;;
  21. ;;    NOTE: Save can generate this table.
  22. ;;
  23. ;;    NOTE: Don't change the order or delete or add an item !!
  24. ;;    NOTE: The current C-code didn't like it.
  25. ;;
  26. (define-unit-type "unit-footman"        "Footman"
  27.   ;; graphic data
  28.   #("footman.png"
  29.     ()
  30.     ()
  31.     () )
  32.   '(  72  72 )            ;; graphic size
  33.   "animations-footman"    ;; animations
  34.   "icon-footman"
  35.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  36.       10       0      4     60      0 #(   60    600       0      0 )
  37.   ;;Tile    Box Size    Attack    ReactC    ReactH
  38.   '( 1 1 ) '(  31  31 )     1       6       4
  39.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  40.        2    60      6      3       1       1
  41.   ;;Decay Annoy    Points
  42.       0      0      50
  43.   "missile-none"
  44.   'corpse-human
  45.   'type-land
  46.   'right-attack
  47.   'can-target-land 
  48.   ;; flags
  49.   'land-unit
  50.   'can-attack
  51.   'organic
  52.   'selectable-by-rectangle
  53.   ;; sounds
  54.   #("footman-selected"
  55.     "footman-acknowledge"
  56.     "footman-ready"
  57.     "footman-help"
  58.     "footman-dead" )
  59.   "footman-attack" )
  60.  
  61. (define-unit-type "unit-grunt"            "Grunt"
  62.   ;; graphic data
  63.   #("grunt.png"
  64.     ()
  65.     ()
  66.     () )
  67.   '(  72  72 )            ;; graphic size
  68.   "animations-grunt"    ;; animations
  69.   "icon-grunt"
  70.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  71.       10       0      4     60      0 #(   60    600       0      0 )
  72.   ;;Tile    Box Size    Attack    ReactC    ReactH
  73.   '( 1 1 ) '(  31  31 )     1       6       4
  74.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  75.        2    60      6      3       1       1
  76.   ;;Decay Annoy    Points
  77.       0      0      50
  78.   "missile-none"
  79.   'corpse-orc
  80.   'type-land
  81.   'right-attack
  82.   'can-target-land 
  83.   ;; flags
  84.   'land-unit
  85.   'can-attack
  86.   'organic
  87.   'selectable-by-rectangle
  88.   ;; sounds
  89.   #("grunt-selected"
  90.     "grunt-acknowledge"
  91.     "grunt-ready"
  92.     "grunt-help"
  93.     "grunt-dead" )
  94.   "grunt-attack" )
  95.  
  96. (define-unit-type "unit-peasant"        "Peasant"
  97.   ;; graphic data
  98.   #("peasant.png"
  99.     ()
  100.     ()
  101.     () )
  102.   '(  72  72 )            ;; graphic size
  103.   "animations-peasant"    ;; animations
  104.   "icon-peasant"
  105.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  106.       10       0      4     30      0 #(   45    400       0      0 )
  107.   ;;Tile    Box Size    Attack    ReactC    ReactH
  108.   '( 1 1 ) '(  31  31 )     1       6       4
  109.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  110.        0    50      3      2       0       0
  111.   ;;Decay Annoy    Points
  112.       0      0      30
  113.   "missile-none"
  114.   'corpse-human
  115.   'type-land
  116.   'right-harvest
  117.   'can-target-land 
  118.   ;; flags
  119.   'land-unit
  120.   'cower-peon
  121.   'can-attack
  122.   'organic
  123.   'selectable-by-rectangle
  124.   ;; sounds
  125.   #("peasant-selected"
  126.     "peasant-acknowledge"
  127.     "peasant-ready"
  128.     "peasant-help"
  129.     "peasant-dead" )
  130.   "peasant-attack" )
  131.  
  132. (define-unit-type "unit-peon"            "Peon"
  133.   ;; graphic data
  134.   #("peon.png"
  135.     ()
  136.     ()
  137.     () )
  138.   '(  72  72 )            ;; graphic size
  139.   "animations-peon"    ;; animations
  140.   "icon-peon"
  141.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  142.       10       0      4     30      0 #(   45    400       0      0 )
  143.   ;;Tile    Box Size    Attack    ReactC    ReactH
  144.   '( 1 1 ) '(  31  31 )     1       6       4
  145.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  146.        0    50      3      2       0       0
  147.   ;;Decay Annoy    Points
  148.       0      0      30
  149.   "missile-none"
  150.   'corpse-orc
  151.   'type-land
  152.   'right-harvest
  153.   'can-target-land 
  154.   ;; flags
  155.   'land-unit
  156.   'cower-peon
  157.   'can-attack
  158.   'organic
  159.   'selectable-by-rectangle
  160.   ;; sounds
  161.   #("peon-selected"
  162.     "peon-acknowledge"
  163.     "peon-ready"
  164.     "peon-help"
  165.     "peon-dead" )
  166.   "peon-attack" )
  167.  
  168. (define-unit-type "unit-ballista"        "Ballista"
  169.   ;; graphic data
  170.   #("ballista.png"
  171.     ()
  172.     ()
  173.     () )
  174.   '(  64  64 )            ;; graphic size
  175.   "animations-ballista"    ;; animations
  176.   "icon-ballista"
  177.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  178.        5       0      9    110      0 #(  250    900     300      0 )
  179.   ;;Tile    Box Size    Attack    ReactC    ReactH
  180.   '( 1 1 ) '(  63  63 )     8      11       9
  181.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  182.        0    70     80      0       1       0
  183.   ;;Decay Annoy    Points
  184.       0      0     100
  185.   "missile-ballista-bolt"
  186.   'corpse-none
  187.   'type-land
  188.   'right-attack
  189.   'can-target-land 'can-target-sea 
  190.   ;; flags
  191.   'explode-when-killed
  192.   'can-ground-attack
  193.   'can-attack
  194.   'selectable-by-rectangle
  195.   ;; sounds
  196.   #("ballista-selected"
  197.     "ballista-acknowledge"
  198.     "ballista-ready"
  199.     "ballista-help"
  200.     "ballista-dead" )
  201.   "ballista-attack" )
  202.  
  203. (define-unit-type "unit-catapult"        "Catapult"
  204.   ;; graphic data
  205.   #("catapult.png"
  206.     ()
  207.     ()
  208.     () )
  209.   '(  64  64 )            ;; graphic size
  210.   "animations-catapult"    ;; animations
  211.   "icon-catapult"
  212.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  213.        5       0      9    110      0 #(  250    900     300      0 )
  214.   ;;Tile    Box Size    Attack    ReactC    ReactH
  215.   '( 1 1 ) '(  63  63 )     8      11       9
  216.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  217.        0    70     80      0       1       0
  218.   ;;Decay Annoy    Points
  219.       0      0     100
  220.   "missile-catapult-rock"
  221.   'corpse-none
  222.   'type-land
  223.   'right-attack
  224.   'can-target-land 'can-target-sea 
  225.   ;; flags
  226.   'explode-when-killed
  227.   'can-ground-attack
  228.   'can-attack
  229.   'selectable-by-rectangle
  230.   ;; sounds
  231.   #("catapult-selected"
  232.     "catapult-acknowledge"
  233.     "catapult-ready"
  234.     "catapult-help"
  235.     "catapult-dead" )
  236.   "catapult-attack" )
  237.  
  238. (define-unit-type "unit-knight"            "Knight"
  239.   ;; graphic data
  240.   #("knight.png"
  241.     ()
  242.     ()
  243.     () )
  244.   '(  72  72 )            ;; graphic size
  245.   "animations-knight"    ;; animations
  246.   "icon-knight"
  247.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  248.       13       0      4     90      0 #(   90    800     100      0 )
  249.   ;;Tile    Box Size    Attack    ReactC    ReactH
  250.   '( 1 1 ) '(  42  42 )     1       6       4
  251.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  252.        4    63      8      4       1       1
  253.   ;;Decay Annoy    Points
  254.       0      0     100
  255.   "missile-none"
  256.   'corpse-human
  257.   'type-land
  258.   'right-attack
  259.   'can-target-land 
  260.   ;; flags
  261.   'land-unit
  262.   'can-attack
  263.   'organic
  264.   'selectable-by-rectangle
  265.   ;; sounds
  266.   #("knight-selected"
  267.     "knight-acknowledge"
  268.     "knight-ready"
  269.     "knight-help"
  270.     "knight-dead" )
  271.   "knight-attack" )
  272.  
  273. (define-unit-type "unit-ogre"            "Ogre"
  274.   ;; graphic data
  275.   #("ogre.png"
  276.     ()
  277.     ()
  278.     () )
  279.   '(  72  72 )            ;; graphic size
  280.   "animations-ogre"    ;; animations
  281.   "icon-ogre"
  282.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  283.       13       0      4     90      0 #(   90    800     100      0 )
  284.   ;;Tile    Box Size    Attack    ReactC    ReactH
  285.   '( 1 1 ) '(  42  42 )     1       6       4
  286.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  287.        4    63      8      4       1       1
  288.   ;;Decay Annoy    Points
  289.       0      0     100
  290.   "missile-none"
  291.   'corpse-orc
  292.   'type-land
  293.   'right-attack
  294.   'can-target-land 
  295.   ;; flags
  296.   'land-unit
  297.   'can-attack
  298.   'organic
  299.   'selectable-by-rectangle
  300.   ;; sounds
  301.   #("ogre-selected"
  302.     "ogre-acknowledge"
  303.     "ogre-ready"
  304.     "ogre-help"
  305.     "ogre-dead" )
  306.   "ogre-attack" )
  307.  
  308. (define-unit-type "unit-archer"            "Archer"
  309.   ;; graphic data
  310.   #("archer.png"
  311.     ()
  312.     ()
  313.     () )
  314.   '(  72  72 )            ;; graphic size
  315.   "animations-archer"    ;; animations
  316.   "icon-archer"
  317.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  318.       10       0      5     40      0 #(   70    500      50      0 )
  319.   ;;Tile    Box Size    Attack    ReactC    ReactH
  320.   '( 1 1 ) '(  33  33 )     4       7       5
  321.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  322.        0    55      3      6       1       0
  323.   ;;Decay Annoy    Points
  324.       0      0      60
  325.   "missile-arrow"
  326.   'corpse-human
  327.   'type-land
  328.   'right-attack
  329.   'can-target-land 'can-target-sea 'can-target-air 
  330.   ;; flags
  331.   'land-unit
  332.   'can-attack
  333.   'organic
  334.   'selectable-by-rectangle
  335.   ;; sounds
  336.   #("archer-selected"
  337.     "archer-acknowledge"
  338.     "archer-ready"
  339.     "archer-help"
  340.     "archer-dead" )
  341.   "archer-attack" )
  342.  
  343. (define-unit-type "unit-axethrower"        "Troll Axethrower"
  344.   ;; graphic data
  345.   #("axethrower.png"
  346.     ()
  347.     ()
  348.     () )
  349.   '(  72  72 )            ;; graphic size
  350.   "animations-axethrower"    ;; animations
  351.   "icon-axethrower"
  352.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  353.       10       0      5     40      0 #(   70    500      50      0 )
  354.   ;;Tile    Box Size    Attack    ReactC    ReactH
  355.   '( 1 1 ) '(  36  36 )     4       7       5
  356.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  357.        0    55      3      6       1       0
  358.   ;;Decay Annoy    Points
  359.       0      0      60
  360.   "missile-axe"
  361.   'corpse-orc
  362.   'type-land
  363.   'right-attack
  364.   'can-target-land 'can-target-sea 'can-target-air 
  365.   ;; flags
  366.   'land-unit
  367.   'can-attack
  368.   'organic
  369.   'selectable-by-rectangle
  370.   ;; sounds
  371.   #("axethrower-selected"
  372.     "axethrower-acknowledge"
  373.     "axethrower-ready"
  374.     "axethrower-help"
  375.     "axethrower-dead" )
  376.   "axethrower-attack" )
  377.  
  378. (define-unit-type "unit-mage"            "Mage"
  379.   ;; graphic data
  380.   #("mage.png"
  381.     ()
  382.     ()
  383.     () )
  384.   '(  72  72 )            ;; graphic size
  385.   "animations-mage"    ;; animations
  386.   "icon-mage"
  387.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  388.        8       0      9     60      1 #(  120   1200       0      0 )
  389.   ;;Tile    Box Size    Attack    ReactC    ReactH
  390.   '( 1 1 ) '(  33  33 )     2      11       9
  391.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  392.        0    70      0      9       0       0
  393.   ;;Decay Annoy    Points
  394.       0      0     100
  395.   "missile-lightning"
  396.   'corpse-none
  397.   'type-land
  398.   'right-attack
  399.   'can-target-land 'can-target-sea 'can-target-air 
  400.   ;; flags
  401.   'land-unit
  402.   'can-cast-spell
  403.   'can-attack
  404.   'cower-mage
  405.   'organic
  406.   'selectable-by-rectangle
  407.   ;; sounds
  408.   #("mage-selected"
  409.     "mage-acknowledge"
  410.     "mage-ready"
  411.     "mage-help"
  412.     "mage-dead" )
  413.   "mage-attack" )
  414.  
  415. (define-unit-type "unit-death-knight"        "Death Knight"
  416.   ;; graphic data
  417.   #("death knight.png"
  418.     ()
  419.     ()
  420.     () )
  421.   '(  72  72 )            ;; graphic size
  422.   "animations-death-knight"    ;; animations
  423.   "icon-death-knight"
  424.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  425.        8       0      9     60      1 #(  120   1200       0      0 )
  426.   ;;Tile    Box Size    Attack    ReactC    ReactH
  427.   '( 1 1 ) '(  39  39 )     3      11       9
  428.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  429.        0    70      0      9       0       0
  430.   ;;Decay Annoy    Points
  431.       0      0     100
  432.   "missile-touch-of-death"
  433.   'corpse-none
  434.   'type-land
  435.   'right-attack
  436.   'can-target-land 'can-target-sea 'can-target-air 
  437.   ;; flags
  438.   'land-unit
  439.   'isundead
  440.   'can-cast-spell
  441.   'can-attack
  442.   'cower-mage
  443.   'organic
  444.   'selectable-by-rectangle
  445.   ;; sounds
  446.   #("death-knight-selected"
  447.     "death-knight-acknowledge"
  448.     "death-knight-ready"
  449.     "death-knight-help"
  450.     "death-knight-dead" )
  451.   "death-knight-attack" )
  452.  
  453. (define-unit-type "unit-paladin"        "Paladin"
  454.   ;; graphic data
  455.   "unit-knight"
  456.   '(  72  72 )            ;; graphic size
  457.   "animations-paladin"    ;; animations
  458.   "icon-paladin"
  459.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  460.       13       0      5     90      0 #(   90    800     100      0 )
  461.   ;;Tile    Box Size    Attack    ReactC    ReactH
  462.   '( 1 1 ) '(  42  42 )     1       7       5
  463.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  464.        4    65      8      4       1       1
  465.   ;;Decay Annoy    Points
  466.       0      0     110
  467.   "missile-none"
  468.   'corpse-human
  469.   'type-land
  470.   'right-attack
  471.   'can-target-land 
  472.   ;; flags
  473.   'land-unit
  474.   'can-cast-spell
  475.   'can-attack
  476.   'organic
  477.   'selectable-by-rectangle
  478.   ;; sounds
  479.   #("paladin-selected"
  480.     "paladin-acknowledge"
  481.     "paladin-ready"
  482.     "paladin-help"
  483.     "paladin-dead" )
  484.   "paladin-attack" )
  485.  
  486. (define-unit-type "unit-ogre-mage"        "Ogre Mage"
  487.   ;; graphic data
  488.   "unit-ogre"
  489.   '(  72  72 )            ;; graphic size
  490.   "animations-ogre-mage"    ;; animations
  491.   "icon-ogre-mage"
  492.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  493.       13       0      5     90      0 #(   90    800     100      0 )
  494.   ;;Tile    Box Size    Attack    ReactC    ReactH
  495.   '( 1 1 ) '(  42  42 )     1       7       5
  496.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  497.        4    65      8      4       1       1
  498.   ;;Decay Annoy    Points
  499.       0      0     110
  500.   "missile-none"
  501.   'corpse-orc
  502.   'type-land
  503.   'right-attack
  504.   'can-target-land 
  505.   ;; flags
  506.   'land-unit
  507.   'can-cast-spell
  508.   'can-attack
  509.   'organic
  510.   'selectable-by-rectangle
  511.   ;; sounds
  512.   #("ogre-mage-selected"
  513.     "ogre-mage-acknowledge"
  514.     "ogre-mage-ready"
  515.     "ogre-mage-help"
  516.     "ogre-mage-dead" )
  517.   "ogre-mage-attack" )
  518.  
  519. (define-unit-type "unit-dwarves"        "Dwarves"
  520.   ;; graphic data
  521.   #("dwarves.png"
  522.     ()
  523.     ()
  524.     () )
  525.   '(  56  56 )            ;; graphic size
  526.   "animations-dwarves"    ;; animations
  527.   "icon-dwarves"
  528.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  529.       11       0      4     40      0 #(  200    700     250      0 )
  530.   ;;Tile    Box Size    Attack    ReactC    ReactH
  531.   '( 1 1 ) '(  32  32 )     1       4       2
  532.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  533.        0    55      4      2       1       0
  534.   ;;Decay Annoy    Points
  535.       0      0     100
  536.   "missile-none"
  537.   'corpse-none
  538.   'type-land
  539.   'right-demolish
  540.   'can-target-land 
  541.   ;; flags
  542.   'land-unit
  543.   'can-attack
  544.   'volatile
  545.   'organic
  546.   'selectable-by-rectangle
  547.   ;; sounds
  548.   #("dwarves-selected"
  549.     "dwarves-acknowledge"
  550.     "dwarves-ready"
  551.     "dwarves-help"
  552.     "dwarves-dead" )
  553.   "dwarves-attack" )
  554.  
  555. (define-unit-type "unit-goblin-sappers"        "Goblin Sappers"
  556.   ;; graphic data
  557.   #("goblin sapper.png"
  558.     ()
  559.     ()
  560.     () )
  561.   '(  56  56 )            ;; graphic size
  562.   "animations-goblin-sappers"    ;; animations
  563.   "icon-goblin-sappers"
  564.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  565.       11       0      4     40      0 #(  200    700     250      0 )
  566.   ;;Tile    Box Size    Attack    ReactC    ReactH
  567.   '( 1 1 ) '(  37  37 )     1       4       2
  568.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  569.        0    55      4      2       1       0
  570.   ;;Decay Annoy    Points
  571.       0      0     100
  572.   "missile-none"
  573.   'corpse-none
  574.   'type-land
  575.   'right-demolish
  576.   'can-target-land 
  577.   ;; flags
  578.   'land-unit
  579.   'can-attack
  580.   'volatile
  581.   'organic
  582.   'selectable-by-rectangle
  583.   ;; sounds
  584.   #("goblin-sappers-selected"
  585.     "goblin-sappers-acknowledge"
  586.     "goblin-sappers-ready"
  587.     "goblin-sappers-help"
  588.     "goblin-sappers-dead" )
  589.   "goblin-sappers-attack" )
  590.  
  591. (define-unit-type "unit-attack-peasant"        "Peasant"
  592.   ;; graphic data
  593.   "unit-peasant"
  594.   '(  72  72 )            ;; graphic size
  595.   "animations-attack-peasant"    ;; animations
  596.   "icon-peasant"
  597.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  598.       10       0      4     30      0 #(   45    400       0      0 )
  599.   ;;Tile    Box Size    Attack    ReactC    ReactH
  600.   '( 1 1 ) '(  31  31 )     1       6       4
  601.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  602.        0    50      3      2       0       0
  603.   ;;Decay Annoy    Points
  604.       0      0      30
  605.   "missile-none"
  606.   'corpse-human
  607.   'type-land
  608.   'right-attack
  609.   'can-target-land 
  610.   ;; flags
  611.   'land-unit
  612.   'can-attack
  613.   'organic
  614.   'selectable-by-rectangle
  615.   ;; sounds
  616.   #("peasant-selected"
  617.     "peasant-acknowledge"
  618.     "peasant-ready"
  619.     "peasant-help"
  620.     "peasant-dead" )
  621.   "peasant-attack" )
  622.  
  623. (define-unit-type "unit-attack-peon"        "Peon"
  624.   ;; graphic data
  625.   "unit-peon"
  626.   '(  72  72 )            ;; graphic size
  627.   "animations-attack-peon"    ;; animations
  628.   "icon-peon"
  629.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  630.       10       0      4     30      0 #(   45    400       0      0 )
  631.   ;;Tile    Box Size    Attack    ReactC    ReactH
  632.   '( 1 1 ) '(  31  31 )     1       6       4
  633.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  634.        0    50      3      2       0       0
  635.   ;;Decay Annoy    Points
  636.       0      0      30
  637.   "missile-none"
  638.   'corpse-orc
  639.   'type-land
  640.   'right-attack
  641.   'can-target-land 
  642.   ;; flags
  643.   'land-unit
  644.   'can-attack
  645.   'organic
  646.   'selectable-by-rectangle
  647.   ;; sounds
  648.   #("peon-selected"
  649.     "peon-acknowledge"
  650.     "peon-ready"
  651.     "peon-help"
  652.     "peon-dead" )
  653.   "peon-attack" )
  654.  
  655. (define-unit-type "unit-ranger"            "Ranger"
  656.   ;; graphic data
  657.   "unit-archer"
  658.   '(  72  72 )            ;; graphic size
  659.   "animations-ranger"    ;; animations
  660.   "icon-ranger"
  661.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  662.       10       0      6     50      0 #(   70    500      50      0 )
  663.   ;;Tile    Box Size    Attack    ReactC    ReactH
  664.   '( 1 1 ) '(  33  33 )     4       9       6
  665.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  666.        0    57      3      6       1       0
  667.   ;;Decay Annoy    Points
  668.       0      0      70
  669.   "missile-arrow"
  670.   'corpse-human
  671.   'type-land
  672.   'right-attack
  673.   'can-target-land 'can-target-sea 'can-target-air 
  674.   ;; flags
  675.   'land-unit
  676.   'can-attack
  677.   'organic
  678.   'selectable-by-rectangle
  679.   ;; sounds
  680.   #("ranger-selected"
  681.     "ranger-acknowledge"
  682.     "ranger-ready"
  683.     "ranger-help"
  684.     "ranger-dead" )
  685.   "ranger-attack" )
  686.  
  687. (define-unit-type "unit-berserker"        "Berserker"
  688.   ;; graphic data
  689.   "unit-axethrower"
  690.   '(  72  72 )            ;; graphic size
  691.   "animations-berserker"    ;; animations
  692.   "icon-berserker"
  693.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  694.       10       0      6     50      0 #(   70    500      50      0 )
  695.   ;;Tile    Box Size    Attack    ReactC    ReactH
  696.   '( 1 1 ) '(  36  36 )     4       9       6
  697.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  698.        0    57      3      6       1       0
  699.   ;;Decay Annoy    Points
  700.       0      0      70
  701.   "missile-axe"
  702.   'corpse-orc
  703.   'type-land
  704.   'right-attack
  705.   'can-target-land 'can-target-sea 'can-target-air 
  706.   ;; flags
  707.   'land-unit
  708.   'can-attack
  709.   'organic
  710.   'selectable-by-rectangle
  711.   ;; sounds
  712.   #("berserker-selected"
  713.     "berserker-acknowledge"
  714.     "berserker-ready"
  715.     "berserker-help"
  716.     "berserker-dead" )
  717.   "berserker-attack" )
  718.  
  719. (define-unit-type "unit-alleria"        "Alleria"
  720.   ;; graphic data
  721.   "unit-archer"
  722.   '(  72  72 )            ;; graphic size
  723.   "animations-alleria"    ;; animations
  724.   "icon-alleria"
  725.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  726.       10       0      9    120      0 #(   70    500      50      0 )
  727.   ;;Tile    Box Size    Attack    ReactC    ReactH
  728.   '( 1 1 ) '(  33  33 )     7       7       5
  729.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  730.        5    55     10     18       1       0
  731.   ;;Decay Annoy    Points
  732.       0      0      60
  733.   "missile-arrow"
  734.   'corpse-human
  735.   'type-land
  736.   'right-attack
  737.   'can-target-land 'can-target-sea 'can-target-air 
  738.   ;; flags
  739.   'land-unit
  740.   'can-attack
  741.   'organic
  742.   'selectable-by-rectangle
  743.   ;; sounds
  744.   #("alleria-selected"
  745.     "alleria-acknowledge"
  746.     "alleria-ready"
  747.     "alleria-help"
  748.     "alleria-dead" )
  749.   "alleria-attack" )
  750.  
  751. (define-unit-type "unit-teron-gorefiend"    "Teron Gorefiend"
  752.   ;; graphic data
  753.   "unit-death-knight"
  754.   '(  72  72 )            ;; graphic size
  755.   "animations-teron-gorefiend"    ;; animations
  756.   "icon-teron-gorefiend"
  757.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  758.        8       0      9    180      1 #(  120   1200       0      0 )
  759.   ;;Tile    Box Size    Attack    ReactC    ReactH
  760.   '( 1 1 ) '(  39  39 )     4      11       9
  761.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  762.        2    70      0     16       0       0
  763.   ;;Decay Annoy    Points
  764.       0      0     100
  765.   "missile-touch-of-death"
  766.   'corpse-orc
  767.   'type-land
  768.   'right-attack
  769.   'can-target-land 'can-target-sea 'can-target-air 
  770.   ;; flags
  771.   'land-unit
  772.   'isundead
  773.   'can-cast-spell
  774.   'can-attack
  775.   'cower-mage
  776.   'organic
  777.   'selectable-by-rectangle
  778.   ;; sounds
  779.   #("teron-gorefiend-selected"
  780.     "teron-gorefiend-acknowledge"
  781.     "teron-gorefiend-ready"
  782.     "teron-gorefiend-help"
  783.     "teron-gorefiend-dead" )
  784.   "teron-gorefiend-attack" )
  785.  
  786. (define-unit-type "unit-kurdan-and-sky'ree"    "Kurdan and Sky'ree"
  787.   ;; graphic data
  788.   #("gryphon rider.png"
  789.     ()
  790.     ()
  791.     () )
  792.   '(  80  80 )            ;; graphic size
  793.   "animations-kurdan-and-sky'ree"    ;; animations
  794.   "icon-kurdan-and-sky'ree"
  795.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  796.       14       0      9    250      0 #(  250   2500       0      0 )
  797.   ;;Tile    Box Size    Attack    ReactC    ReactH
  798.   '( 1 1 ) '(  63  63 )     5       8       6
  799.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  800.        6    65      0     25       0       0
  801.   ;;Decay Annoy    Points
  802.       0      0     150
  803.   "missile-griffon-hammer"
  804.   'corpse-none
  805.   'type-fly
  806.   'right-attack
  807.   'can-target-land 'can-target-sea 'can-target-air 
  808.   ;; flags
  809.   'air-unit
  810.   'can-see-submarine
  811.   'can-attack
  812.   'organic
  813.   'selectable-by-rectangle
  814.   ;; sounds
  815.   #("kurdan-and-sky'ree-selected"
  816.     "kurdan-and-sky'ree-acknowledge"
  817.     "kurdan-and-sky'ree-ready"
  818.     "kurdan-and-sky'ree-help"
  819.     "kurdan-and-sky'ree-dead" )
  820.   "kurdan-and-sky'ree-attack" )
  821.  
  822. (define-unit-type "unit-dentarg"        "Dentarg"
  823.   ;; graphic data
  824.   "unit-ogre"
  825.   '(  72  72 )            ;; graphic size
  826.   "animations-dentarg"    ;; animations
  827.   "icon-dentarg"
  828.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  829.       13       0      6    300      1 #(   90    800     100      0 )
  830.   ;;Tile    Box Size    Attack    ReactC    ReactH
  831.   '( 1 1 ) '(  42  42 )     1       6       4
  832.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  833.        8    63     18      6       1       1
  834.   ;;Decay Annoy    Points
  835.       0      0     100
  836.   "missile-none"
  837.   'corpse-orc
  838.   'type-land
  839.   'right-attack
  840.   'can-target-land 
  841.   ;; flags
  842.   'land-unit
  843.   'can-cast-spell
  844.   'can-attack
  845.   'organic
  846.   'selectable-by-rectangle
  847.   ;; sounds
  848.   #("dentarg-selected"
  849.     "dentarg-acknowledge"
  850.     "dentarg-ready"
  851.     "dentarg-help"
  852.     "dentarg-dead" )
  853.   "dentarg-attack" )
  854.  
  855. (define-unit-type "unit-khadgar"        "Khadgar"
  856.   ;; graphic data
  857.   "unit-mage"
  858.   '(  72  72 )            ;; graphic size
  859.   "animations-khadgar"    ;; animations
  860.   "icon-khadgar"
  861.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  862.        8       0      9    120      1 #(  120   1200       0      0 )
  863.   ;;Tile    Box Size    Attack    ReactC    ReactH
  864.   '( 1 1 ) '(  33  33 )     6      11       9
  865.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  866.        3    70      0     16       0       0
  867.   ;;Decay Annoy    Points
  868.       0      0     100
  869.   "missile-lightning"
  870.   'corpse-none
  871.   'type-land
  872.   'right-attack
  873.   'can-target-land 'can-target-sea 'can-target-air 
  874.   ;; flags
  875.   'land-unit
  876.   'can-cast-spell
  877.   'can-attack
  878.   'cower-mage
  879.   'organic
  880.   'selectable-by-rectangle
  881.   ;; sounds
  882.   #("khadgar-selected"
  883.     "khadgar-acknowledge"
  884.     "khadgar-ready"
  885.     "khadgar-help"
  886.     "khadgar-dead" )
  887.   "khadgar-attack" )
  888.  
  889. (define-unit-type "unit-grom-hellscream"    "Grom Hellscream"
  890.   ;; graphic data
  891.   "unit-grunt"
  892.   '(  72  72 )            ;; graphic size
  893.   "animations-grom-hellscream"    ;; animations
  894.   "icon-grom-hellscream"
  895.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  896.       10       0      5    240      0 #(   60    600       0      0 )
  897.   ;;Tile    Box Size    Attack    ReactC    ReactH
  898.   '( 1 1 ) '(  31  31 )     1       6       4
  899.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  900.        8    60     16      6       1       1
  901.   ;;Decay Annoy    Points
  902.       0      0      50
  903.   "missile-none"
  904.   'corpse-human
  905.   'type-land
  906.   'right-attack
  907.   'can-target-land 
  908.   ;; flags
  909.   'land-unit
  910.   'can-attack
  911.   'organic
  912.   'selectable-by-rectangle
  913.   ;; sounds
  914.   #("grom-hellscream-selected"
  915.     "grom-hellscream-acknowledge"
  916.     "grom-hellscream-ready"
  917.     "grom-hellscream-help"
  918.     "grom-hellscream-dead" )
  919.   "grom-hellscream-attack" )
  920.  
  921. (define-unit-type "unit-human-oil-tanker"    "Oil tanker"
  922.   ;; graphic data
  923.   #("human tanker (empty).png"
  924.     ()
  925.     ()
  926.     () )
  927.   '(  72  72 )            ;; graphic size
  928.   "animations-human-oil-tanker"    ;; animations
  929.   "icon-human-oil-tanker"
  930.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  931.       10       0      4     90      0 #(   50    400     200      0 )
  932.   ;;Tile    Box Size    Attack    ReactC    ReactH
  933.   '( 1 1 ) '(  63  63 )     1       0       0
  934.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  935.       10    50      0      0       0       0
  936.   ;;Decay Annoy    Points
  937.       0     10      40
  938.   "missile-none"
  939.   'corpse-ship
  940.   'type-naval
  941.   'right-haul-oil
  942.   ;; flags
  943.   'sea-unit
  944.   'tanker
  945.   'selectable-by-rectangle
  946.   ;; sounds
  947.   #("human-oil-tanker-selected"
  948.     "human-oil-tanker-acknowledge"
  949.     "human-oil-tanker-ready"
  950.     "human-oil-tanker-help"
  951.     "human-oil-tanker-dead" )
  952.   "human-oil-tanker-attack" )
  953.  
  954. (define-unit-type "unit-orc-oil-tanker"        "Oil tanker"
  955.   ;; graphic data
  956.   #("orc tanker (empty).png"
  957.     ()
  958.     ()
  959.     () )
  960.   '(  72  72 )            ;; graphic size
  961.   "animations-orc-oil-tanker"    ;; animations
  962.   "icon-orc-oil-tanker"
  963.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  964.       10       0      4     90      0 #(   50    400     200      0 )
  965.   ;;Tile    Box Size    Attack    ReactC    ReactH
  966.   '( 1 1 ) '(  63  63 )     1       0       0
  967.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  968.       10    50      0      0       0       0
  969.   ;;Decay Annoy    Points
  970.       0     10      40
  971.   "missile-none"
  972.   'corpse-ship
  973.   'type-naval
  974.   'right-haul-oil
  975.   ;; flags
  976.   'sea-unit
  977.   'tanker
  978.   'selectable-by-rectangle
  979.   ;; sounds
  980.   #("orc-oil-tanker-selected"
  981.     "orc-oil-tanker-acknowledge"
  982.     "orc-oil-tanker-ready"
  983.     "orc-oil-tanker-help"
  984.     "orc-oil-tanker-dead" )
  985.   "orc-oil-tanker-attack" )
  986.  
  987. (define-unit-type "unit-human-transport"    "Transport"
  988.   ;; graphic data
  989.   #("human transport.png"
  990.     ()
  991.     ()
  992.     () )
  993.   '(  72  72 )            ;; graphic size
  994.   "animations-human-transport"    ;; animations
  995.   "icon-human-transport"
  996.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  997.       10       0      4    150      0 #(   70    600     200    500 )
  998.   ;;Tile    Box Size    Attack    ReactC    ReactH
  999.   '( 1 1 ) '(  63  63 )     1       0       0
  1000.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  1001.        0    70      0      0       0       1
  1002.   ;;Decay Annoy    Points
  1003.       0     15      50
  1004.   "missile-none"
  1005.   'corpse-ship
  1006.   'type-naval
  1007.   'right-sail
  1008.   ;; flags
  1009.   'sea-unit
  1010.   'transporter
  1011.   'selectable-by-rectangle
  1012.   ;; sounds
  1013.   #("human-transport-selected"
  1014.     "human-transport-acknowledge"
  1015.     "human-transport-ready"
  1016.     "human-transport-help"
  1017.     "human-transport-dead" )
  1018.   "human-transport-attack" )
  1019.  
  1020. (define-unit-type "unit-orc-transport"        "Transport"
  1021.   ;; graphic data
  1022.   #("orc transport.png"
  1023.     ()
  1024.     ()
  1025.     () )
  1026.   '(  72  72 )            ;; graphic size
  1027.   "animations-orc-transport"    ;; animations
  1028.   "icon-orc-transport"
  1029.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  1030.       10       0      4    150      0 #(   70    600     200    500 )
  1031.   ;;Tile    Box Size    Attack    ReactC    ReactH
  1032.   '( 1 1 ) '(  63  63 )     1       0       0
  1033.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  1034.        0    70      0      0       0       1
  1035.   ;;Decay Annoy    Points
  1036.       0     15      50
  1037.   "missile-none"
  1038.   'corpse-ship
  1039.   'type-naval
  1040.   'right-sail
  1041.   ;; flags
  1042.   'sea-unit
  1043.   'transporter
  1044.   'selectable-by-rectangle
  1045.   ;; sounds
  1046.   #("orc-transport-selected"
  1047.     "orc-transport-acknowledge"
  1048.     "orc-transport-ready"
  1049.     "orc-transport-help"
  1050.     "orc-transport-dead" )
  1051.   "orc-transport-attack" )
  1052.  
  1053. (define-unit-type "unit-elven-destroyer"    "Elven Destroyer"
  1054.   ;; graphic data
  1055.   #("elven destroyer.png"
  1056.     ()
  1057.     ()
  1058.     () )
  1059.   '(  80  88 )            ;; graphic size
  1060.   "animations-elven-destroyer"    ;; animations
  1061.   "icon-elven-destroyer"
  1062.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  1063.       10       0      8    100      0 #(   90    700     350    700 )
  1064.   ;;Tile    Box Size    Attack    ReactC    ReactH
  1065.   '( 1 1 ) '(  63  63 )     4      10       8
  1066.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  1067.       10    65     35      0       1       1
  1068.   ;;Decay Annoy    Points
  1069.       0     20     150
  1070.   "missile-small-cannon"
  1071.   'corpse-ship
  1072.   'type-naval
  1073.   'right-attack
  1074.   'can-target-land 'can-target-sea 'can-target-air 
  1075.   ;; flags
  1076.   'sea-unit
  1077.   'can-attack
  1078.   'selectable-by-rectangle
  1079.   ;; sounds
  1080.   #("elven-destroyer-selected"
  1081.     "elven-destroyer-acknowledge"
  1082.     "elven-destroyer-ready"
  1083.     "elven-destroyer-help"
  1084.     "elven-destroyer-dead" )
  1085.   "elven-destroyer-attack" )
  1086.  
  1087. (define-unit-type "unit-troll-destroyer"    "Troll Destroyer"
  1088.   ;; graphic data
  1089.   #("troll destroyer.png"
  1090.     ()
  1091.     ()
  1092.     () )
  1093.   '(  88  88 )            ;; graphic size
  1094.   "animations-troll-destroyer"    ;; animations
  1095.   "icon-troll-destroyer"
  1096.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  1097.       10       0      8    100      0 #(   90    700     350    700 )
  1098.   ;;Tile    Box Size    Attack    ReactC    ReactH
  1099.   '( 1 1 ) '(  63  63 )     4      10       8
  1100.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  1101.       10    65     35      0       1       1
  1102.   ;;Decay Annoy    Points
  1103.       0     20     150
  1104.   "missile-small-cannon"
  1105.   'corpse-ship
  1106.   'type-naval
  1107.   'right-attack
  1108.   'can-target-land 'can-target-sea 'can-target-air 
  1109.   ;; flags
  1110.   'sea-unit
  1111.   'can-attack
  1112.   'selectable-by-rectangle
  1113.   ;; sounds
  1114.   #("troll-destroyer-selected"
  1115.     "troll-destroyer-acknowledge"
  1116.     "troll-destroyer-ready"
  1117.     "troll-destroyer-help"
  1118.     "troll-destroyer-dead" )
  1119.   "troll-destroyer-attack" )
  1120.  
  1121. (define-unit-type "unit-battleship"        "Battleship"
  1122.   ;; graphic data
  1123.   #("battleship.png"
  1124.     ()
  1125.     ()
  1126.     () )
  1127.   '(  88  88 )            ;; graphic size
  1128.   "animations-battleship"    ;; animations
  1129.   "icon-battleship"
  1130.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  1131.        6       0      8    150      0 #(  140   1000     500   1000 )
  1132.   ;;Tile    Box Size    Attack    ReactC    ReactH
  1133.   '( 1 1 ) '(  70  70 )     6      10       8
  1134.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  1135.       15    63    130      0       1       1
  1136.   ;;Decay Annoy    Points
  1137.       0     25     300
  1138.   "missile-big-cannon"
  1139.   'corpse-ship
  1140.   'type-naval
  1141.   'right-attack
  1142.   'can-target-land 'can-target-sea 
  1143.   ;; flags
  1144.   'sea-unit
  1145.   'can-ground-attack
  1146.   'can-attack
  1147.   'selectable-by-rectangle
  1148.   ;; sounds
  1149.   #("battleship-selected"
  1150.     "battleship-acknowledge"
  1151.     "battleship-ready"
  1152.     "battleship-help"
  1153.     "battleship-dead" )
  1154.   "battleship-attack" )
  1155.  
  1156. (define-unit-type "unit-ogre-juggernaught"    "Ogre Juggernaught"
  1157.   ;; graphic data
  1158.   #("juggernaught.png"
  1159.     ()
  1160.     ()
  1161.     () )
  1162.   '(  88  88 )            ;; graphic size
  1163.   "animations-ogre-juggernaught"    ;; animations
  1164.   "icon-ogre-juggernaught"
  1165.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  1166.        6       0      8    150      0 #(  140   1000     500   1000 )
  1167.   ;;Tile    Box Size    Attack    ReactC    ReactH
  1168.   '( 1 1 ) '(  70  70 )     6      10       8
  1169.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  1170.       15    63    130      0       1       1
  1171.   ;;Decay Annoy    Points
  1172.       0     25     300
  1173.   "missile-big-cannon"
  1174.   'corpse-ship
  1175.   'type-naval
  1176.   'right-attack
  1177.   'can-target-land 'can-target-sea 
  1178.   ;; flags
  1179.   'sea-unit
  1180.   'can-ground-attack
  1181.   'can-attack
  1182.   'selectable-by-rectangle
  1183.   ;; sounds
  1184.   #("ogre-juggernaught-selected"
  1185.     "ogre-juggernaught-acknowledge"
  1186.     "ogre-juggernaught-ready"
  1187.     "ogre-juggernaught-help"
  1188.     "ogre-juggernaught-dead" )
  1189.   "ogre-juggernaught-attack" )
  1190.  
  1191. (define-unit-type "unit-nothing-22"        "Nothing 22"
  1192.   ;; graphic data
  1193.   #(()
  1194.     ()
  1195.     ()
  1196.     () )
  1197.   '(   0   0 )            ;; graphic size
  1198.   "animations-nothing-22"    ;; animations
  1199.   "icon-cancel"
  1200.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  1201.       99       0      0      0      0 #(    0      0       0      0 )
  1202.   ;;Tile    Box Size    Attack    ReactC    ReactH
  1203.   '( 0 0 ) '(   0   0 )     0       0       0
  1204.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  1205.        0     0      0      0       0       0
  1206.   ;;Decay Annoy    Points
  1207.       0      0       0
  1208.   "missile-lightning"
  1209.   'corpse-none
  1210.   'type-land
  1211.   'right-none
  1212.   ;; flags
  1213.   ;; sounds
  1214.   #("nothing-22-selected"
  1215.     "nothing-22-acknowledge"
  1216.     "nothing-22-ready"
  1217.     "nothing-22-help"
  1218.     "nothing-22-dead" )
  1219.   "nothing-22-attack" )
  1220.  
  1221. (define-unit-type "unit-deathwing"        "Deathwing"
  1222.   ;; graphic data
  1223.   #("dragon.png"
  1224.     ()
  1225.     ()
  1226.     () )
  1227.   '(  88  80 )            ;; graphic size
  1228.   "animations-deathwing"    ;; animations
  1229.   "icon-deathwing"
  1230.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  1231.       14       0      9    800      0 #(  250   2500       0      0 )
  1232.   ;;Tile    Box Size    Attack    ReactC    ReactH
  1233.   '( 1 1 ) '(  71  71 )     5       8       6
  1234.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  1235.       10    65     10     25       0       0
  1236.   ;;Decay Annoy    Points
  1237.       0      0     150
  1238.   "missile-dragon-breath"
  1239.   'corpse-none
  1240.   'type-fly
  1241.   'right-attack
  1242.   'can-target-land 'can-target-sea 'can-target-air 
  1243.   ;; flags
  1244.   'air-unit
  1245.   'can-see-submarine
  1246.   'can-attack
  1247.   'organic
  1248.   'selectable-by-rectangle
  1249.   ;; sounds
  1250.   #("deathwing-selected"
  1251.     "deathwing-acknowledge"
  1252.     "deathwing-ready"
  1253.     "deathwing-help"
  1254.     "deathwing-dead" )
  1255.   "deathwing-attack" )
  1256.  
  1257. (define-unit-type "unit-nothing-24"        "Nothing 24"
  1258.   ;; graphic data
  1259.   #(()
  1260.     ()
  1261.     ()
  1262.     () )
  1263.   '(  32  32 )            ;; graphic size
  1264.   "animations-nothing-24"    ;; animations
  1265.   "icon-cancel"
  1266.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  1267.       99       0      4     60      0 #(   60    400       0      0 )
  1268.   ;;Tile    Box Size    Attack    ReactC    ReactH
  1269.   '( 1 1 ) '(  63  63 )     1      20      10
  1270.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  1271.        2    40      9      1       0       0
  1272.   ;;Decay Annoy    Points
  1273.       0      0       0
  1274.   "missile-none"
  1275.   'corpse-none
  1276.   'type-naval
  1277.   'right-attack
  1278.   ;; flags
  1279.   'sea-unit
  1280.   'selectable-by-rectangle
  1281.   ;; sounds
  1282.   #("nothing-24-selected"
  1283.     "nothing-24-acknowledge"
  1284.     "nothing-24-ready"
  1285.     "nothing-24-help"
  1286.     "nothing-24-dead" )
  1287.   "nothing-24-attack" )
  1288.  
  1289. (define-unit-type "unit-nothing-25"        "Nothing 25"
  1290.   ;; graphic data
  1291.   #(()
  1292.     ()
  1293.     ()
  1294.     () )
  1295.   '(  32  32 )            ;; graphic size
  1296.   "animations-nothing-25"    ;; animations
  1297.   "icon-cancel"
  1298.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  1299.       99       0      4     60      0 #(   60    400       0      0 )
  1300.   ;;Tile    Box Size    Attack    ReactC    ReactH
  1301.   '( 1 1 ) '(  63  63 )     1      20      10
  1302.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  1303.        2    40      9      1       0       0
  1304.   ;;Decay Annoy    Points
  1305.       0      0       0
  1306.   "missile-none"
  1307.   'corpse-none
  1308.   'type-naval
  1309.   'right-attack
  1310.   ;; flags
  1311.   'sea-unit
  1312.   'selectable-by-rectangle
  1313.   ;; sounds
  1314.   #("nothing-25-selected"
  1315.     "nothing-25-acknowledge"
  1316.     "nothing-25-ready"
  1317.     "nothing-25-help"
  1318.     "nothing-25-dead" )
  1319.   "nothing-25-attack" )
  1320.  
  1321. (define-unit-type "unit-gnomish-submarine"    "Gnomish Submarine"
  1322.   ;; graphic data
  1323.   #("gnomish submarine (summer,winter).png"
  1324.     ()
  1325.     "gnomish submarine (wasteland).png"
  1326.     "gnomish submarine (swamp).png" )
  1327.   '(  72  72 )            ;; graphic size
  1328.   "animations-gnomish-submarine"    ;; animations
  1329.   "icon-gnomish-submarine"
  1330.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  1331.        7       0      5     60      0 #(  100    800     150    900 )
  1332.   ;;Tile    Box Size    Attack    ReactC    ReactH
  1333.   '( 1 1 ) '(  63  63 )     4       7       5
  1334.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  1335.        0    60     50      0       0       0
  1336.   ;;Decay Annoy    Points
  1337.       0     20     120
  1338.   "missile-submarine-missile"
  1339.   'corpse-ship
  1340.   'type-naval
  1341.   'right-attack
  1342.   'can-target-sea 
  1343.   ;; flags
  1344.   'sea-unit
  1345.   'submarine
  1346.   'can-see-submarine
  1347.   'can-attack
  1348.   'selectable-by-rectangle
  1349.   ;; sounds
  1350.   #("gnomish-submarine-selected"
  1351.     "gnomish-submarine-acknowledge"
  1352.     "gnomish-submarine-ready"
  1353.     "gnomish-submarine-help"
  1354.     "gnomish-submarine-dead" )
  1355.   "gnomish-submarine-attack" )
  1356.  
  1357. (define-unit-type "unit-giant-turtle"        "Giant Turtle"
  1358.   ;; graphic data
  1359.   #("giant turtle (summer,winter).png"
  1360.     ()
  1361.     "giant turtle (wasteland).png"
  1362.     "giant turtle (swamp).png" )
  1363.   '(  72  72 )            ;; graphic size
  1364.   "animations-giant-turtle"    ;; animations
  1365.   "icon-giant-turtle"
  1366.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  1367.        7       0      5     60      0 #(  100    800     150    900 )
  1368.   ;;Tile    Box Size    Attack    ReactC    ReactH
  1369.   '( 1 1 ) '(  63  63 )     4       7       5
  1370.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  1371.        0    60     50      0       0       0
  1372.   ;;Decay Annoy    Points
  1373.       0     20     120
  1374.   "missile-turtle-missile"
  1375.   'corpse-ship
  1376.   'type-naval
  1377.   'right-attack
  1378.   'can-target-sea 
  1379.   ;; flags
  1380.   'sea-unit
  1381.   'submarine
  1382.   'can-see-submarine
  1383.   'can-attack
  1384.   'selectable-by-rectangle
  1385.   ;; sounds
  1386.   #("giant-turtle-selected"
  1387.     "giant-turtle-acknowledge"
  1388.     "giant-turtle-ready"
  1389.     "giant-turtle-help"
  1390.     "giant-turtle-dead" )
  1391.   "giant-turtle-attack" )
  1392.  
  1393. (define-unit-type "unit-gnomish-flying-machine"    "Gnomish Flying Machine"
  1394.   ;; graphic data
  1395.   #("gnomish flying machine.png"
  1396.     ()
  1397.     ()
  1398.     () )
  1399.   '(  80  80 )            ;; graphic size
  1400.   "animations-gnomish-flying-machine"    ;; animations
  1401.   "icon-gnomish-flying-machine"
  1402.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  1403.       17       0      9    150      0 #(   65    500     100      0 )
  1404.   ;;Tile    Box Size    Attack    ReactC    ReactH
  1405.   '( 1 1 ) '(  63  63 )     1      19      15
  1406.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  1407.        2    40      0      0       0       0
  1408.   ;;Decay Annoy    Points
  1409.       0      0      40
  1410.   "missile-none"
  1411.   'corpse-none
  1412.   'type-fly
  1413.   'right-move
  1414.   ;; flags
  1415.   'air-unit
  1416.   'can-see-submarine
  1417.   'selectable-by-rectangle
  1418.   ;; sounds
  1419.   #("gnomish-flying-machine-selected"
  1420.     "gnomish-flying-machine-acknowledge"
  1421.     "gnomish-flying-machine-ready"
  1422.     "gnomish-flying-machine-help"
  1423.     "gnomish-flying-machine-dead" )
  1424.   "gnomish-flying-machine-attack" )
  1425.  
  1426. (define-unit-type "unit-goblin-zeppelin"    "Goblin Zeppelin"
  1427.   ;; graphic data
  1428.   #("goblin zeppelin.png"
  1429.     ()
  1430.     ()
  1431.     () )
  1432.   '(  72  72 )            ;; graphic size
  1433.   "animations-goblin-zeppelin"    ;; animations
  1434.   "icon-goblin-zeppelin"
  1435.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  1436.       17       0      9    150      0 #(   65    500     100      0 )
  1437.   ;;Tile    Box Size    Attack    ReactC    ReactH
  1438.   '( 1 1 ) '(  63  63 )     1      19      15
  1439.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  1440.        2    40      0      0       0       0
  1441.   ;;Decay Annoy    Points
  1442.       0      0      40
  1443.   "missile-none"
  1444.   'corpse-none
  1445.   'type-fly
  1446.   'right-move
  1447.   ;; flags
  1448.   'air-unit
  1449.   'can-see-submarine
  1450.   'selectable-by-rectangle
  1451.   ;; sounds
  1452.   #("goblin-zeppelin-selected"
  1453.     "goblin-zeppelin-acknowledge"
  1454.     "goblin-zeppelin-ready"
  1455.     "goblin-zeppelin-help"
  1456.     "goblin-zeppelin-dead" )
  1457.   "goblin-zeppelin-attack" )
  1458.  
  1459. (define-unit-type "unit-gryphon-rider"        "Gryphon Rider"
  1460.   ;; graphic data
  1461.   "unit-kurdan-and-sky'ree"
  1462.   '(  80  80 )            ;; graphic size
  1463.   "animations-gryphon-rider"    ;; animations
  1464.   "icon-gryphon-rider"
  1465.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  1466.       14       0      6    100      0 #(  250   2500       0      0 )
  1467.   ;;Tile    Box Size    Attack    ReactC    ReactH
  1468.   '( 1 1 ) '(  63  63 )     4       8       6
  1469.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  1470.        5    65      0     16       0       0
  1471.   ;;Decay Annoy    Points
  1472.       0      0     150
  1473.   "missile-griffon-hammer"
  1474.   'corpse-none
  1475.   'type-fly
  1476.   'right-attack
  1477.   'can-target-land 'can-target-sea 'can-target-air 
  1478.   ;; flags
  1479.   'air-unit
  1480.   'can-see-submarine
  1481.   'can-attack
  1482.   'organic
  1483.   'selectable-by-rectangle
  1484.   ;; sounds
  1485.   #("gryphon-rider-selected"
  1486.     "gryphon-rider-acknowledge"
  1487.     "gryphon-rider-ready"
  1488.     "gryphon-rider-help"
  1489.     "gryphon-rider-dead" )
  1490.   "gryphon-rider-attack" )
  1491.  
  1492. (define-unit-type "unit-dragon"            "Dragon"
  1493.   ;; graphic data
  1494.   "unit-deathwing"
  1495.   '(  88  80 )            ;; graphic size
  1496.   "animations-dragon"    ;; animations
  1497.   "icon-dragon"
  1498.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  1499.       14       0      6    100      0 #(  250   2500       0      0 )
  1500.   ;;Tile    Box Size    Attack    ReactC    ReactH
  1501.   '( 1 1 ) '(  71  71 )     4       8       6
  1502.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  1503.        5    65      0     16       0       0
  1504.   ;;Decay Annoy    Points
  1505.       0      0     150
  1506.   "missile-dragon-breath"
  1507.   'corpse-none
  1508.   'type-fly
  1509.   'right-attack
  1510.   'can-target-land 'can-target-sea 'can-target-air 
  1511.   ;; flags
  1512.   'air-unit
  1513.   'can-see-submarine
  1514.   'can-attack
  1515.   'organic
  1516.   'selectable-by-rectangle
  1517.   ;; sounds
  1518.   #("dragon-selected"
  1519.     "dragon-acknowledge"
  1520.     "dragon-ready"
  1521.     "dragon-help"
  1522.     "dragon-dead" )
  1523.   "dragon-attack" )
  1524.  
  1525. (define-unit-type "unit-turalyon"        "Turalyon"
  1526.   ;; graphic data
  1527.   "unit-knight"
  1528.   '(  72  72 )            ;; graphic size
  1529.   "animations-turalyon"    ;; animations
  1530.   "icon-turalyon"
  1531.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  1532.       13       0      6    180      0 #(   90    800     100      0 )
  1533.   ;;Tile    Box Size    Attack    ReactC    ReactH
  1534.   '( 1 1 ) '(  42  42 )     1       7       5
  1535.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  1536.       10    65     14      5       1       1
  1537.   ;;Decay Annoy    Points
  1538.       0      0     110
  1539.   "missile-none"
  1540.   'corpse-human
  1541.   'type-land
  1542.   'right-attack
  1543.   'can-target-land 
  1544.   ;; flags
  1545.   'land-unit
  1546.   'can-cast-spell
  1547.   'can-attack
  1548.   'organic
  1549.   'selectable-by-rectangle
  1550.   ;; sounds
  1551.   #("turalyon-selected"
  1552.     "turalyon-acknowledge"
  1553.     "turalyon-ready"
  1554.     "turalyon-help"
  1555.     "turalyon-dead" )
  1556.   "turalyon-attack" )
  1557.  
  1558. (define-unit-type "unit-eye-of-kilrogg"        "Eye of Kilrogg"
  1559.   ;; graphic data
  1560.   #("eye of kilrogg.png"
  1561.     ()
  1562.     ()
  1563.     () )
  1564.   '(  32  32 )            ;; graphic size
  1565.   "animations-eye-of-kilrogg"    ;; animations
  1566.   "icon-eye-of-kilrogg"
  1567.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  1568.       42       0      3    100      0 #(    0      0       0      0 )
  1569.   ;;Tile    Box Size    Attack    ReactC    ReactH
  1570.   '( 1 1 ) '(  31  31 )     1      20      10
  1571.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  1572.        0     0      1      0       0       0
  1573.   ;;Decay Annoy    Points
  1574.       3      0       0
  1575.   "missile-none"
  1576.   'corpse-none
  1577.   'type-fly
  1578.   'right-move
  1579.   ;; flags
  1580.   'air-unit
  1581.   'can-see-submarine
  1582.   'selectable-by-rectangle
  1583.   ;; sounds
  1584.   #("eye-of-kilrogg-selected"
  1585.     "eye-of-kilrogg-acknowledge"
  1586.     "eye-of-kilrogg-ready"
  1587.     "eye-of-kilrogg-help"
  1588.     "eye-of-kilrogg-dead" )
  1589.   "eye-of-kilrogg-attack" )
  1590.  
  1591. (define-unit-type "unit-danath"            "Danath"
  1592.   ;; graphic data
  1593.   "unit-footman"
  1594.   '(  72  72 )            ;; graphic size
  1595.   "animations-danath"    ;; animations
  1596.   "icon-danath"
  1597.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  1598.       10       0      6    220      0 #(   60    600       0      0 )
  1599.   ;;Tile    Box Size    Attack    ReactC    ReactH
  1600.   '( 1 1 ) '(  31  31 )     1       6       4
  1601.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  1602.        8    60     15      8       1       1
  1603.   ;;Decay Annoy    Points
  1604.       0      0      50
  1605.   "missile-none"
  1606.   'corpse-human
  1607.   'type-land
  1608.   'right-attack
  1609.   'can-target-land 
  1610.   ;; flags
  1611.   'land-unit
  1612.   'can-attack
  1613.   'organic
  1614.   'selectable-by-rectangle
  1615.   ;; sounds
  1616.   #("danath-selected"
  1617.     "danath-acknowledge"
  1618.     "danath-ready"
  1619.     "danath-help"
  1620.     "danath-dead" )
  1621.   "danath-attack" )
  1622.  
  1623. (define-unit-type "unit-korgath-bladefist"    "Korgath Bladefist"
  1624.   ;; graphic data
  1625.   "unit-grunt"
  1626.   '(  72  72 )            ;; graphic size
  1627.   "animations-korgath-bladefist"    ;; animations
  1628.   "icon-korgath-bladefist"
  1629.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  1630.       10       0      5    240      0 #(   60    600       0      0 )
  1631.   ;;Tile    Box Size    Attack    ReactC    ReactH
  1632.   '( 1 1 ) '(  31  31 )     1       6       4
  1633.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  1634.        8    60     16      6       1       1
  1635.   ;;Decay Annoy    Points
  1636.       0      0      50
  1637.   "missile-none"
  1638.   'corpse-human
  1639.   'type-land
  1640.   'right-attack
  1641.   'can-target-land 
  1642.   ;; flags
  1643.   'land-unit
  1644.   'can-attack
  1645.   'organic
  1646.   'selectable-by-rectangle
  1647.   ;; sounds
  1648.   #("korgath-bladefist-selected"
  1649.     "korgath-bladefist-acknowledge"
  1650.     "korgath-bladefist-ready"
  1651.     "korgath-bladefist-help"
  1652.     "korgath-bladefist-dead" )
  1653.   "korgath-bladefist-attack" )
  1654.  
  1655. (define-unit-type "unit-nothing-30"        "Nothing 30"
  1656.   ;; graphic data
  1657.   #(()
  1658.     ()
  1659.     ()
  1660.     () )
  1661.   '(   0   0 )            ;; graphic size
  1662.   "animations-nothing-30"    ;; animations
  1663.   "icon-cancel"
  1664.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  1665.       99       0      0      0      0 #(    0      0       0      0 )
  1666.   ;;Tile    Box Size    Attack    ReactC    ReactH
  1667.   '( 0 0 ) '(   0   0 )     0       0       0
  1668.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  1669.        0     0      0      0       0       0
  1670.   ;;Decay Annoy    Points
  1671.       0      0       0
  1672.   "missile-lightning"
  1673.   'corpse-none
  1674.   'type-land
  1675.   'right-none
  1676.   ;; flags
  1677.   ;; sounds
  1678.   #("nothing-30-selected"
  1679.     "nothing-30-acknowledge"
  1680.     "nothing-30-ready"
  1681.     "nothing-30-help"
  1682.     "nothing-30-dead" )
  1683.   "nothing-30-attack" )
  1684.  
  1685. (define-unit-type "unit-cho'gall"        "Cho'gall"
  1686.   ;; graphic data
  1687.   "unit-ogre"
  1688.   '(  72  72 )            ;; graphic size
  1689.   "animations-cho'gall"    ;; animations
  1690.   "icon-cho'gall"
  1691.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  1692.       13       0      5    100      0 #(  100   1100      50      0 )
  1693.   ;;Tile    Box Size    Attack    ReactC    ReactH
  1694.   '( 1 1 ) '(  42  42 )     1       7       5
  1695.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  1696.        0    65     10      5       1       1
  1697.   ;;Decay Annoy    Points
  1698.       0      0     120
  1699.   "missile-none"
  1700.   'corpse-orc
  1701.   'type-land
  1702.   'right-attack
  1703.   'can-target-land 
  1704.   ;; flags
  1705.   'land-unit
  1706.   'can-cast-spell
  1707.   'can-attack
  1708.   'hero
  1709.   'organic
  1710.   'selectable-by-rectangle
  1711.   ;; sounds
  1712.   #("cho'gall-selected"
  1713.     "cho'gall-acknowledge"
  1714.     "cho'gall-ready"
  1715.     "cho'gall-help"
  1716.     "cho'gall-dead" )
  1717.   "cho'gall-attack" )
  1718.  
  1719. (define-unit-type "unit-lothar"            "Lothar"
  1720.   ;; graphic data
  1721.   "unit-knight"
  1722.   '(  72  72 )            ;; graphic size
  1723.   "animations-lothar"    ;; animations
  1724.   "icon-lothar"
  1725.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  1726.       13       0      5     90      0 #(  100    900     100      0 )
  1727.   ;;Tile    Box Size    Attack    ReactC    ReactH
  1728.   '( 1 1 ) '(  42  42 )     1       7       5
  1729.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  1730.        4    65      8      4       1       1
  1731.   ;;Decay Annoy    Points
  1732.       0      0     120
  1733.   "missile-none"
  1734.   'corpse-human
  1735.   'type-land
  1736.   'right-attack
  1737.   'can-target-land 
  1738.   ;; flags
  1739.   'land-unit
  1740.   'can-attack
  1741.   'hero
  1742.   'organic
  1743.   'selectable-by-rectangle
  1744.   ;; sounds
  1745.   #("lothar-selected"
  1746.     "lothar-acknowledge"
  1747.     "lothar-ready"
  1748.     "lothar-help"
  1749.     "lothar-dead" )
  1750.   "lothar-attack" )
  1751.  
  1752. (define-unit-type "unit-gul'dan"        "Gul'dan"
  1753.   ;; graphic data
  1754.   "unit-death-knight"
  1755.   '(  72  72 )            ;; graphic size
  1756.   "animations-gul'dan"    ;; animations
  1757.   "icon-gul'dan"
  1758.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  1759.        8       0      8     40      1 #(  120   1200       0      0 )
  1760.   ;;Tile    Box Size    Attack    ReactC    ReactH
  1761.   '( 1 1 ) '(  33  33 )     3      10       8
  1762.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  1763.        0    70      0      3       0       0
  1764.   ;;Decay Annoy    Points
  1765.       0      0     120
  1766.   "missile-touch-of-death"
  1767.   'corpse-none
  1768.   'type-land
  1769.   'right-attack
  1770.   'can-target-land 'can-target-sea 'can-target-air 
  1771.   ;; flags
  1772.   'land-unit
  1773.   'isundead
  1774.   'can-cast-spell
  1775.   'can-attack
  1776.   'hero
  1777.   'organic
  1778.   'selectable-by-rectangle
  1779.   ;; sounds
  1780.   #("gul'dan-selected"
  1781.     "gul'dan-acknowledge"
  1782.     "gul'dan-ready"
  1783.     "gul'dan-help"
  1784.     "gul'dan-dead" )
  1785.   "gul'dan-attack" )
  1786.  
  1787. (define-unit-type "unit-uther-lightbringer"    "Uther Lightbringer"
  1788.   ;; graphic data
  1789.   "unit-knight"
  1790.   '(  72  72 )            ;; graphic size
  1791.   "animations-uther-lightbringer"    ;; animations
  1792.   "icon-uther-lightbringer"
  1793.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  1794.       13       0      5     90      0 #(  100    900     100      0 )
  1795.   ;;Tile    Box Size    Attack    ReactC    ReactH
  1796.   '( 1 1 ) '(  42  42 )     1       7       5
  1797.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  1798.        4    65      8      4       1       1
  1799.   ;;Decay Annoy    Points
  1800.       0      0     120
  1801.   "missile-none"
  1802.   'corpse-human
  1803.   'type-land
  1804.   'right-attack
  1805.   'can-target-land 
  1806.   ;; flags
  1807.   'land-unit
  1808.   'can-cast-spell
  1809.   'can-attack
  1810.   'hero
  1811.   'organic
  1812.   'selectable-by-rectangle
  1813.   ;; sounds
  1814.   #("uther-lightbringer-selected"
  1815.     "uther-lightbringer-acknowledge"
  1816.     "uther-lightbringer-ready"
  1817.     "uther-lightbringer-help"
  1818.     "uther-lightbringer-dead" )
  1819.   "uther-lightbringer-attack" )
  1820.  
  1821. (define-unit-type "unit-zuljin"            "Zuljin"
  1822.   ;; graphic data
  1823.   "unit-axethrower"
  1824.   '(  72  72 )            ;; graphic size
  1825.   "animations-zuljin"    ;; animations
  1826.   "icon-zuljin"
  1827.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  1828.       10       0      6     40      0 #(   70    500      50      0 )
  1829.   ;;Tile    Box Size    Attack    ReactC    ReactH
  1830.   '( 1 1 ) '(  36  36 )     5       8       6
  1831.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  1832.        0    55      3      6       1       0
  1833.   ;;Decay Annoy    Points
  1834.       0      0     120
  1835.   "missile-axe"
  1836.   'corpse-orc
  1837.   'type-land
  1838.   'right-attack
  1839.   'can-target-land 'can-target-sea 'can-target-air 
  1840.   ;; flags
  1841.   'land-unit
  1842.   'can-attack
  1843.   'hero
  1844.   'organic
  1845.   'selectable-by-rectangle
  1846.   ;; sounds
  1847.   #("zuljin-selected"
  1848.     "zuljin-acknowledge"
  1849.     "zuljin-ready"
  1850.     "zuljin-help"
  1851.     "zuljin-dead" )
  1852.   "zuljin-attack" )
  1853.  
  1854. (define-unit-type "unit-nothing-36"        "Nothing 36"
  1855.   ;; graphic data
  1856.   #(()
  1857.     ()
  1858.     ()
  1859.     () )
  1860.   '(   0   0 )            ;; graphic size
  1861.   "animations-nothing-36"    ;; animations
  1862.   "icon-cancel"
  1863.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  1864.       99       0      0      0      0 #(    0      0       0      0 )
  1865.   ;;Tile    Box Size    Attack    ReactC    ReactH
  1866.   '( 0 0 ) '(   0   0 )     0       0       0
  1867.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  1868.        0     0      0      0       0       0
  1869.   ;;Decay Annoy    Points
  1870.       0      0       0
  1871.   "missile-lightning"
  1872.   'corpse-none
  1873.   'type-land
  1874.   'right-none
  1875.   ;; flags
  1876.   ;; sounds
  1877.   #("nothing-36-selected"
  1878.     "nothing-36-acknowledge"
  1879.     "nothing-36-ready"
  1880.     "nothing-36-help"
  1881.     "nothing-36-dead" )
  1882.   "nothing-36-attack" )
  1883.  
  1884. (define-unit-type "unit-skeleton"        "Skeleton"
  1885.   ;; graphic data
  1886.   #("skeleton.png"
  1887.     ()
  1888.     ()
  1889.     () )
  1890.   '(  56  56 )            ;; graphic size
  1891.   "animations-skeleton"    ;; animations
  1892.   "icon-skeleton"
  1893.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  1894.       99       0      3     40      0 #(    0      0       0      0 )
  1895.   ;;Tile    Box Size    Attack    ReactC    ReactH
  1896.   '( 1 1 ) '(  31  31 )     1       4       2
  1897.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  1898.        0    55      6      3       0       0
  1899.   ;;Decay Annoy    Points
  1900.     100      0       0
  1901.   "missile-none"
  1902.   'corpse-none
  1903.   'type-land
  1904.   'right-attack
  1905.   'can-target-land 
  1906.   ;; flags
  1907.   'land-unit
  1908.   'critter
  1909.   'isundead
  1910.   'can-attack
  1911.   'organic
  1912.   'selectable-by-rectangle
  1913.   ;; sounds
  1914.   #("skeleton-selected"
  1915.     "skeleton-acknowledge"
  1916.     "skeleton-ready"
  1917.     "skeleton-help"
  1918.     "skeleton-dead" )
  1919.   "skeleton-attack" )
  1920.  
  1921. (define-unit-type "unit-daemon"            "Daemon"
  1922.   ;; graphic data
  1923.   #("daemon.png"
  1924.     ()
  1925.     ()
  1926.     () )
  1927.   '(  72  72 )            ;; graphic size
  1928.   "animations-daemon"    ;; animations
  1929.   "icon-daemon"
  1930.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  1931.       99       0      5     60      0 #(    0      0       0      0 )
  1932.   ;;Tile    Box Size    Attack    ReactC    ReactH
  1933.   '( 1 1 ) '(  31  31 )     3       7       5
  1934.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  1935.        3    63     10      2       0       0
  1936.   ;;Decay Annoy    Points
  1937.       0      0     100
  1938.   "missile-daemon-fire"
  1939.   'corpse-none
  1940.   'type-fly
  1941.   'right-attack
  1942.   'can-target-land 'can-target-sea 'can-target-air 
  1943.   ;; flags
  1944.   'air-unit
  1945.   'critter
  1946.   'can-see-submarine
  1947.   'can-attack
  1948.   'organic
  1949.   ;; sounds
  1950.   #("daemon-selected"
  1951.     "daemon-acknowledge"
  1952.     "daemon-ready"
  1953.     "daemon-help"
  1954.     "daemon-dead" )
  1955.   "daemon-attack" )
  1956.  
  1957. (define-unit-type "unit-critter"        "Critter"
  1958.   ;; graphic data
  1959.   #("critter (summer).png"
  1960.     "critter (winter).png"
  1961.     "critter (wasteland).png"
  1962.     "critter (swamp).png" )
  1963.   '(  32  32 )            ;; graphic size
  1964.   "animations-critter"    ;; animations
  1965.   "icon-critter"
  1966.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  1967.        3       0      2      5      0 #(    0      0       0      0 )
  1968.   ;;Tile    Box Size    Attack    ReactC    ReactH
  1969.   '( 1 1 ) '(  31  31 )     1      20      10
  1970.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  1971.        0    37      0      0       0       0
  1972.   ;;Decay Annoy    Points
  1973.       0      0       1
  1974.   "missile-none"
  1975.   'corpse-none
  1976.   'type-land
  1977.   'right-move
  1978.   ;; flags
  1979.   'land-unit
  1980.   'critter
  1981.   'organic
  1982.   ;; sounds
  1983.   #("critter-selected"
  1984.     "critter-acknowledge"
  1985.     "critter-ready"
  1986.     "critter-help"
  1987.     "critter-dead" )
  1988.   "critter-attack" )
  1989.  
  1990. (define-unit-type "unit-farm"            "Farm"
  1991.   ;; graphic data
  1992.   #("farm (summer).png"
  1993.     "farm (winter).png"
  1994.     "farm (wasteland).png"
  1995.     "farm (swamp).png" )
  1996.   '(  64  64 )            ;; graphic size
  1997.   "animations-farm"    ;; animations
  1998.   "icon-farm"
  1999.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  2000.        0       6      3    400      0 #(  100    500     250      0 )
  2001.   ;;Tile    Box Size    Attack    ReactC    ReactH
  2002.   '( 2 2 ) '(  63  63 )     0       0       0
  2003.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  2004.       20    20      0      0       0       0
  2005.   ;;Decay Annoy    Points
  2006.       0     45     100
  2007.   "missile-lightning"
  2008.   'corpse-land-site
  2009.   'type-land
  2010.   'right-none
  2011.   ;; flags
  2012.   'building
  2013.   ;; sounds
  2014.   #("farm-selected"
  2015.     "farm-acknowledge"
  2016.     "farm-ready"
  2017.     "farm-help"
  2018.     "farm-dead" )
  2019.   "farm-attack" )
  2020.  
  2021. (define-unit-type "unit-pig-farm"        "Pig Farm"
  2022.   ;; graphic data
  2023.   #("pig farm (summer).png"
  2024.     "pig farm (winter).png"
  2025.     "pig farm (wasteland).png"
  2026.     "pig farm (swamp).png" )
  2027.   '(  64  64 )            ;; graphic size
  2028.   "animations-pig-farm"    ;; animations
  2029.   "icon-pig-farm"
  2030.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  2031.        0       6      3    400      0 #(  100    500     250      0 )
  2032.   ;;Tile    Box Size    Attack    ReactC    ReactH
  2033.   '( 2 2 ) '(  63  63 )     0       0       0
  2034.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  2035.       20    20      0      0       0       0
  2036.   ;;Decay Annoy    Points
  2037.       0     45     100
  2038.   "missile-lightning"
  2039.   'corpse-land-site
  2040.   'type-land
  2041.   'right-none
  2042.   ;; flags
  2043.   'building
  2044.   ;; sounds
  2045.   #("pig-farm-selected"
  2046.     "pig-farm-acknowledge"
  2047.     "pig-farm-ready"
  2048.     "pig-farm-help"
  2049.     "pig-farm-dead" )
  2050.   "pig-farm-attack" )
  2051.  
  2052. (define-unit-type "unit-human-barracks"        "Barracks"
  2053.   ;; graphic data
  2054.   #("human barracks (summer).png"
  2055.     "human barracks (winter).png"
  2056.     ()
  2057.     "human barracks (swamp).png" )
  2058.   '(  96  96 )            ;; graphic size
  2059.   "animations-human-barracks"    ;; animations
  2060.   "icon-human-barracks"
  2061.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  2062.        0       6      3    800      0 #(  200    700     450      0 )
  2063.   ;;Tile    Box Size    Attack    ReactC    ReactH
  2064.   '( 3 3 ) '(  95  95 )     0       0       0
  2065.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  2066.       20    30      0      0       0       0
  2067.   ;;Decay Annoy    Points
  2068.       0     35     160
  2069.   "missile-lightning"
  2070.   'corpse-land-site
  2071.   'type-land
  2072.   'right-none
  2073.   ;; flags
  2074.   'building
  2075.   ;; sounds
  2076.   #("human-barracks-selected"
  2077.     "human-barracks-acknowledge"
  2078.     "human-barracks-ready"
  2079.     "human-barracks-help"
  2080.     "human-barracks-dead" )
  2081.   "human-barracks-attack" )
  2082.  
  2083. (define-unit-type "unit-orc-barracks"        "Barracks"
  2084.   ;; graphic data
  2085.   #("orc barracks (summer).png"
  2086.     "orc barracks (winter).png"
  2087.     ()
  2088.     "orc barracks (swamp).png" )
  2089.   '(  96  96 )            ;; graphic size
  2090.   "animations-orc-barracks"    ;; animations
  2091.   "icon-orc-barracks"
  2092.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  2093.        0       6      3    800      0 #(  200    700     450      0 )
  2094.   ;;Tile    Box Size    Attack    ReactC    ReactH
  2095.   '( 3 3 ) '(  95  95 )     0       0       0
  2096.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  2097.       20    30      0      0       0       0
  2098.   ;;Decay Annoy    Points
  2099.       0     35     160
  2100.   "missile-lightning"
  2101.   'corpse-land-site
  2102.   'type-land
  2103.   'right-none
  2104.   ;; flags
  2105.   'building
  2106.   ;; sounds
  2107.   #("orc-barracks-selected"
  2108.     "orc-barracks-acknowledge"
  2109.     "orc-barracks-ready"
  2110.     "orc-barracks-help"
  2111.     "orc-barracks-dead" )
  2112.   "orc-barracks-attack" )
  2113.  
  2114. (define-unit-type "unit-church"            "Church"
  2115.   ;; graphic data
  2116.   #("church (summer).png"
  2117.     "church (winter).png"
  2118.     ()
  2119.     "church (swamp).png" )
  2120.   '(  96  96 )            ;; graphic size
  2121.   "animations-church"    ;; animations
  2122.   "icon-church"
  2123.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  2124.        0       6      3    700      0 #(  175    900     500      0 )
  2125.   ;;Tile    Box Size    Attack    ReactC    ReactH
  2126.   '( 3 3 ) '(  95  95 )     0       0       0
  2127.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  2128.       20    15      0      0       0       0
  2129.   ;;Decay Annoy    Points
  2130.       0     35     240
  2131.   "missile-lightning"
  2132.   'corpse-land-site
  2133.   'type-land
  2134.   'right-none
  2135.   ;; flags
  2136.   'building
  2137.   ;; sounds
  2138.   #("church-selected"
  2139.     "church-acknowledge"
  2140.     "church-ready"
  2141.     "church-help"
  2142.     "church-dead" )
  2143.   "church-attack" )
  2144.  
  2145. (define-unit-type "unit-altar-of-storms"    "Altar of Storms"
  2146.   ;; graphic data
  2147.   #("altar of storms (summer).png"
  2148.     "altar of storms (winter).png"
  2149.     ()
  2150.     "altar of storms (swamp).png" )
  2151.   '(  96  96 )            ;; graphic size
  2152.   "animations-altar-of-storms"    ;; animations
  2153.   "icon-altar-of-storms"
  2154.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  2155.        0       6      3    700      0 #(  175    900     500      0 )
  2156.   ;;Tile    Box Size    Attack    ReactC    ReactH
  2157.   '( 3 3 ) '(  95  95 )     0       0       0
  2158.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  2159.       20    15      0      0       0       0
  2160.   ;;Decay Annoy    Points
  2161.       0     35     240
  2162.   "missile-lightning"
  2163.   'corpse-land-site
  2164.   'type-land
  2165.   'right-none
  2166.   ;; flags
  2167.   'building
  2168.   ;; sounds
  2169.   #("altar-of-storms-selected"
  2170.     "altar-of-storms-acknowledge"
  2171.     "altar-of-storms-ready"
  2172.     "altar-of-storms-help"
  2173.     "altar-of-storms-dead" )
  2174.   "altar-of-storms-attack" )
  2175.  
  2176. (define-unit-type "unit-human-watch-tower"    "Scout Tower"
  2177.   ;; graphic data
  2178.   #("human scout tower (summer).png"
  2179.     "human scout tower (winter).png"
  2180.     ()
  2181.     "human scout tower (swamp).png" )
  2182.   '(  64  64 )            ;; graphic size
  2183.   "animations-human-watch-tower"    ;; animations
  2184.   "icon-human-watch-tower"
  2185.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  2186.        0       6      9    100      0 #(   60    550     200      0 )
  2187.   ;;Tile    Box Size    Attack    ReactC    ReactH
  2188.   '( 2 2 ) '(  63  63 )     0       0       0
  2189.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  2190.       20    55      0      0       0       0
  2191.   ;;Decay Annoy    Points
  2192.       0     50      95
  2193.   "missile-none"
  2194.   'corpse-land-site
  2195.   'type-land
  2196.   'right-none
  2197.   'can-target-land 'can-target-sea 'can-target-air 
  2198.   ;; flags
  2199.   'building
  2200.   'can-see-submarine
  2201.   ;; sounds
  2202.   #("human-watch-tower-selected"
  2203.     "human-watch-tower-acknowledge"
  2204.     "human-watch-tower-ready"
  2205.     "human-watch-tower-help"
  2206.     "human-watch-tower-dead" )
  2207.   "human-watch-tower-attack" )
  2208.  
  2209. (define-unit-type "unit-orc-watch-tower"    "Scout Tower"
  2210.   ;; graphic data
  2211.   #("orc scout tower (summer).png"
  2212.     "orc scout tower (winter).png"
  2213.     ()
  2214.     "orc scout tower (swamp).png" )
  2215.   '(  64  64 )            ;; graphic size
  2216.   "animations-orc-watch-tower"    ;; animations
  2217.   "icon-orc-watch-tower"
  2218.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  2219.        0       6      9    100      0 #(   60    550     200      0 )
  2220.   ;;Tile    Box Size    Attack    ReactC    ReactH
  2221.   '( 2 2 ) '(  63  63 )     0       0       0
  2222.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  2223.       20    55      0      0       0       0
  2224.   ;;Decay Annoy    Points
  2225.       0     50      95
  2226.   "missile-none"
  2227.   'corpse-land-site
  2228.   'type-land
  2229.   'right-none
  2230.   'can-target-land 'can-target-sea 'can-target-air 
  2231.   ;; flags
  2232.   'building
  2233.   'can-see-submarine
  2234.   ;; sounds
  2235.   #("orc-watch-tower-selected"
  2236.     "orc-watch-tower-acknowledge"
  2237.     "orc-watch-tower-ready"
  2238.     "orc-watch-tower-help"
  2239.     "orc-watch-tower-dead" )
  2240.   "orc-watch-tower-attack" )
  2241.  
  2242. (define-unit-type "unit-stables"        "Stables"
  2243.   ;; graphic data
  2244.   #("stables (summer).png"
  2245.     ()
  2246.     ()
  2247.     () )
  2248.   '(  96  96 )            ;; graphic size
  2249.   "animations-stables"    ;; animations
  2250.   "icon-stables"
  2251.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  2252.        0       6      3    500      0 #(  150   1000     300      0 )
  2253.   ;;Tile    Box Size    Attack    ReactC    ReactH
  2254.   '( 3 3 ) '(  95  95 )     0       0       0
  2255.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  2256.       20    15      0      0       0       0
  2257.   ;;Decay Annoy    Points
  2258.       0     15     210
  2259.   "missile-lightning"
  2260.   'corpse-land-site
  2261.   'type-land
  2262.   'right-none
  2263.   ;; flags
  2264.   'building
  2265.   ;; sounds
  2266.   #("stables-selected"
  2267.     "stables-acknowledge"
  2268.     "stables-ready"
  2269.     "stables-help"
  2270.     "stables-dead" )
  2271.   "stables-attack" )
  2272.  
  2273. (define-unit-type "unit-ogre-mound"        "Ogre Mound"
  2274.   ;; graphic data
  2275.   #("ogre mound (summer).png"
  2276.     ()
  2277.     ()
  2278.     () )
  2279.   '(  96  96 )            ;; graphic size
  2280.   "animations-ogre-mound"    ;; animations
  2281.   "icon-ogre-mound"
  2282.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  2283.        0       6      3    500      0 #(  150   1000     300      0 )
  2284.   ;;Tile    Box Size    Attack    ReactC    ReactH
  2285.   '( 3 3 ) '(  95  95 )     0       0       0
  2286.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  2287.       20    15      0      0       0       0
  2288.   ;;Decay Annoy    Points
  2289.       0     15     210
  2290.   "missile-lightning"
  2291.   'corpse-land-site
  2292.   'type-land
  2293.   'right-none
  2294.   ;; flags
  2295.   'building
  2296.   ;; sounds
  2297.   #("ogre-mound-selected"
  2298.     "ogre-mound-acknowledge"
  2299.     "ogre-mound-ready"
  2300.     "ogre-mound-help"
  2301.     "ogre-mound-dead" )
  2302.   "ogre-mound-attack" )
  2303.  
  2304. (define-unit-type "unit-gnomish-inventor"    "Gnomish Inventor"
  2305.   ;; graphic data
  2306.   #("gnomish inventor (summer).png"
  2307.     ()
  2308.     ()
  2309.     () )
  2310.   '(  96  96 )            ;; graphic size
  2311.   "animations-gnomish-inventor"    ;; animations
  2312.   "icon-gnomish-inventor"
  2313.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  2314.        0       6      3    500      0 #(  150   1000     400      0 )
  2315.   ;;Tile    Box Size    Attack    ReactC    ReactH
  2316.   '( 3 3 ) '(  95  95 )     0       0       0
  2317.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  2318.       20    15      0      0       0       0
  2319.   ;;Decay Annoy    Points
  2320.       0     20     230
  2321.   "missile-lightning"
  2322.   'corpse-land-site
  2323.   'type-land
  2324.   'right-none
  2325.   ;; flags
  2326.   'building
  2327.   ;; sounds
  2328.   #("gnomish-inventor-selected"
  2329.     "gnomish-inventor-acknowledge"
  2330.     "gnomish-inventor-ready"
  2331.     "gnomish-inventor-help"
  2332.     "gnomish-inventor-dead" )
  2333.   "gnomish-inventor-attack" )
  2334.  
  2335. (define-unit-type "unit-goblin-alchemist"    "Goblin Alchemist"
  2336.   ;; graphic data
  2337.   #("goblin alchemist (summer).png"
  2338.     ()
  2339.     ()
  2340.     () )
  2341.   '(  96  96 )            ;; graphic size
  2342.   "animations-goblin-alchemist"    ;; animations
  2343.   "icon-goblin-alchemist"
  2344.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  2345.        0       6      3    500      0 #(  150   1000     400      0 )
  2346.   ;;Tile    Box Size    Attack    ReactC    ReactH
  2347.   '( 3 3 ) '(  95  95 )     0       0       0
  2348.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  2349.       20    15      0      0       0       0
  2350.   ;;Decay Annoy    Points
  2351.       0     20     230
  2352.   "missile-lightning"
  2353.   'corpse-land-site
  2354.   'type-land
  2355.   'right-none
  2356.   ;; flags
  2357.   'building
  2358.   ;; sounds
  2359.   #("goblin-alchemist-selected"
  2360.     "goblin-alchemist-acknowledge"
  2361.     "goblin-alchemist-ready"
  2362.     "goblin-alchemist-help"
  2363.     "goblin-alchemist-dead" )
  2364.   "goblin-alchemist-attack" )
  2365.  
  2366. (define-unit-type "unit-gryphon-aviary"        "Gryphon Aviary"
  2367.   ;; graphic data
  2368.   #("gryphon aviary (summer).png"
  2369.     "gryphon aviary (winter).png"
  2370.     ()
  2371.     "gryphon aviary (swamp).png" )
  2372.   '(  96  96 )            ;; graphic size
  2373.   "animations-gryphon-aviary"    ;; animations
  2374.   "icon-gryphon-aviary"
  2375.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  2376.        0       6      3    500      0 #(  150   1000     400      0 )
  2377.   ;;Tile    Box Size    Attack    ReactC    ReactH
  2378.   '( 3 3 ) '(  95  95 )     0       0       0
  2379.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  2380.       20    15      0      0       0       0
  2381.   ;;Decay Annoy    Points
  2382.       0     20     280
  2383.   "missile-lightning"
  2384.   'corpse-land-site
  2385.   'type-land
  2386.   'right-none
  2387.   ;; flags
  2388.   'building
  2389.   ;; sounds
  2390.   #("gryphon-aviary-selected"
  2391.     "gryphon-aviary-acknowledge"
  2392.     "gryphon-aviary-ready"
  2393.     "gryphon-aviary-help"
  2394.     "gryphon-aviary-dead" )
  2395.   "gryphon-aviary-attack" )
  2396.  
  2397. (define-unit-type "unit-dragon-roost"        "Dragon Roost"
  2398.   ;; graphic data
  2399.   #("dragon roost (summer).png"
  2400.     "dragon roost (winter).png"
  2401.     ()
  2402.     "dragon roost (swamp).png" )
  2403.   '(  96  96 )            ;; graphic size
  2404.   "animations-dragon-roost"    ;; animations
  2405.   "icon-dragon-roost"
  2406.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  2407.        0       6      3    500      0 #(  150   1000     400      0 )
  2408.   ;;Tile    Box Size    Attack    ReactC    ReactH
  2409.   '( 3 3 ) '(  95  95 )     0       0       0
  2410.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  2411.       20    15      0      0       0       0
  2412.   ;;Decay Annoy    Points
  2413.       0     20     280
  2414.   "missile-lightning"
  2415.   'corpse-land-site
  2416.   'type-land
  2417.   'right-none
  2418.   ;; flags
  2419.   'building
  2420.   ;; sounds
  2421.   #("dragon-roost-selected"
  2422.     "dragon-roost-acknowledge"
  2423.     "dragon-roost-ready"
  2424.     "dragon-roost-help"
  2425.     "dragon-roost-dead" )
  2426.   "dragon-roost-attack" )
  2427.  
  2428. (define-unit-type "unit-human-shipyard"        "Shipyard"
  2429.   ;; graphic data
  2430.   #("human shipyard (summer).png"
  2431.     "human shipyard (winter).png"
  2432.     ()
  2433.     "human shipyard (swamp).png" )
  2434.   '(  96  96 )            ;; graphic size
  2435.   "animations-human-shipyard"    ;; animations
  2436.   "icon-human-shipyard"
  2437.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  2438.        0       7      3   1100      0 #(  200    800     450      0 )
  2439.   ;;Tile    Box Size    Attack    ReactC    ReactH
  2440.   '( 3 3 ) '(  95  95 )     0       0       0
  2441.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  2442.       20    30      0      0       0       0
  2443.   ;;Decay Annoy    Points
  2444.       0     20     170
  2445.   "missile-lightning"
  2446.   'corpse-water-site
  2447.   'type-land
  2448.   'right-none
  2449.   ;; flags
  2450.   'building
  2451.   'shore-building
  2452.   'stores-oil
  2453.   ;; sounds
  2454.   #("human-shipyard-selected"
  2455.     "human-shipyard-acknowledge"
  2456.     "human-shipyard-ready"
  2457.     "human-shipyard-help"
  2458.     "human-shipyard-dead" )
  2459.   "human-shipyard-attack" )
  2460.  
  2461. (define-unit-type "unit-orc-shipyard"        "Shipyard"
  2462.   ;; graphic data
  2463.   #("orc shipyard (summer).png"
  2464.     "orc shipyard (winter).png"
  2465.     ()
  2466.     "orc shipyard (swamp).png" )
  2467.   '(  96  96 )            ;; graphic size
  2468.   "animations-orc-shipyard"    ;; animations
  2469.   "icon-orc-shipyard"
  2470.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  2471.        0       8      3   1100      0 #(  200    800     450      0 )
  2472.   ;;Tile    Box Size    Attack    ReactC    ReactH
  2473.   '( 3 3 ) '(  95  95 )     0       0       0
  2474.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  2475.       20    30      0      0       0       0
  2476.   ;;Decay Annoy    Points
  2477.       0     20     170
  2478.   "missile-lightning"
  2479.   'corpse-water-site
  2480.   'type-land
  2481.   'right-none
  2482.   ;; flags
  2483.   'building
  2484.   'shore-building
  2485.   'stores-oil
  2486.   ;; sounds
  2487.   #("orc-shipyard-selected"
  2488.     "orc-shipyard-acknowledge"
  2489.     "orc-shipyard-ready"
  2490.     "orc-shipyard-help"
  2491.     "orc-shipyard-dead" )
  2492.   "orc-shipyard-attack" )
  2493.  
  2494. (define-unit-type "unit-town-hall"        "Town Hall"
  2495.   ;; graphic data
  2496.   #("town hall (summer).png"
  2497.     "town hall (winter).png"
  2498.     ()
  2499.     "town hall (swamp).png" )
  2500.   '( 128 128 )            ;; graphic size
  2501.   "animations-town-hall"    ;; animations
  2502.   "icon-town-hall"
  2503.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  2504.        0       6      4   1200      0 #(  255   1200     800      0 )
  2505.   ;;Tile    Box Size    Attack    ReactC    ReactH
  2506.   '( 4 4 ) '( 126 126 )     0       0       0
  2507.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  2508.       20    35      0      0       0       0
  2509.   ;;Decay Annoy    Points
  2510.       0     45     200
  2511.   "missile-lightning"
  2512.   'corpse-land-site
  2513.   'type-land
  2514.   'right-none
  2515.   ;; flags
  2516.   'building
  2517.   'stores-gold
  2518.   ;; sounds
  2519.   #("town-hall-selected"
  2520.     "town-hall-acknowledge"
  2521.     "town-hall-ready"
  2522.     "town-hall-help"
  2523.     "town-hall-dead" )
  2524.   "town-hall-attack" )
  2525.  
  2526. (define-unit-type "unit-great-hall"        "Great Hall"
  2527.   ;; graphic data
  2528.   #("great hall (summer).png"
  2529.     "great hall (winter).png"
  2530.     ()
  2531.     "great hall (swamp).png" )
  2532.   '( 128 128 )            ;; graphic size
  2533.   "animations-great-hall"    ;; animations
  2534.   "icon-great-hall"
  2535.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  2536.        0       6      4   1200      0 #(  255   1200     800      0 )
  2537.   ;;Tile    Box Size    Attack    ReactC    ReactH
  2538.   '( 4 4 ) '( 127 127 )     0       0       0
  2539.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  2540.       20    35      0      0       0       0
  2541.   ;;Decay Annoy    Points
  2542.       0     45     200
  2543.   "missile-lightning"
  2544.   'corpse-land-site
  2545.   'type-land
  2546.   'right-none
  2547.   ;; flags
  2548.   'building
  2549.   'stores-gold
  2550.   ;; sounds
  2551.   #("great-hall-selected"
  2552.     "great-hall-acknowledge"
  2553.     "great-hall-ready"
  2554.     "great-hall-help"
  2555.     "great-hall-dead" )
  2556.   "great-hall-attack" )
  2557.  
  2558. (define-unit-type "unit-elven-lumber-mill"    "Elven Lumber Mill"
  2559.   ;; graphic data
  2560.   #("elven lumber mill (summer).png"
  2561.     "elven lumber mill (winter).png"
  2562.     "elven lumber mill (wasteland).png"
  2563.     "elven lumber mill (swamp).png" )
  2564.   '(  96  96 )            ;; graphic size
  2565.   "animations-elven-lumber-mill"    ;; animations
  2566.   "icon-elven-lumber-mill"
  2567.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  2568.        0       6      3    600      0 #(  150    600     450      0 )
  2569.   ;;Tile    Box Size    Attack    ReactC    ReactH
  2570.   '( 3 3 ) '(  95  95 )     0       0       0
  2571.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  2572.       20    25      0      0       0       0
  2573.   ;;Decay Annoy    Points
  2574.       0     15     150
  2575.   "missile-lightning"
  2576.   'corpse-land-site
  2577.   'type-land
  2578.   'right-none
  2579.   ;; flags
  2580.   'building
  2581.   'stores-wood
  2582.   ;; sounds
  2583.   #("elven-lumber-mill-selected"
  2584.     "elven-lumber-mill-acknowledge"
  2585.     "elven-lumber-mill-ready"
  2586.     "elven-lumber-mill-help"
  2587.     "elven-lumber-mill-dead" )
  2588.   "elven-lumber-mill-attack" )
  2589.  
  2590. (define-unit-type "unit-troll-lumber-mill"    "Troll Lumber Mill"
  2591.   ;; graphic data
  2592.   #("troll lumber mill (summer).png"
  2593.     "troll lumber mill (winter).png"
  2594.     "troll lumber mill (wasteland).png"
  2595.     "troll lumber mill (swamp).png" )
  2596.   '(  96  96 )            ;; graphic size
  2597.   "animations-troll-lumber-mill"    ;; animations
  2598.   "icon-troll-lumber-mill"
  2599.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  2600.        0       6      3    600      0 #(  150    600     450      0 )
  2601.   ;;Tile    Box Size    Attack    ReactC    ReactH
  2602.   '( 3 3 ) '(  95  95 )     0       0       0
  2603.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  2604.       20    25      0      0       0       0
  2605.   ;;Decay Annoy    Points
  2606.       0     15     150
  2607.   "missile-lightning"
  2608.   'corpse-land-site
  2609.   'type-land
  2610.   'right-none
  2611.   ;; flags
  2612.   'building
  2613.   'stores-wood
  2614.   ;; sounds
  2615.   #("troll-lumber-mill-selected"
  2616.     "troll-lumber-mill-acknowledge"
  2617.     "troll-lumber-mill-ready"
  2618.     "troll-lumber-mill-help"
  2619.     "troll-lumber-mill-dead" )
  2620.   "troll-lumber-mill-attack" )
  2621.  
  2622. (define-unit-type "unit-human-foundry"        "Foundry"
  2623.   ;; graphic data
  2624.   #("human foundry (summer).png"
  2625.     "human foundry (winter).png"
  2626.     ()
  2627.     "human foundry (swamp).png" )
  2628.   '(  96  96 )            ;; graphic size
  2629.   "animations-human-foundry"    ;; animations
  2630.   "icon-human-foundry"
  2631.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  2632.        0      13      3    750      0 #(  175    700     400    400 )
  2633.   ;;Tile    Box Size    Attack    ReactC    ReactH
  2634.   '( 3 3 ) '(  95  95 )     0       0       0
  2635.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  2636.       20    15      0      0       0       0
  2637.   ;;Decay Annoy    Points
  2638.       0     20     200
  2639.   "missile-lightning"
  2640.   'corpse-water-site
  2641.   'type-land
  2642.   'right-none
  2643.   ;; flags
  2644.   'building
  2645.   'shore-building
  2646.   ;; sounds
  2647.   #("human-foundry-selected"
  2648.     "human-foundry-acknowledge"
  2649.     "human-foundry-ready"
  2650.     "human-foundry-help"
  2651.     "human-foundry-dead" )
  2652.   "human-foundry-attack" )
  2653.  
  2654. (define-unit-type "unit-orc-foundry"        "Foundry"
  2655.   ;; graphic data
  2656.   #("orc foundry (summer).png"
  2657.     "orc foundry (winter).png"
  2658.     ()
  2659.     "orc foundry (swamp).png" )
  2660.   '(  96  96 )            ;; graphic size
  2661.   "animations-orc-foundry"    ;; animations
  2662.   "icon-orc-foundry"
  2663.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  2664.        0      14      3    750      0 #(  175    700     400    400 )
  2665.   ;;Tile    Box Size    Attack    ReactC    ReactH
  2666.   '( 3 3 ) '(  95  95 )     0       0       0
  2667.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  2668.       20    15      0      0       0       0
  2669.   ;;Decay Annoy    Points
  2670.       0     20     200
  2671.   "missile-lightning"
  2672.   'corpse-water-site
  2673.   'type-land
  2674.   'right-none
  2675.   ;; flags
  2676.   'building
  2677.   'shore-building
  2678.   ;; sounds
  2679.   #("orc-foundry-selected"
  2680.     "orc-foundry-acknowledge"
  2681.     "orc-foundry-ready"
  2682.     "orc-foundry-help"
  2683.     "orc-foundry-dead" )
  2684.   "orc-foundry-attack" )
  2685.  
  2686. (define-unit-type "unit-mage-tower"        "Mage Tower"
  2687.   ;; graphic data
  2688.   #("mage tower (summer).png"
  2689.     "mage tower (winter).png"
  2690.     ()
  2691.     "mage tower (swamp).png" )
  2692.   '(  96  96 )            ;; graphic size
  2693.   "animations-mage-tower"    ;; animations
  2694.   "icon-mage-tower"
  2695.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  2696.        0       6      3    500      0 #(  125   1000     200      0 )
  2697.   ;;Tile    Box Size    Attack    ReactC    ReactH
  2698.   '( 3 3 ) '(  95  95 )     0       0       0
  2699.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  2700.       20    35      0      0       0       0
  2701.   ;;Decay Annoy    Points
  2702.       0     20     240
  2703.   "missile-lightning"
  2704.   'corpse-land-site
  2705.   'type-land
  2706.   'right-none
  2707.   ;; flags
  2708.   'building
  2709.   ;; sounds
  2710.   #("mage-tower-selected"
  2711.     "mage-tower-acknowledge"
  2712.     "mage-tower-ready"
  2713.     "mage-tower-help"
  2714.     "mage-tower-dead" )
  2715.   "mage-tower-attack" )
  2716.  
  2717. (define-unit-type "unit-temple-of-the-damned"    "Temple of the Damned"
  2718.   ;; graphic data
  2719.   #("temple of the damned (summer).png"
  2720.     "temple of the damned (winter).png"
  2721.     ()
  2722.     "temple of the damned (swamp).png" )
  2723.   '(  96  96 )            ;; graphic size
  2724.   "animations-temple-of-the-damned"    ;; animations
  2725.   "icon-temple-of-the-damned"
  2726.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  2727.        0       6      3    500      0 #(  125   1000     200      0 )
  2728.   ;;Tile    Box Size    Attack    ReactC    ReactH
  2729.   '( 3 3 ) '(  95  95 )     0       0       0
  2730.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  2731.       20    35      0      0       0       0
  2732.   ;;Decay Annoy    Points
  2733.       0     20     240
  2734.   "missile-lightning"
  2735.   'corpse-land-site
  2736.   'type-land
  2737.   'right-none
  2738.   ;; flags
  2739.   'building
  2740.   ;; sounds
  2741.   #("temple-of-the-damned-selected"
  2742.     "temple-of-the-damned-acknowledge"
  2743.     "temple-of-the-damned-ready"
  2744.     "temple-of-the-damned-help"
  2745.     "temple-of-the-damned-dead" )
  2746.   "temple-of-the-damned-attack" )
  2747.  
  2748. (define-unit-type "unit-human-blacksmith"    "Blacksmith"
  2749.   ;; graphic data
  2750.   #("human blacksmith (summer).png"
  2751.     "human blacksmith (winter).png"
  2752.     ()
  2753.     "human blacksmith (swamp).png" )
  2754.   '(  96  96 )            ;; graphic size
  2755.   "animations-human-blacksmith"    ;; animations
  2756.   "icon-human-blacksmith"
  2757.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  2758.        0       6      3    775      0 #(  200    800     450    100 )
  2759.   ;;Tile    Box Size    Attack    ReactC    ReactH
  2760.   '( 3 3 ) '(  95  95 )     0       0       0
  2761.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  2762.       20    15      0      0       0       0
  2763.   ;;Decay Annoy    Points
  2764.       0     20     170
  2765.   "missile-lightning"
  2766.   'corpse-land-site
  2767.   'type-land
  2768.   'right-none
  2769.   ;; flags
  2770.   'building
  2771.   ;; sounds
  2772.   #("human-blacksmith-selected"
  2773.     "human-blacksmith-acknowledge"
  2774.     "human-blacksmith-ready"
  2775.     "human-blacksmith-help"
  2776.     "human-blacksmith-dead" )
  2777.   "human-blacksmith-attack" )
  2778.  
  2779. (define-unit-type "unit-orc-blacksmith"        "Blacksmith"
  2780.   ;; graphic data
  2781.   #("orc blacksmith (summer).png"
  2782.     "orc blacksmith (winter).png"
  2783.     ()
  2784.     "orc blacksmith (swamp).png" )
  2785.   '(  96  96 )            ;; graphic size
  2786.   "animations-orc-blacksmith"    ;; animations
  2787.   "icon-orc-blacksmith"
  2788.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  2789.        0       6      3    775      0 #(  200    800     450    100 )
  2790.   ;;Tile    Box Size    Attack    ReactC    ReactH
  2791.   '( 3 3 ) '(  95  95 )     0       0       0
  2792.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  2793.       20    15      0      0       0       0
  2794.   ;;Decay Annoy    Points
  2795.       0     20     170
  2796.   "missile-lightning"
  2797.   'corpse-land-site
  2798.   'type-land
  2799.   'right-none
  2800.   ;; flags
  2801.   'building
  2802.   ;; sounds
  2803.   #("orc-blacksmith-selected"
  2804.     "orc-blacksmith-acknowledge"
  2805.     "orc-blacksmith-ready"
  2806.     "orc-blacksmith-help"
  2807.     "orc-blacksmith-dead" )
  2808.   "orc-blacksmith-attack" )
  2809.  
  2810. (define-unit-type "unit-human-refinery"        "Refinery"
  2811.   ;; graphic data
  2812.   #("human refinery (summer).png"
  2813.     "human refinery (winter).png"
  2814.     ()
  2815.     "human refinery (swamp).png" )
  2816.   '(  96  96 )            ;; graphic size
  2817.   "animations-human-refinery"    ;; animations
  2818.   "icon-human-refinery"
  2819.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  2820.        0      11      3    600      0 #(  225    800     350    200 )
  2821.   ;;Tile    Box Size    Attack    ReactC    ReactH
  2822.   '( 3 3 ) '(  95  95 )     0       0       0
  2823.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  2824.       20    25      0      0       0       0
  2825.   ;;Decay Annoy    Points
  2826.       0     20     200
  2827.   "missile-lightning"
  2828.   'corpse-water-site
  2829.   'type-land
  2830.   'right-none
  2831.   ;; flags
  2832.   'building
  2833.   'shore-building
  2834.   'stores-oil
  2835.   ;; sounds
  2836.   #("human-refinery-selected"
  2837.     "human-refinery-acknowledge"
  2838.     "human-refinery-ready"
  2839.     "human-refinery-help"
  2840.     "human-refinery-dead" )
  2841.   "human-refinery-attack" )
  2842.  
  2843. (define-unit-type "unit-orc-refinery"        "Refinery"
  2844.   ;; graphic data
  2845.   #("orc refinery (summer).png"
  2846.     "orc refinery (winter).png"
  2847.     ()
  2848.     "orc refinery (swamp).png" )
  2849.   '(  96  96 )            ;; graphic size
  2850.   "animations-orc-refinery"    ;; animations
  2851.   "icon-orc-refinery"
  2852.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  2853.        0      12      3    600      0 #(  225    800     350    200 )
  2854.   ;;Tile    Box Size    Attack    ReactC    ReactH
  2855.   '( 3 3 ) '(  95  95 )     0       0       0
  2856.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  2857.       20    25      0      0       0       0
  2858.   ;;Decay Annoy    Points
  2859.       0     20     200
  2860.   "missile-lightning"
  2861.   'corpse-water-site
  2862.   'type-land
  2863.   'right-none
  2864.   ;; flags
  2865.   'building
  2866.   'shore-building
  2867.   'stores-oil
  2868.   ;; sounds
  2869.   #("orc-refinery-selected"
  2870.     "orc-refinery-acknowledge"
  2871.     "orc-refinery-ready"
  2872.     "orc-refinery-help"
  2873.     "orc-refinery-dead" )
  2874.   "orc-refinery-attack" )
  2875.  
  2876. (define-unit-type "unit-human-oil-platform"    "Oil Platform"
  2877.   ;; graphic data
  2878.   #("human oil well (summer).png"
  2879.     "human oil well (winter).png"
  2880.     "human oil well (wasteland).png"
  2881.     "human oil well (swamp).png" )
  2882.   '(  96  96 )            ;; graphic size
  2883.   "animations-human-oil-platform"    ;; animations
  2884.   "icon-human-oil-platform"
  2885.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  2886.        0       9      3    650      0 #(  200    700     450      0 )
  2887.   ;;Tile    Box Size    Attack    ReactC    ReactH
  2888.   '( 3 3 ) '(  95  95 )     0       0       0
  2889.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  2890.       20    20      0      0       0       0
  2891.   ;;Decay Annoy    Points
  2892.       0     20     160
  2893.   "missile-lightning"
  2894.   'corpse-water-site
  2895.   'type-naval
  2896.   'right-none
  2897.   ;; flags
  2898.   'building
  2899.   'gives-oil
  2900.   ;; sounds
  2901.   #("human-oil-platform-selected"
  2902.     "human-oil-platform-acknowledge"
  2903.     "human-oil-platform-ready"
  2904.     "human-oil-platform-help"
  2905.     "human-oil-platform-dead" )
  2906.   "human-oil-platform-attack" )
  2907.  
  2908. (define-unit-type "unit-orc-oil-platform"    "Oil Platform"
  2909.   ;; graphic data
  2910.   #("orc oil well (summer).png"
  2911.     "orc oil well (winter).png"
  2912.     "orc oil well (wasteland).png"
  2913.     "orc oil well (swamp).png" )
  2914.   '(  96  96 )            ;; graphic size
  2915.   "animations-orc-oil-platform"    ;; animations
  2916.   "icon-orc-oil-platform"
  2917.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  2918.        0      10      3    650      0 #(  200    700     450      0 )
  2919.   ;;Tile    Box Size    Attack    ReactC    ReactH
  2920.   '( 3 3 ) '(  95  95 )     0       0       0
  2921.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  2922.       20    20      0      0       0       0
  2923.   ;;Decay Annoy    Points
  2924.       0     20     160
  2925.   "missile-lightning"
  2926.   'corpse-water-site
  2927.   'type-naval
  2928.   'right-none
  2929.   ;; flags
  2930.   'building
  2931.   'gives-oil
  2932.   ;; sounds
  2933.   #("orc-oil-platform-selected"
  2934.     "orc-oil-platform-acknowledge"
  2935.     "orc-oil-platform-ready"
  2936.     "orc-oil-platform-help"
  2937.     "orc-oil-platform-dead" )
  2938.   "orc-oil-platform-attack" )
  2939.  
  2940. (define-unit-type "unit-keep"            "Keep"
  2941.   ;; graphic data
  2942.   #("keep (summer).png"
  2943.     "keep (winter).png"
  2944.     ()
  2945.     "keep (swamp).png" )
  2946.   '( 128 128 )            ;; graphic size
  2947.   "animations-keep"    ;; animations
  2948.   "icon-keep"
  2949.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  2950.        0       6      6   1400      0 #(  200   2000    1000    200 )
  2951.   ;;Tile    Box Size    Attack    ReactC    ReactH
  2952.   '( 4 4 ) '( 127 127 )     0       0       0
  2953.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  2954.       20    37      0      0       0       0
  2955.   ;;Decay Annoy    Points
  2956.       0     40     600
  2957.   "missile-lightning"
  2958.   'corpse-land-site
  2959.   'type-land
  2960.   'right-none
  2961.   ;; flags
  2962.   'building
  2963.   'stores-gold
  2964.   ;; sounds
  2965.   #("keep-selected"
  2966.     "keep-acknowledge"
  2967.     "keep-ready"
  2968.     "keep-help"
  2969.     "keep-dead" )
  2970.   "keep-attack" )
  2971.  
  2972. (define-unit-type "unit-stronghold"        "Stronghold"
  2973.   ;; graphic data
  2974.   #("stronghold (summer).png"
  2975.     "stronghold (winter).png"
  2976.     ()
  2977.     "stronghold (swamp).png" )
  2978.   '( 128 128 )            ;; graphic size
  2979.   "animations-stronghold"    ;; animations
  2980.   "icon-stronghold"
  2981.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  2982.        0       6      6   1400      0 #(  200   2000    1000    200 )
  2983.   ;;Tile    Box Size    Attack    ReactC    ReactH
  2984.   '( 4 4 ) '( 127 127 )     0       0       0
  2985.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  2986.       20    37      0      0       0       0
  2987.   ;;Decay Annoy    Points
  2988.       0     40     600
  2989.   "missile-lightning"
  2990.   'corpse-land-site
  2991.   'type-land
  2992.   'right-none
  2993.   ;; flags
  2994.   'building
  2995.   'stores-gold
  2996.   ;; sounds
  2997.   #("stronghold-selected"
  2998.     "stronghold-acknowledge"
  2999.     "stronghold-ready"
  3000.     "stronghold-help"
  3001.     "stronghold-dead" )
  3002.   "stronghold-attack" )
  3003.  
  3004. (define-unit-type "unit-castle"            "Castle"
  3005.   ;; graphic data
  3006.   #("castle (summer).png"
  3007.     "castle (winter).png"
  3008.     ()
  3009.     "castle (swamp).png" )
  3010.   '( 128 128 )            ;; graphic size
  3011.   "animations-castle"    ;; animations
  3012.   "icon-castle"
  3013.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  3014.        0       6      9   1600      0 #(  200   2500    1200    500 )
  3015.   ;;Tile    Box Size    Attack    ReactC    ReactH
  3016.   '( 4 4 ) '( 127 127 )     0       0       0
  3017.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  3018.       20    40      0      0       0       0
  3019.   ;;Decay Annoy    Points
  3020.       0     50    1500
  3021.   "missile-lightning"
  3022.   'corpse-land-site
  3023.   'type-land
  3024.   'right-none
  3025.   ;; flags
  3026.   'building
  3027.   'stores-gold
  3028.   ;; sounds
  3029.   #("castle-selected"
  3030.     "castle-acknowledge"
  3031.     "castle-ready"
  3032.     "castle-help"
  3033.     "castle-dead" )
  3034.   "castle-attack" )
  3035.  
  3036. (define-unit-type "unit-fortress"        "Fortress"
  3037.   ;; graphic data
  3038.   #("fortress (summer).png"
  3039.     "fortress (winter).png"
  3040.     ()
  3041.     "fortress (swamp).png" )
  3042.   '( 128 128 )            ;; graphic size
  3043.   "animations-fortress"    ;; animations
  3044.   "icon-fortress"
  3045.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  3046.        0       6      9   1600      0 #(  200   2500    1200    500 )
  3047.   ;;Tile    Box Size    Attack    ReactC    ReactH
  3048.   '( 4 4 ) '( 127 127 )     0       0       0
  3049.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  3050.       20    40      0      0       0       0
  3051.   ;;Decay Annoy    Points
  3052.       0     50    1500
  3053.   "missile-lightning"
  3054.   'corpse-land-site
  3055.   'type-land
  3056.   'right-none
  3057.   ;; flags
  3058.   'building
  3059.   'stores-gold
  3060.   ;; sounds
  3061.   #("fortress-selected"
  3062.     "fortress-acknowledge"
  3063.     "fortress-ready"
  3064.     "fortress-help"
  3065.     "fortress-dead" )
  3066.   "fortress-attack" )
  3067.  
  3068. (define-unit-type "unit-gold-mine"        "Gold Mine"
  3069.   ;; graphic data
  3070.   #("gold mine (summer).png"
  3071.     "gold mine (winter).png"
  3072.     "gold mine (wasteland).png"
  3073.     "gold mine (swamp).png" )
  3074.   '(  96  96 )            ;; graphic size
  3075.   "animations-gold-mine"    ;; animations
  3076.   "icon-gold-mine"
  3077.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  3078.        0       6      3  25500      0 #(  150      0       0      0 )
  3079.   ;;Tile    Box Size    Attack    ReactC    ReactH
  3080.   '( 3 3 ) '(  95  95 )     0       0       0
  3081.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  3082.       20     0      0      0       0       0
  3083.   ;;Decay Annoy    Points
  3084.       0      0       0
  3085.   "missile-lightning"
  3086.   'corpse-land-site
  3087.   'type-land
  3088.   'right-none
  3089.   ;; flags
  3090.   'building
  3091.   'gives-gold
  3092.   ;; sounds
  3093.   #("gold-mine-selected"
  3094.     "gold-mine-acknowledge"
  3095.     "gold-mine-ready"
  3096.     "gold-mine-help"
  3097.     "gold-mine-dead" )
  3098.   "gold-mine-attack" )
  3099.  
  3100. (define-unit-type "unit-oil-patch"        "Oil Patch"
  3101.   ;; graphic data
  3102.   #("oil patch (summer).png"
  3103.     ()
  3104.     "oil patch (wasteland).png"
  3105.     "oil patch (swamp).png" )
  3106.   '(  96  96 )            ;; graphic size
  3107.   "animations-oil-patch"    ;; animations
  3108.   "icon-oil-patch"
  3109.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  3110.        0       0      0      0      0 #(    0      0       0      0 )
  3111.   ;;Tile    Box Size    Attack    ReactC    ReactH
  3112.   '( 3 3 ) '(  95  95 )     0       0       0
  3113.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  3114.        0     0      0      0       0       0
  3115.   ;;Decay Annoy    Points
  3116.       0      0       0
  3117.   "missile-lightning"
  3118.   'corpse-none
  3119.   'type-naval
  3120.   'right-none
  3121.   ;; flags
  3122.   'building
  3123.   'oil-patch
  3124.   ;; sounds
  3125.   #("oil-patch-selected"
  3126.     "oil-patch-acknowledge"
  3127.     "oil-patch-ready"
  3128.     "oil-patch-help"
  3129.     "oil-patch-dead" )
  3130.   "oil-patch-attack" )
  3131.  
  3132. (define-unit-type "unit-human-start-location"    "Start Location"
  3133.   ;; graphic data
  3134.   #(()
  3135.     ()
  3136.     ()
  3137.     () )
  3138.   '(  32  32 )            ;; graphic size
  3139.   "animations-human-start-location"    ;; animations
  3140.   "icon-cancel"
  3141.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  3142.        0       0      0      0      0 #(    0      0       0      0 )
  3143.   ;;Tile    Box Size    Attack    ReactC    ReactH
  3144.   '( 1 1 ) '(  31  31 )     0       0       0
  3145.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  3146.        0     0      0      0       0       0
  3147.   ;;Decay Annoy    Points
  3148.       0      0       0
  3149.   "missile-lightning"
  3150.   'corpse-none
  3151.   'type-land
  3152.   'right-none
  3153.   ;; flags
  3154.   ;; sounds
  3155.   #("human-start-location-selected"
  3156.     "human-start-location-acknowledge"
  3157.     "human-start-location-ready"
  3158.     "human-start-location-help"
  3159.     "human-start-location-dead" )
  3160.   "human-start-location-attack" )
  3161.  
  3162. (define-unit-type "unit-orc-start-location"    "Start Location"
  3163.   ;; graphic data
  3164.   #(()
  3165.     ()
  3166.     ()
  3167.     () )
  3168.   '(  32  32 )            ;; graphic size
  3169.   "animations-orc-start-location"    ;; animations
  3170.   "icon-cancel"
  3171.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  3172.        0       0      0      0      0 #(    0      0       0      0 )
  3173.   ;;Tile    Box Size    Attack    ReactC    ReactH
  3174.   '( 1 1 ) '(  31  31 )     0       0       0
  3175.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  3176.        0     0      0      0       0       0
  3177.   ;;Decay Annoy    Points
  3178.       0      0       0
  3179.   "missile-lightning"
  3180.   'corpse-none
  3181.   'type-land
  3182.   'right-none
  3183.   ;; flags
  3184.   ;; sounds
  3185.   #("orc-start-location-selected"
  3186.     "orc-start-location-acknowledge"
  3187.     "orc-start-location-ready"
  3188.     "orc-start-location-help"
  3189.     "orc-start-location-dead" )
  3190.   "orc-start-location-attack" )
  3191.  
  3192. (define-unit-type "unit-human-guard-tower"    "Guard Tower"
  3193.   ;; graphic data
  3194.   #("human guard tower (summer).png"
  3195.     "human guard tower (winter).png"
  3196.     ()
  3197.     "human guard tower (swamp).png" )
  3198.   '(  64  64 )            ;; graphic size
  3199.   "animations-human-guard-tower"    ;; animations
  3200.   "icon-human-guard-tower"
  3201.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  3202.        0       6      9    130      0 #(  140    500     150      0 )
  3203.   ;;Tile    Box Size    Attack    ReactC    ReactH
  3204.   '( 2 2 ) '(  63  63 )     6       6       6
  3205.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  3206.       20    40      4     12       0       0
  3207.   ;;Decay Annoy    Points
  3208.       0     50     200
  3209.   "missile-arrow"
  3210.   'corpse-land-site
  3211.   'type-land
  3212.   'right-none
  3213.   'can-target-land 'can-target-sea 'can-target-air 
  3214.   ;; flags
  3215.   'building
  3216.   'can-see-submarine
  3217.   'can-attack
  3218.   'tower
  3219.   ;; sounds
  3220.   #("human-guard-tower-selected"
  3221.     "human-guard-tower-acknowledge"
  3222.     "human-guard-tower-ready"
  3223.     "human-guard-tower-help"
  3224.     "human-guard-tower-dead" )
  3225.   "human-guard-tower-attack" )
  3226.  
  3227. (define-unit-type "unit-orc-guard-tower"    "Guard Tower"
  3228.   ;; graphic data
  3229.   #("orc guard tower (summer).png"
  3230.     "orc guard tower (winter).png"
  3231.     ()
  3232.     "orc guard tower (swamp).png" )
  3233.   '(  64  64 )            ;; graphic size
  3234.   "animations-orc-guard-tower"    ;; animations
  3235.   "icon-orc-guard-tower"
  3236.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  3237.        0       6      9    130      0 #(  140    500     150      0 )
  3238.   ;;Tile    Box Size    Attack    ReactC    ReactH
  3239.   '( 2 2 ) '(  63  63 )     6       6       6
  3240.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  3241.       20    40      4     12       0       0
  3242.   ;;Decay Annoy    Points
  3243.       0     50     200
  3244.   "missile-arrow"
  3245.   'corpse-land-site
  3246.   'type-land
  3247.   'right-none
  3248.   'can-target-land 'can-target-sea 'can-target-air 
  3249.   ;; flags
  3250.   'building
  3251.   'can-see-submarine
  3252.   'can-attack
  3253.   'tower
  3254.   ;; sounds
  3255.   #("orc-guard-tower-selected"
  3256.     "orc-guard-tower-acknowledge"
  3257.     "orc-guard-tower-ready"
  3258.     "orc-guard-tower-help"
  3259.     "orc-guard-tower-dead" )
  3260.   "orc-guard-tower-attack" )
  3261.  
  3262. (define-unit-type "unit-human-cannon-tower"    "Cannon Tower"
  3263.   ;; graphic data
  3264.   #("human cannon tower (summer).png"
  3265.     "human cannon tower (winter).png"
  3266.     ()
  3267.     "human cannon tower (swamp).png" )
  3268.   '(  64  64 )            ;; graphic size
  3269.   "animations-human-cannon-tower"    ;; animations
  3270.   "icon-human-cannon-tower"
  3271.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  3272.        0       6      9    160      0 #(  190   1000     300      0 )
  3273.   ;;Tile    Box Size    Attack    ReactC    ReactH
  3274.   '( 2 2 ) '(  63  63 )     7       7       7
  3275.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  3276.       20    40     50      0       0       0
  3277.   ;;Decay Annoy    Points
  3278.       0     50     250
  3279.   "missile-small-cannon"
  3280.   'corpse-land-site
  3281.   'type-land
  3282.   'right-none
  3283.   'can-target-land 'can-target-sea 
  3284.   ;; flags
  3285.   'building
  3286.   'can-see-submarine
  3287.   'can-attack
  3288.   'tower
  3289.   ;; sounds
  3290.   #("human-cannon-tower-selected"
  3291.     "human-cannon-tower-acknowledge"
  3292.     "human-cannon-tower-ready"
  3293.     "human-cannon-tower-help"
  3294.     "human-cannon-tower-dead" )
  3295.   "human-cannon-tower-attack" )
  3296.  
  3297. (define-unit-type "unit-orc-cannon-tower"    "Cannon Tower"
  3298.   ;; graphic data
  3299.   #("orc cannon tower (summer).png"
  3300.     "orc cannon tower (winter).png"
  3301.     ()
  3302.     "orc cannon tower (swamp).png" )
  3303.   '(  64  64 )            ;; graphic size
  3304.   "animations-orc-cannon-tower"    ;; animations
  3305.   "icon-orc-cannon-tower"
  3306.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  3307.        0       6      9    160      0 #(  190   1000     300      0 )
  3308.   ;;Tile    Box Size    Attack    ReactC    ReactH
  3309.   '( 2 2 ) '(  63  63 )     7       7       7
  3310.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  3311.       20    40     50      0       0       0
  3312.   ;;Decay Annoy    Points
  3313.       0     50     250
  3314.   "missile-small-cannon"
  3315.   'corpse-land-site
  3316.   'type-land
  3317.   'right-none
  3318.   'can-target-land 'can-target-sea 
  3319.   ;; flags
  3320.   'building
  3321.   'can-see-submarine
  3322.   'can-attack
  3323.   'tower
  3324.   ;; sounds
  3325.   #("orc-cannon-tower-selected"
  3326.     "orc-cannon-tower-acknowledge"
  3327.     "orc-cannon-tower-ready"
  3328.     "orc-cannon-tower-help"
  3329.     "orc-cannon-tower-dead" )
  3330.   "orc-cannon-tower-attack" )
  3331.  
  3332. (define-unit-type "unit-circle-of-power"    "Circle of Power"
  3333.   ;; graphic data
  3334.   #("circle of power.png"
  3335.     ()
  3336.     ()
  3337.     () )
  3338.   '(  64  64 )            ;; graphic size
  3339.   "animations-circle-of-power"    ;; animations
  3340.   "icon-circle-of-power"
  3341.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  3342.        0       0      0      0      0 #(    0      0       0      0 )
  3343.   ;;Tile    Box Size    Attack    ReactC    ReactH
  3344.   '( 2 2 ) '(  63  63 )     0       0       0
  3345.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  3346.        0     0      0      0       0       0
  3347.   ;;Decay Annoy    Points
  3348.       0      0       0
  3349.   "missile-lightning"
  3350.   'corpse-land-site
  3351.   'type-land
  3352.   'right-none
  3353.   ;; flags
  3354.   'building
  3355.   ;; sounds
  3356.   #("circle-of-power-selected"
  3357.     "circle-of-power-acknowledge"
  3358.     "circle-of-power-ready"
  3359.     "circle-of-power-help"
  3360.     "circle-of-power-dead" )
  3361.   "circle-of-power-attack" )
  3362.  
  3363. (define-unit-type "unit-dark-portal"        "Dark Portal"
  3364.   ;; graphic data
  3365.   #("dark portal (summer).png"
  3366.     "dark portal (winter).png"
  3367.     "dark portal (wasteland).png"
  3368.     "dark portal (swamp).png" )
  3369.   '( 128 128 )            ;; graphic size
  3370.   "animations-dark-portal"    ;; animations
  3371.   "icon-dark-portal"
  3372.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  3373.        0       0      0   5000      0 #(    0      0       0      0 )
  3374.   ;;Tile    Box Size    Attack    ReactC    ReactH
  3375.   '( 4 4 ) '( 127 127 )     0       0       0
  3376.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  3377.        0     0      0      0       0       0
  3378.   ;;Decay Annoy    Points
  3379.       0      0       0
  3380.   "missile-lightning"
  3381.   'corpse-land-site
  3382.   'type-land
  3383.   'right-none
  3384.   ;; flags
  3385.   'building
  3386.   ;; sounds
  3387.   #("dark-portal-selected"
  3388.     "dark-portal-acknowledge"
  3389.     "dark-portal-ready"
  3390.     "dark-portal-help"
  3391.     "dark-portal-dead" )
  3392.   "dark-portal-attack" )
  3393.  
  3394. (define-unit-type "unit-runestone"        "Runestone"
  3395.   ;; graphic data
  3396.   #("runestone (summer,wasteland).png"
  3397.     "runestone (winter).png"
  3398.     ()
  3399.     "runestone (swamp).png" )
  3400.   '(  64  64 )            ;; graphic size
  3401.   "animations-runestone"    ;; animations
  3402.   "icon-runestone"
  3403.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  3404.        0       6      4   5000      0 #(  175    900     500      0 )
  3405.   ;;Tile    Box Size    Attack    ReactC    ReactH
  3406.   '( 2 2 ) '(  63  63 )     0       0       0
  3407.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  3408.       20    15      0      0       0       0
  3409.   ;;Decay Annoy    Points
  3410.       0     35     150
  3411.   "missile-lightning"
  3412.   'corpse-land-site
  3413.   'type-land
  3414.   'right-none
  3415.   ;; flags
  3416.   'building
  3417.   ;; sounds
  3418.   #("runestone-selected"
  3419.     "runestone-acknowledge"
  3420.     "runestone-ready"
  3421.     "runestone-help"
  3422.     "runestone-dead" )
  3423.   "runestone-attack" )
  3424.  
  3425. (define-unit-type "unit-human-wall"        "Wall"
  3426.   ;; graphic data
  3427.   #("wall (summer).png"
  3428.     "wall (winter).png"
  3429.     "wall (wasteland).png"
  3430.     () )
  3431.   '(  32  32 )            ;; graphic size
  3432.   "animations-human-wall"    ;; animations
  3433.   "icon-human-wall"
  3434.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  3435.        0      15      1     40      0 #(   30     20      10      0 )
  3436.   ;;Tile    Box Size    Attack    ReactC    ReactH
  3437.   '( 1 1 ) '(  31  31 )     0       0       0
  3438.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  3439.        0     0      0      0       0       0
  3440.   ;;Decay Annoy    Points
  3441.       0     45       1
  3442.   "missile-lightning"
  3443.   'corpse-land-site
  3444.   'type-land
  3445.   'right-none
  3446.   ;; flags
  3447.   'building
  3448.   ;; sounds
  3449.   #("human-wall-selected"
  3450.     "human-wall-acknowledge"
  3451.     "human-wall-ready"
  3452.     "human-wall-help"
  3453.     "human-wall-dead" )
  3454.   "human-wall-attack" )
  3455.  
  3456. (define-unit-type "unit-orc-wall"        "Wall"
  3457.   ;; graphic data
  3458.   "unit-human-wall"
  3459.   '(  32  32 )            ;; graphic size
  3460.   "animations-orc-wall"    ;; animations
  3461.   "icon-orc-wall"
  3462.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  3463.        0      15      1     40      0 #(   30     20      10      0 0 0)
  3464.   ;;Tile    Box Size    Attack    ReactC    ReactH
  3465.   '( 1 1 ) '(  31  31 )     0       0       0
  3466.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  3467.        0     0      0      0       0       0
  3468.   ;;Decay Annoy    Points
  3469.       0     45       1
  3470.   "missile-lightning"
  3471.   'corpse-land-site
  3472.   'type-land
  3473.   'right-none
  3474.   ;; flags
  3475.   'building
  3476.   ;; sounds
  3477.   #("orc-wall-selected"
  3478.     "orc-wall-acknowledge"
  3479.     "orc-wall-ready"
  3480.     "orc-wall-help"
  3481.     "orc-wall-dead" )
  3482.   "orc-wall-attack" )
  3483.  
  3484. (define-unit-type "unit-dead-body"        "Dead Body"
  3485.   ;; graphic data
  3486.   #("corpses.png"
  3487.     ()
  3488.     ()
  3489.     () )
  3490.   '(  72  72 )            ;; graphic size
  3491.   "animations-dead-body"    ;; animations
  3492.   "icon-peasant"
  3493.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  3494.        0       0      1    255      0 #(    0      0       0      0 )
  3495.   ;;Tile    Box Size    Attack    ReactC    ReactH
  3496.   '( 1 1 ) '(  31  31 )     0       0       0
  3497.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  3498.        0     0      0      0       0       0
  3499.   ;;Decay Annoy    Points
  3500.       0      0       0
  3501.   "missile-lightning"
  3502.   'corpse-none
  3503.   'type-land
  3504.   'right-none
  3505.   ;; flags
  3506.   'vanishes
  3507.   ;; sounds
  3508.   #("dead-body-selected"
  3509.     "dead-body-acknowledge"
  3510.     "dead-body-ready"
  3511.     "dead-body-help"
  3512.     "dead-body-dead" )
  3513.   "dead-body-attack" )
  3514.  
  3515. (define-unit-type "unit-destroyed-1x1-place"    "1x1 Destroyed Place"
  3516.   ;; graphic data
  3517.   #("small destroyed site (summer).png"
  3518.     "small destroyed site (winter).png"
  3519.     "small destroyed site (wasteland).png"
  3520.     "small destroyed site (swamp).png" )
  3521.   '(  32  32 )            ;; graphic size
  3522.   "animations-destroyed-1x1-place"    ;; animations
  3523.   "icon-peasant"
  3524.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  3525.        0       0      2    255      0 #(    0      0       0      0 )
  3526.   ;;Tile    Box Size    Attack    ReactC    ReactH
  3527.   '( 1 1 ) '(  31  31 )     0       0       0
  3528.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  3529.        0     0      0      0       0       0
  3530.   ;;Decay Annoy    Points
  3531.       0      0       0
  3532.   "missile-lightning"
  3533.   'corpse-none
  3534.   'type-land
  3535.   'right-none
  3536.   ;; flags
  3537.   'building
  3538.   'vanishes
  3539.   ;; sounds
  3540.   #("destroyed-1x1-place-selected"
  3541.     "destroyed-1x1-place-acknowledge"
  3542.     "destroyed-1x1-place-ready"
  3543.     "destroyed-1x1-place-help"
  3544.     "destroyed-1x1-place-dead" )
  3545.   "destroyed-1x1-place-attack" )
  3546.  
  3547. (define-unit-type "unit-destroyed-2x2-place"    "2x2 Destroyed Place"
  3548.   ;; graphic data
  3549.   #("destroyed site (summer).png"
  3550.     "destroyed site (winter).png"
  3551.     "destroyed site (wasteland).png"
  3552.     "destroyed site (swamp).png" )
  3553.   '(  64  64 )            ;; graphic size
  3554.   "animations-destroyed-2x2-place"    ;; animations
  3555.   "icon-peasant"
  3556.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  3557.        0       0      2    255      0 #(    0      0       0      0 )
  3558.   ;;Tile    Box Size    Attack    ReactC    ReactH
  3559.   '( 2 2 ) '(  63  63 )     0       0       0
  3560.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  3561.        0     0      0      0       0       0
  3562.   ;;Decay Annoy    Points
  3563.       0      0       0
  3564.   "missile-lightning"
  3565.   'corpse-none
  3566.   'type-land
  3567.   'right-none
  3568.   ;; flags
  3569.   'building
  3570.   'vanishes
  3571.   ;; sounds
  3572.   #("destroyed-2x2-place-selected"
  3573.     "destroyed-2x2-place-acknowledge"
  3574.     "destroyed-2x2-place-ready"
  3575.     "destroyed-2x2-place-help"
  3576.     "destroyed-2x2-place-dead" )
  3577.   "destroyed-2x2-place-attack" )
  3578.  
  3579. (define-unit-type "unit-destroyed-3x3-place"    "3x3 Destroyed Place"
  3580.   ;; graphic data
  3581.   "unit-destroyed-2x2-place"
  3582.   '(  96  96 )            ;; graphic size
  3583.   "animations-destroyed-3x3-place"    ;; animations
  3584.   "icon-peasant"
  3585.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  3586.        0       0      3    255      0 #(    0      0       0      0 )
  3587.   ;;Tile    Box Size    Attack    ReactC    ReactH
  3588.   '( 3 3 ) '(  95  95 )     0       0       0
  3589.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  3590.        0     0      0      0       0       0
  3591.   ;;Decay Annoy    Points
  3592.       0      0       0
  3593.   "missile-lightning"
  3594.   'corpse-none
  3595.   'type-land
  3596.   'right-none
  3597.   ;; flags
  3598.   'building
  3599.   'vanishes
  3600.   ;; sounds
  3601.   #("destroyed-3x3-place-selected"
  3602.     "destroyed-3x3-place-acknowledge"
  3603.     "destroyed-3x3-place-ready"
  3604.     "destroyed-3x3-place-help"
  3605.     "destroyed-3x3-place-dead" )
  3606.   "destroyed-3x3-place-attack" )
  3607.  
  3608. (define-unit-type "unit-destroyed-4x4-place"    "4x4 Destroyed Place"
  3609.   ;; graphic data
  3610.   "unit-destroyed-2x2-place"
  3611.   '( 128 128 )            ;; graphic size
  3612.   "animations-destroyed-4x4-place"    ;; animations
  3613.   "icon-peasant"
  3614.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  3615.        0       0      3    255      0 #(    0      0       0      0 )
  3616.   ;;Tile    Box Size    Attack    ReactC    ReactH
  3617.   '( 4 4 ) '( 127 127 )     0       0       0
  3618.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  3619.        0     0      0      0       0       0
  3620.   ;;Decay Annoy    Points
  3621.       0      0       0
  3622.   "missile-lightning"
  3623.   'corpse-none
  3624.   'type-land
  3625.   'right-none
  3626.   ;; flags
  3627.   'building
  3628.   'vanishes
  3629.   ;; sounds
  3630.   #("destroyed-4x4-place-selected"
  3631.     "destroyed-4x4-place-acknowledge"
  3632.     "destroyed-4x4-place-ready"
  3633.     "destroyed-4x4-place-help"
  3634.     "destroyed-4x4-place-dead" )
  3635.   "destroyed-4x4-place-attack" )
  3636.  
  3637. (define-unit-type "unit-peasant-with-gold"    "Peasant"
  3638.   ;; graphic data
  3639.   #("peasant with gold.png"
  3640.     ()
  3641.     ()
  3642.     () )
  3643.   '(  72  72 )            ;; graphic size
  3644.   "animations-peasant-with-gold"    ;; animations
  3645.   "icon-peasant"
  3646.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  3647.       10       0      4     30      0 #(   45    400       0      0 )
  3648.   ;;Tile    Box Size    Attack    ReactC    ReactH
  3649.   '( 1 1 ) '(  31  31 )     1       6       4
  3650.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  3651.        0    50      3      2       0       0
  3652.   ;;Decay Annoy    Points
  3653.       0      0      30
  3654.   "missile-none"
  3655.   'corpse-human
  3656.   'type-land
  3657.   'right-harvest
  3658.   'can-target-land 
  3659.   ;; flags
  3660.   'land-unit
  3661.   'cower-peon
  3662.   'can-attack
  3663.   'organic
  3664.   'selectable-by-rectangle
  3665.   ;; sounds
  3666.   #("peasant-with-gold-selected"
  3667.     "peasant-with-gold-acknowledge"
  3668.     "peasant-with-gold-ready"
  3669.     "peasant-with-gold-help"
  3670.     "peasant-with-gold-dead" )
  3671.   "peasant-with-gold-attack" )
  3672.  
  3673. (define-unit-type "unit-peon-with-gold"        "Peon"
  3674.   ;; graphic data
  3675.   #("peon with gold.png"
  3676.     ()
  3677.     ()
  3678.     () )
  3679.   '(  72  72 )            ;; graphic size
  3680.   "animations-peon-with-gold"    ;; animations
  3681.   "icon-peon"
  3682.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  3683.       10       0      4     30      0 #(   45    400       0      0 )
  3684.   ;;Tile    Box Size    Attack    ReactC    ReactH
  3685.   '( 1 1 ) '(  31  31 )     1       6       4
  3686.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  3687.        0    50      3      2       0       0
  3688.   ;;Decay Annoy    Points
  3689.       0      0      30
  3690.   "missile-none"
  3691.   'corpse-orc
  3692.   'type-land
  3693.   'right-harvest
  3694.   'can-target-land 
  3695.   ;; flags
  3696.   'land-unit
  3697.   'cower-peon
  3698.   'can-attack
  3699.   'organic
  3700.   'selectable-by-rectangle
  3701.   ;; sounds
  3702.   #("peon-with-gold-selected"
  3703.     "peon-with-gold-acknowledge"
  3704.     "peon-with-gold-ready"
  3705.     "peon-with-gold-help"
  3706.     "peon-with-gold-dead" )
  3707.   "peon-with-gold-attack" )
  3708.  
  3709. (define-unit-type "unit-peasant-with-wood"    "Peasant"
  3710.   ;; graphic data
  3711.   #("peasant with wood.png"
  3712.     ()
  3713.     ()
  3714.     () )
  3715.   '(  72  72 )            ;; graphic size
  3716.   "animations-peasant-with-wood"    ;; animations
  3717.   "icon-peasant"
  3718.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  3719.       10       0      4     30      0 #(   45    400       0      0 )
  3720.   ;;Tile    Box Size    Attack    ReactC    ReactH
  3721.   '( 1 1 ) '(  31  31 )     1       6       4
  3722.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  3723.        0    50      3      2       0       0
  3724.   ;;Decay Annoy    Points
  3725.       0      0      30
  3726.   "missile-none"
  3727.   'corpse-human
  3728.   'type-land
  3729.   'right-harvest
  3730.   'can-target-land 
  3731.   ;; flags
  3732.   'land-unit
  3733.   'cower-peon
  3734.   'can-attack
  3735.   'organic
  3736.   'selectable-by-rectangle
  3737.   ;; sounds
  3738.   #("peasant-with-wood-selected"
  3739.     "peasant-with-wood-acknowledge"
  3740.     "peasant-with-wood-ready"
  3741.     "peasant-with-wood-help"
  3742.     "peasant-with-wood-dead" )
  3743.   "peasant-with-wood-attack" )
  3744.  
  3745. (define-unit-type "unit-peon-with-wood"        "Peon"
  3746.   ;; graphic data
  3747.   #("peon with wood.png"
  3748.     ()
  3749.     ()
  3750.     () )
  3751.   '(  72  72 )            ;; graphic size
  3752.   "animations-peon-with-wood"    ;; animations
  3753.   "icon-peon"
  3754.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  3755.       10       0      4     30      0 #(   45    400       0      0 )
  3756.   ;;Tile    Box Size    Attack    ReactC    ReactH
  3757.   '( 1 1 ) '(  31  31 )     1       6       4
  3758.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  3759.        0    50      3      2       0       0
  3760.   ;;Decay Annoy    Points
  3761.       0      0      30
  3762.   "missile-none"
  3763.   'corpse-orc
  3764.   'type-land
  3765.   'right-harvest
  3766.   'can-target-land 
  3767.   ;; flags
  3768.   'land-unit
  3769.   'cower-peon
  3770.   'can-attack
  3771.   'organic
  3772.   'selectable-by-rectangle
  3773.   ;; sounds
  3774.   #("peon-with-wood-selected"
  3775.     "peon-with-wood-acknowledge"
  3776.     "peon-with-wood-ready"
  3777.     "peon-with-wood-help"
  3778.     "peon-with-wood-dead" )
  3779.   "peon-with-wood-attack" )
  3780.  
  3781. (define-unit-type "unit-human-oil-tanker-full"    "Oil tanker"
  3782.   ;; graphic data
  3783.   #("human tanker (full).png"
  3784.     ()
  3785.     ()
  3786.     () )
  3787.   '(  72  72 )            ;; graphic size
  3788.   "animations-human-oil-tanker-full"    ;; animations
  3789.   "icon-human-oil-tanker"
  3790.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  3791.       10       0      4     90      0 #(   50    400     200      0 )
  3792.   ;;Tile    Box Size    Attack    ReactC    ReactH
  3793.   '( 1 1 ) '(  63  63 )     1       0       0
  3794.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  3795.       10    50      0      0       0       0
  3796.   ;;Decay Annoy    Points
  3797.       0     10      40
  3798.   "missile-none"
  3799.   'corpse-ship
  3800.   'type-naval
  3801.   'right-haul-oil
  3802.   ;; flags
  3803.   'sea-unit
  3804.   'tanker
  3805.   'selectable-by-rectangle
  3806.   ;; sounds
  3807.   #("human-oil-tanker-full-selected"
  3808.     "human-oil-tanker-full-acknowledge"
  3809.     "human-oil-tanker-full-ready"
  3810.     "human-oil-tanker-full-help"
  3811.     "human-oil-tanker-full-dead" )
  3812.   "human-oil-tanker-full-attack" )
  3813.  
  3814. (define-unit-type "unit-orc-oil-tanker-full"    "Oil tanker"
  3815.   ;; graphic data
  3816.   #("orc tanker (full).png"
  3817.     ()
  3818.     ()
  3819.     () )
  3820.   '(  72  72 )            ;; graphic size
  3821.   "animations-orc-oil-tanker-full"    ;; animations
  3822.   "icon-orc-oil-tanker"
  3823.   ;;Speed OvFrame SightR Hitpnt Magic  BTime    Gold    Wood    Oil
  3824.       10       0      4     90      0 #(   50    400     200      0 )
  3825.   ;;Tile    Box Size    Attack    ReactC    ReactH
  3826.   '( 1 1 ) '(  63  63 )     1       0       0
  3827.   ;;Armor Prior    Damage    Pierc    WUpgr    AUpgr
  3828.       10    50      0      0       0       0
  3829.   ;;Decay Annoy    Points
  3830.       0     10      40
  3831.   "missile-none"
  3832.   'corpse-ship
  3833.   'type-naval
  3834.   'right-haul-oil
  3835.   ;; flags
  3836.   'sea-unit
  3837.   'tanker
  3838.   'selectable-by-rectangle
  3839.   ;; sounds
  3840.   #("orc-oil-tanker-full-selected"
  3841.     "orc-oil-tanker-full-acknowledge"
  3842.     "orc-oil-tanker-full-ready"
  3843.     "orc-oil-tanker-full-help"
  3844.     "orc-oil-tanker-full-dead" )
  3845.   "orc-oil-tanker-full-attack" )
  3846.  
  3847. ;;; EOF
  3848.