UtBS: added new random_traits code

This commit is contained in:
Asa Swain 2006-06-08 15:31:29 +00:00
parent 4768dddbbb
commit 26d0e4eab4

View file

@ -50,50 +50,19 @@ multiply=-1
[/unit]
#enddef
# create a unit with full upkeep and traits
# create a unit with full upkeep and random traits
#define UNIT_T TYPE DESC SIDE X Y
{RANDOM_TRAIT_UNIT ({TYPE}) ({DESC}) ({SIDE}) ({X}) ({Y})}
#enddef
# MACROS to implement random traits
# creates one unit with full upkeep and 2 random traits
#define RANDOM_TRAIT_UNIT TYPE DESC SIDE X Y
{RANDOM 1..6}
{TRAIT_IF 1 (quick,resilient) ({TRAIT_QUICK}) ({TRAIT_RESILIENT}) ({TYPE}) ({DESC}) ({SIDE}) ({X}) ({Y})}
{TRAIT_IF 2 (strong,resilient) ({TRAIT_STRONG}) ({TRAIT_RESILIENT}) ({TYPE}) ({DESC}) ({SIDE}) ({X}) ({Y})}
{TRAIT_IF 3 (intelligent,resilient) ({TRAIT_INTELLIGENT}) ({TRAIT_RESILIENT}) ({TYPE}) ({DESC}) ({SIDE}) ({X}) ({Y})}
{TRAIT_IF 4 (strong,quick) ({TRAIT_STRONG}) ({TRAIT_QUICK}) ({TYPE}) ({DESC}) ({SIDE}) ({X}) ({Y})}
{TRAIT_IF 5 (strong,intelligent) ({TRAIT_STRONG}) ({TRAIT_INTELLIGENT}) ({TYPE}) ({DESC}) ({SIDE}) ({X}) ({Y})}
{TRAIT_IF 6 (quick,intelligent) ({TRAIT_QUICK}) ({TRAIT_INTELLIGENT}) ({TYPE}) ({DESC}) ({SIDE}) ({X}) ({Y})}
#enddef
#define TRAIT_IF NUMBER TRAITDESC TRAIT1 TRAIT2 TYPE DESC SIDE X Y
[if]
[variable]
name=random
equals={NUMBER}
[/variable]
[then]
[unit]
side={SIDE}
type={TYPE}
description={DESC}
user_description= _ "{DESC}"
upkeep=full
x={X}
y={Y}
[modifications]
{TRAIT1}
{TRAIT2}
[/modifications]
[/unit]
[/then]
[/if]
[unit]
side={SIDE}
type={TYPE}
description={DESC}
user_description= _ "{DESC}"
upkeep=full
x={X}
y={Y}
random_traits="yes"
[/unit]
#enddef