units.ccl

魔兽2Linux版

;;   ___________		     _________		      _____  __
;;   \_	  _____/______   ____   ____ \_   ___ \____________ _/ ____\/  |_
;;    |    __) \_  __ \_/ __ \_/ __ \/    \  \/\_  __ \__  \\   __\\   __|
;;    |     \   |  | \/\  ___/\  ___/\     \____|  | \// __ \|  |   |  |
;;    \___  /   |__|    \___  >\___  >\______  /|__|  (____  /__|   |__|
;;	  \/		    \/	   \/	     \/		   \/
;;  ______________________                           ______________________
;;			  T H E   W A R   B E G I N S
;;	   FreeCraft - A free fantasy real time strategy game engine
;;
;;	units.ccl	-	Define the used orc unit-types.
;;
;;	(c) Copyright 2001,2002 by Lutz Sammer
;;
;;	FreeCraft is free software; you can redistribute it and/or modify
;;	it under the terms of the GNU General Public License as published
;;	by the Free Software Foundation; only version 2 of the License.
;;
;;	FreeCraft is distributed in the hope that it will be useful,
;;	but WITHOUT ANY WARRANTY; without even the implied warranty of
;;	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
;;	GNU General Public License for more details.
;;
;;	$Id: units.ccl,v 1.17 2002/12/17 06:40:32 nehalmistry Exp $

;;=============================================================================
;;	Define unit-types.
;;
(define-unit-type 'unit-grunt 'name "Grunt"
  'files '(tileset-summer "orc/units/grunt.png")
  'size '(72 72)
  'animations 'animations-footman 'icon 'icon-grunt
  'costs '(time 60 gold 600)
  'speed 10
  'hit-points 60
  'tile-size '(1 1) 'box-size '(31 31)
  'sight-range 4 'computer-reaction-range 6 'person-reaction-range 4
  'armor 2 'basic-damage 6 'piercing-damage 3 'missile 'missile-none
  'max-attack-range 1
  'weapons-upgradable 1 'armor-upgradable 1
  'priority 60
  'points 50
  'demand 1
  'corpse '(unit-dead-body 0)
  'type-land
  'right-attack
  'can-attack
  'can-target-land
  'land-unit
  'organic
  'selectable-by-rectangle
  'sounds '(
    selected "grunt-selected"
    acknowledge "grunt-acknowledge"
    ready "grunt-ready"
    help "basic orc voices help 1"
    dead "basic orc voices dead"
    attack "grunt-attack"))

(define-unit-type 'unit-peon 'name "Peon"
  'files '(tileset-summer "orc/units/peon.png")
  'size '(72 72)
  'animations 'animations-peasant 'icon 'icon-peon
  'costs '(time 45 gold 400)
  'speed 10
  'hit-points 30
  'tile-size '(1 1) 'box-size '(31 31)
  'sight-range 4 'computer-reaction-range 6 'person-reaction-range 4
  'basic-damage 3 'piercing-damage 2 'missile 'missile-none
  'max-attack-range 1
  'priority 50
  'points 30
  'demand 1
  'corpse '(unit-dead-body 0)
  'type-land
  'right-harvest
  'can-attack
  'can-target-land
  'land-unit
  'cower-worker
  'organic
  'selectable-by-rectangle
  'sounds '(
    selected "peon-selected"
    acknowledge "peon-acknowledge"
    ready "peon-ready"
    help "basic orc voices help 1"
    dead "basic orc voices dead"
    attack "peon-attack"))

(define-unit-type 'unit-catapult 'name "Catapult"
  'files '(tileset-summer "orc/units/catapult.png")
  'size '(64 64)
  'animations 'animations-catapult 'icon 'icon-catapult
  'costs '(time 250 gold 900 wood 300)
  'speed 5
  'hit-points 110
  'tile-size '(1 1) 'box-size '(63 63)
  'sight-range 9 'computer-reaction-range 11 'person-reaction-range 9
  'basic-damage 80 'piercing-damage 0 'missile 'missile-catapult-rock
  'min-attack-range 1 'max-attack-range 8
  'weapons-upgradable 1
  'priority 70
  'points 100
  'demand 1
  'explode-when-killed
  'type-land
  'right-attack
  'can-ground-attack
  'can-attack
  'can-target-land 'can-target-sea
  'selectable-by-rectangle
  'sounds '(
    selected "catapult-selected"
    acknowledge "catapult-acknowledge"
    ready "catapult-ready"
    help "basic orc voices help 1"
    dead "explosion"
    attack "catapult-attack"))

(define-unit-type 'unit-ogre 'name "Ogre"
  'files '(tileset-summer "orc/units/ogre.png")
  'size '(72 72)
  'animations 'animations-ogre 'icon 'icon-ogre
  'costs '(time 90 gold 800 wood 100)
  'speed 13
  'hit-points 90
  'tile-size '(1 1) 'box-size '(42 42)
  'sight-range 4 'computer-reaction-range 6 'person-reaction-range 4
  'armor 4 'basic-damage 8 'piercing-damage 4 'missile 'missile-none
  'max-attack-range 1
  'weapons-upgradable 1 'armor-upgradable 1
  'priority 63
  'points 100
  'demand 1
  'corpse '(unit-dead-body 0)
  'type-land
  'right-attack
  'can-attack
  'can-target-land
  'land-unit
  'organic
  'selectable-by-rectangle
  'sounds '(
    selected "ogre-selected"
    acknowledge "ogre-acknowledge"
    ready "ogre-ready"
    help "basic orc voices help 1"
    dead "basic orc voices dead"
    attack "ogre-attack"))

(define-unit-type 'unit-axethrower 'name "Troll Axethrower"
  'files '(tileset-summer "orc/units/troll axethrower.png")
  'size '(72 72)
  'animations 'animations-axethrower 'icon 'icon-axethrower
  'costs '(time 70 gold 500 wood 50)
  'speed 10
  'hit-points 40
  'tile-size '(1 1) 'box-size '(36 36)
  'sight-range 5 'computer-reaction-range 7 'person-reaction-range 5
  'basic-damage 3 'piercing-damage 6 'missile 'missile-axe
  'max-attack-range 4
  'weapons-upgradable 1
  'priority 55
  'points 60
  'demand 1
  'corpse '(unit-dead-body 0)
  'type-land
  'right-attack
  'can-attack
  'can-target-land 'can-target-sea 'can-target-air
  'land-unit
  'organic
  'selectable-by-rectangle
  'sounds '(
    selected "axethrower-selected"
    acknowledge "axethrower-acknowledge"
    ready "axethrower-ready"
    help "basic orc voices help 1"
    dead "basic orc voices dead"
    attack "axethrower-attack"))

(define-unit-type 'unit-death-knight 'name "Death Knight"
  'files '(tileset-summer "orc/units/death knight.png")
  'size '(72 72)
  'animations 'animations-death-knight 'icon 'icon-death-knight
  'costs '(time 120 gold 1200)
  'speed 8
  'hit-points 60
  'max-mana 255
  'magic 1
  'tile-size '(1 1) 'box-size '(39 39)
  'sight-range 9 'computer-reaction-range 11 'person-reaction-range 9
  'basic-damage 0 'piercing-damage 9 'missile 'missile-touch-of-death
  'max-attack-range 3
  'priority 70
  'points 100
  'demand 1
  'type-land
  'right-attack
  'can-attack
  'can-target-land 'can-target-sea 'can-target-air
  'land-unit
  'cower-mage
  'isundead
  'can-cast-spell
  'organic
  'selectable-by-rectangle
  'sounds '(
    selected "death-knight-selected"
    acknowledge "death-knight-acknowledge"
    ready "death-knight-ready"
    help "basic orc voices help 1"
    dead "basic orc voices dead"
    attack "death-knight-attack"))

(define-unit-type 'unit-ogre-mage 'name "Ogre Mage"
  'use 'unit-ogre
  'size '(72 72)
  'animations 'animations-ogre 'icon 'icon-ogre-mage
  'costs '(time 90 gold 800 wood 100)
  'speed 13
  'hit-points 90
  'max-mana 255
  'tile-size '(1 1) 'box-size '(42 42)
  'sight-range 5 'computer-reaction-range 7 'person-reaction-range 5
  'armor 4 'basic-damage 8 'piercing-damage 4 'missile 'missile-none
  'max-attack-range 1
  'weapons-upgradable 1 'armor-upgradable 1
  'priority 65
  'points 110
  'demand 1
  'corpse '(unit-dead-body 0)
  'type-land
  'right-attack
  'can-attack
  'can-target-land
  'land-unit
  'can-cast-spell
  'organic
  'selectable-by-rectangle
  'sounds '(
    selected "ogre-mage-selected"
    acknowledge "ogre-mage-acknowledge"
    ready "ogre-mage-ready"
    help "basic orc voices help 1"
    dead "basic orc voices dead"
    attack "ogre-mage-attack"))

(define-unit-type 'unit-goblin-sappers 'name "Goblin Sappers"
  'files '(tileset-summer "orc/units/goblin sappers.png")
  'size '(56 56)
  'animations 'animations-goblin-sappers 'icon 'icon-goblin-sappers
  'costs '(time 200 gold 700 wood 250)
  'speed 11
  'hit-points 40
  'tile-size '(1 1) 'box-size '(37 37)
  'sight-range 4 'computer-reaction-range 4 'person-reaction-range 2
  'basic-damage 4 'piercing-damage 2 'missile 'missile-none
  'max-attack-range 1
  'weapons-upgradable 1
  'priority 55
  'points 100
  'demand 1
  'type-land
  'right-demolish
  'can-attack
  'can-target-land
  'land-unit
  'volatile
  'organic
  'selectable-by-rectangle
  'sounds '(
    selected "goblin-sappers-selected"
    acknowledge "goblin-sappers-acknowledge"
    ready "goblin-sappers-ready"
    help "basic orc voices help 1"
    dead "explosion"
    attack "goblin-sappers-attack"))

(define-unit-type 'unit-attack-peon 'name "Peon"
  'use 'unit-peon
  'size '(72 72)
  'animations 'animations-peasant 'icon 'icon-peon
  'costs '(time 45 gold 400)
  'speed 10
  'hit-points 30
  'tile-size '(1 1) 'box-size '(31 31)
  'sight-range 4 'computer-reaction-range 6 'person-reaction-range 4
  'basic-damage 3 'piercing-damage 2 'missile 'missile-none
  'max-attack-range 1
  'priority 50
  'points 30
  'demand 1
  'corpse '(unit-dead-body 0)
  'type-land
  'right-attack
  'can-attack
  'can-target-land
  'land-unit
  'organic
  'selectable-by-rectangle
  'sounds '(
    selected "peon-selected"
    acknowledge "peon-acknowledge"
    ready "peon-ready"
    help "basic orc voices help 1"
    dead "basic orc voices dead"
    attack "peon-attack"))

(define-unit-type 'unit-berserker 'name "Berserker"
  'use 'unit-axethrower
  'size '(72 72)
  'animations 'animations-axethrower 'icon 'icon-berserker
  'costs '(time 70 gold 500 wood 50)
  'speed 10
  'hit-points 50
  'tile-size '(1 1) 'box-size '(36 36)
  'sight-range 6 'computer-reaction-range 9 'person-reaction-range 6
  'basic-damage 3 'piercing-damage 6 'missile 'missile-axe
  'max-attack-range 4
  'weapons-upgradable 1
  'priority 57
  'points 70
  'demand 1
  'corpse '(unit-dead-body 0)
  'type-land
  'right-attack
  'can-attack
  'can-target-land 'can-target-sea 'can-target-air
  'land-unit
  'organic
  'selectable-by-rectangle
  'sounds '(
    selected "berserker-selected"
    acknowledge "berserker-acknowledge"
    ready "berserker-ready"
    help "basic orc voices help 1"
    dead "basic orc voices dead"
    attack "berserker-attack"))

(define-unit-type 'unit-teron-gorefiend 'name "Teron Gorefiend"
  'use 'unit-death-knight
  'size '(72 72)
  'animations 'animations-death-knight 'icon 'icon-teron-gorefiend
  'costs '(time 120 gold 1200)
  'speed 8
  'hit-points 180
  'max-mana 255
  'magic 1
  'tile-size '(1 1) 'box-size '(39 39)
  'sight-range 9 'computer-reaction-range 11 'person-reaction-range 9
  'armor 2 'basic-damage 0 'piercing-damage 16 'missile 'missile-touch-of-death
  'max-attack-range 4
  'priority 70
  'points 100
  'demand 1
  'corpse '(unit-dead-body 0)
  'type-land
  'right-attack
  'can-attack
  'can-target-land 'can-target-sea 'can-target-air
  'land-unit
  'cower-mage
  'isundead
  'can-cast-spell
  'organic
  'selectable-by-rectangle
  'sounds '(
    selected "teron-gorefiend-selected"
    acknowledge "teron-gorefiend-acknowledge"
    ready "teron-gorefiend-ready"
    help "basic orc voices help 1"
    dead "basic orc voices dead"
    attack "teron-gorefiend-attack"))

(define-unit-type 'unit-dentarg 'name "Dentarg"
  'use 'unit-ogre
  'size '(72 72)
  'animations 'animations-ogre 'icon 'icon-dentarg
  'costs '(time 90 gold 800 wood 100)