home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 5 / Apprentice-Release5.iso / Source Code / C / Games / Xconq 7.1.0 / src / xconq-7.1.0 / kernel / unit.h < prev    next >
Encoding:
C/C++ Source or Header  |  1996-07-07  |  25.9 KB  |  636 lines  |  [TEXT/R*ch]
  1. /* Definitions relating to units in Xconq.
  2.    Copyright (C) 1987, 1988, 1989, 1991, 1992, 1993, 1994, 1995
  3.    Stanley T. Shebs.
  4.  
  5. Xconq is free software; you can redistribute it and/or modify
  6. it under the terms of the GNU General Public License as published by
  7. the Free Software Foundation; either version 2, or (at your option)
  8. any later version.  See the file COPYING.  */
  9.  
  10. /* The unit structure should be small, because there may be many of them.
  11.    Unit semantics go in this structure, while unit brains go into the
  12.    act/plan.  Test: a unit that is like a rock and can't do anything at all
  13.    just needs basic slots, plan needn't be allocated.  Another test:
  14.    unit should still function correctly after its current plan has been
  15.    destroyed and replaced with another. */
  16.  
  17. typedef struct a_unit {
  18.     short type;            /* type */
  19.     short id;              /* truly unique id number */
  20.     char *name;            /* the name, if given */
  21.     int number;            /* semi-unique number */
  22.     short x, y, z;             /* position of unit in world */
  23.     struct a_side *side;    /* whose side this unit is on */
  24.     struct a_side *origside;    /* the first side this unit was on */
  25.     short hp;            /* how much more damage each part can take */
  26.     short hp2;             /* buffer for next value of hp */
  27.     short cp;              /* state of construction */
  28.     short cxp;             /* combat experience */
  29.     short morale;        /* morale */
  30.     struct a_unit *transport;    /* pointer to transporting unit if any */
  31.     SideMask spotted;        /* which sides always see us (bit vector) */
  32.     short *supply;        /* how much supply we're carrying */
  33.     short *tooling;            /* level of preparation for construction */
  34.     short *opinions;        /* opinion of each side, own side and others */
  35.     struct a_actorstate *act;    /* the unit's current actor state */
  36.     struct a_plan *plan;    /* the unit's current plan */
  37.     struct a_unit_extras *extras;  /* pointer to optional stuff */
  38.     char *aihook;        /* used by AI to keep info about this unit */
  39.     char *uihook;        /* used by interfaces for their own purposes */
  40.     /* Following slots are never saved. */
  41.     struct a_unit *occupant;    /* pointer to first unit being carried */
  42.     struct a_unit *nexthere;    /* pointer to fellow occupant */
  43.     struct a_unit *prev;    /* previous unit in list of side's units */
  44.     struct a_unit *next;    /* next unit in list of side's units */
  45.     struct a_unit *unext;    /* next unit in list of all units */
  46.     short prevx, prevy;        /* where were we last */
  47.     short flags;        /* assorted flags */
  48. } Unit;
  49.  
  50. /* The unit extras structure stores properties that are (usually)
  51.    uncommon or special-purpose.  It is allocated as needed, access
  52.    is through macros, and this does not appear as a separate
  53.    structure when saving/restoring.  If a value is likely to be
  54.    filled in for most or all units in several different game designs,
  55.    then it should be in the main structure (even at the cost of extra
  56.    space), rather than here. */
  57.  
  58. typedef struct a_unit_extras {
  59.     short point_value;        /* individual point value for this unit */
  60.     short appear;        /* turn of appearance in game */
  61.     short appearx, appeary;    /* variation around appearance location */
  62.     short disappear;        /* turn of disappearance from game */
  63.     Obj *hook;             /* placeholder for more optional stuff */
  64. } UnitExtras;
  65.  
  66. /* Some convenient macros. */
  67.  
  68. /* Since it is possible for a unit to change sides and therefore
  69.    prev/next pointers while iterating using the macros below, one
  70.    must be very careful either that unit sides can't change during
  71.    the loop, or else to maintain a temp var that can be used to
  72.    repair the iteration.  This also applies to units dying. */
  73.  
  74. /* Iteration over all units. */
  75. /* Careful with this one, can run afoul of precedence rules since no
  76.    brace to enclose the outer loop. */
  77.  
  78. #define for_all_units(v)  \
  79.     for (v = unitlist; v != NULL; v = v->unext)
  80.  
  81. /* Iteration over all units on a given side. */
  82.  
  83. #define for_all_side_units(s,v) \
  84.     for (v = (s)->unithead->next; v != (s)->unithead; v = v->next)
  85.  
  86. /* Iteration over all occupants of a unit (but not sub-occupants). */
  87.  
  88. #define for_all_occupants(u1,v) \
  89.   for (v = (u1)->occupant; v != NULL; v = v->nexthere)
  90.  
  91. #define is_unit(unit) ((unit) != NULL && is_unit_type((unit)->type))
  92.  
  93. #define alive(unit) ((unit)->hp > 0)
  94.  
  95. #define indep(unit) ((unit)->side == NULL || (unit)->side == indepside)
  96.  
  97. #define completed(unit) \
  98.   ((unit)->cp >= completenesses[(unit)->type])
  99. /*  ((unit)->cp >= (u_cp((unit)->type) / u_parts((unit)->type))) */
  100.  
  101. #define fullsized(unit) \
  102.   ((unit)->cp >= u_cp((unit)->type))
  103.  
  104. /* Extractor for the actual altitude of an airborne unit. */
  105.  
  106. #define unit_alt(unit) ((unit)->z & 1 == 0 ? ((unit)->z >> 1) : 0)
  107.  
  108. /* Extractor for the connection a unit is on. */
  109.  
  110. #define unit_conn(unit) ((unit)->z & 1 == 1 ? ((unit)->z >> 1) : NONTTYPE)
  111.  
  112. /* This is true if the unit is on the board somewhere. */
  113.  
  114. #define is_present(unit) in_play(unit)
  115.  
  116. #define in_play(unit) \
  117.   (is_unit(unit) && alive(unit) && inside_area((unit)->x, (unit)->y))
  118.  
  119. #define in_action(unit) is_active(unit)
  120.  
  121. #define is_acting(unit) is_active(unit)
  122.  
  123. #define is_active(unit) (in_play(unit) && completed(unit))
  124.  
  125. /* (could use bit fields in struct I suppose...) */
  126.  
  127. #define DETONATE_FLAG_BIT 0
  128.  
  129. #define was_detonated(unit) \
  130.   ((unit)->flags & (1 << DETONATE_FLAG_BIT))
  131.  
  132. #define set_was_detonated(unit,val) \
  133.   ((unit)->flags = \
  134.     (((unit)->flags & ~(1 << DETONATE_FLAG_BIT)) \
  135.      | (((val) ? 1 : 0) << DETONATE_FLAG_BIT)))
  136.  
  137. /* Extractions for the two parts of an attitude/feeling. */
  138.  
  139. #define intensity(att) (((att) >> 8) & 0xff)
  140.  
  141. #define bias(att) (((att) & 0xff) - 128)
  142.  
  143. #define unit_point_value(unit) ((unit)->extras ? (unit)->extras->point_value : -1)
  144.  
  145. #define unit_appear_turn(unit) ((unit)->extras ? (unit)->extras->appear : -1)
  146.  
  147. #define unit_appear_x(unit) ((unit)->extras ? (unit)->extras->appearx : -1)
  148.  
  149. #define unit_appear_y(unit) ((unit)->extras ? (unit)->extras->appeary : -1)
  150.  
  151. #define unit_disappear_turn(unit) ((unit)->extras ? (unit)->extras->disappear : -1)
  152.  
  153. /* We test the hook for NULL, because lispnil is not NULL and we can't
  154.    count on the hook being initialized when extras are allocated. */
  155.  
  156. #define unit_hook(unit)  \
  157.   (((unit)->extras && (unit)->extras->hook) ? (unit)->extras->hook : lispnil)
  158.  
  159. /* A sortable vector of units, generally useful. */
  160.  
  161. /* The kinds of sort keys available for list windows. */
  162.  
  163. enum sortkeys {
  164.     bynothing,
  165.     bytype,
  166.     byname,
  167.     byactorder,
  168.     bylocation,
  169.     byside,
  170.     numsortkeytypes
  171. };
  172.  
  173. /* Can sort on as many as five keys. */
  174.  
  175. #define MAXSORTKEYS 5
  176.  
  177. typedef struct a_unitvectorentry {
  178.     Unit *unit;
  179.     int flag;
  180. } UnitVectorEntry;
  181.  
  182. typedef struct a_unitvector {
  183.     int size;
  184.     int numunits;
  185.     enum sortkeys sortkeys[MAXSORTKEYS];
  186.     UnitVectorEntry units[1];
  187. } UnitVector;
  188.  
  189. /* Types of primitive unit actions. */
  190.  
  191. typedef enum actiontype {
  192.  
  193. #undef  DEF_ACTION
  194. #define DEF_ACTION(name,CODE,args,prepfn,dofn,checkfn,argdecl,doc) CODE,
  195.  
  196. #include "action.def"
  197.  
  198.     NUMACTIONTYPES
  199.  
  200. } ActionType;
  201.  
  202. typedef struct a_actiondefn {
  203.     ActionType typecode;
  204.     char *name;
  205.     char *argtypes;
  206. #ifdef THINK_C
  207.     int (*dofn) PARAMS ((Unit *unit, Unit *unit2, ...));
  208.     int (*checkfn) PARAMS ((Unit *unit, Unit *unit2, ...));
  209. #else
  210.     int (*dofn) PARAMS (());
  211.     int (*checkfn) PARAMS (());
  212. #endif
  213. } ActionDefn;
  214.  
  215. #define MAXACTIONARGS 4
  216.  
  217. typedef struct a_action {
  218.     ActionType type;        /* the type of the action */
  219.     short args[MAXACTIONARGS];    /* assorted parameters */
  220.     short actee;        /* the unit being affected by action */
  221.     struct a_action *next;    /* chain to next action */
  222. } Action;
  223.  
  224. typedef struct a_actorstate {
  225.     short initacp;        /* how much we can still do */
  226.     short acp;            /* how much we can still do */
  227.     short actualactions;    /* actions actually done this turn */
  228.     short actualmoves;        /* cells actually covered this turn */
  229.     Action nextaction;
  230. } ActorState;
  231.  
  232. #define valid(x) ((x) == A_ANY_OK)
  233.  
  234. #define has_pending_action(unit)  \
  235.   ((unit)->act && (unit)->act->nextaction.type != ACTION_NONE)
  236.  
  237. /* All the definitions that govern planning. */
  238.  
  239. /* A goal is a predicate object that can be tested to see whether it has
  240.    been achieved.  As such, it is a relatively static object and may be
  241.    shared. */
  242.  
  243. /* The different types of goals. */
  244.  
  245. typedef enum goaltype {
  246.  
  247. #undef  DEF_GOAL
  248. #define DEF_GOAL(name,GOALTYPE,args) GOALTYPE,
  249.  
  250. #include "goal.def"
  251.  
  252.     g_t_dummy
  253. } GoalType;
  254.  
  255. typedef struct a_goaldefn {
  256.     char *name;
  257.     char *argtypes;
  258. } GoalDefn;
  259.  
  260. /* The goal structure proper. */
  261.  
  262. #define MAXGOALARGS 5
  263.  
  264. typedef struct a_goal {
  265.     GoalType type;
  266.     short tf;
  267.     Side *side;
  268.     short args[MAXGOALARGS];
  269. } Goal;
  270.  
  271. extern Goal *create_goal PARAMS ((GoalType type, Side *side, int tf));
  272. extern int cell_unknown PARAMS ((int x, int y));
  273. extern int enemies_present PARAMS ((int x, int y));
  274. extern int goal_truth PARAMS ((Side *side, Goal *goal));
  275. extern char *goal_desig PARAMS ((Goal *goal));
  276.  
  277. /* A task is a single executable element of a unit's plan.  Each task type
  278.    is something that has been found useful or convenient to encapsulate as
  279.    a step in a plan. */
  280.  
  281. typedef enum a_tasktype {
  282.  
  283. #undef  DEF_TASK
  284. #define DEF_TASK(name,CODE,argtypes,fn) CODE,
  285.  
  286. #include "task.def"
  287.  
  288.     NUMTASKTYPES
  289. } TaskType;
  290.  
  291. typedef enum a_taskoutcome {
  292.   TASK_UNKNOWN,
  293.   TASK_FAILED,
  294.   TASK_IS_INCOMPLETE,
  295.   TASK_PREPPED_ACTION,
  296.   TASK_IS_COMPLETE
  297. } TaskOutcome;
  298.  
  299. #define MAXTASKARGS 6
  300.  
  301. typedef struct a_task {
  302.     TaskType type;        /* the kind of task we want to do */
  303.     short args[MAXTASKARGS];    /* arguments */
  304.     short execnum;        /* how many times this has been done */
  305.     short retrynum;        /* number of immed failures so far */
  306.     struct a_task *next;    /* the next task to undertake */
  307. } Task;
  308.  
  309. typedef struct a_taskdefn {
  310.     char *name;
  311.     char *argtypes;
  312.     TaskOutcome (*exec) PARAMS ((Unit *unit, Task *task));
  313. } TaskDefn;
  314.  
  315. /* A plan is what a single unit uses to make decisions, both for itself and
  316.    for any other units it commands.  Any unit that can act at all has a
  317.    plan object.  A plan collects lots of unit behavior, but its most
  318.    important structure is the task queue, which contains a list of what
  319.    to do next, in order. */
  320.  
  321. /* Plan types distinguish several kinds of usages. */
  322.  
  323. typedef enum plantype {
  324.  
  325. #undef  DEF_PLAN
  326. #define DEF_PLAN(name,CODE) CODE,
  327.  
  328. #include "plan.def"
  329.  
  330.     NUMPLANTYPES
  331. } PlanType;
  332.  
  333. typedef struct a_plan {
  334.     PlanType type;        /* general type of plan that we've got here */
  335.     short creation_turn;    /* turn at which this plan was created */
  336.     short initial_turn;        /* turn at which this plan is to be done */
  337.     short final_turn;        /* turn to deactivate this plan */
  338.     short asleep;        /* true if the unit is doing nothing */
  339.     short reserve;        /* true if unit waiting until next turn */
  340.     short delayed;
  341.     short waitingfortasks;    /* true if waiting to be given a task */
  342.     short aicontrol;        /* true if an AI can operate on the unit */
  343.     short supply_alarm;
  344.     short supply_is_low;
  345.     short waitingfortransport;
  346.     struct a_goal *maingoal;    /* the main goal of this plan */
  347.     struct a_goal *formation;    /* goal to keep in a formation */
  348.     struct a_task *tasks;    /* pointer to chain of sequential tasks */
  349.     /* Not saved/restored. (little value, some trouble to do) */
  350.     struct a_unit *funit;    /* pointer to unit keeping formation */
  351.     Action lastaction;         /* a copy of the last action attempted */
  352.     short lastresult;        /* that action's outcome */
  353.     short execs_this_turn;
  354. } Plan;
  355.  
  356. #define for_all_tasks(plan,task)  \
  357.   for (task = (plan)->tasks; task != NULL; task = task->next)
  358.  
  359. /* Global unit variables. */
  360.  
  361. extern Unit *unitlist;
  362. extern Unit *tmpunit;
  363.  
  364. extern int numunits;
  365. extern int numliveunits;
  366.  
  367. extern short *completenesses;
  368.  
  369. extern enum sortkeys tmpsortkeys[];
  370.  
  371. extern ActionDefn actiondefns[];
  372.  
  373. extern GoalDefn goaldefns[];
  374.  
  375. extern TaskDefn taskdefns[];
  376.  
  377. extern char *plantypenames[];
  378.  
  379. /* Declarations of unit-related functions. */
  380.  
  381. extern void init_units PARAMS ((void));
  382. extern Unit *create_bare_unit PARAMS ((int type));
  383. extern Unit *create_unit PARAMS ((int type, int makebrains));
  384. extern void init_unit_actorstate PARAMS ((Unit *unit, int flagacp));
  385. extern void init_unit_plan PARAMS ((Unit *unit));
  386. extern void init_unit_tooling PARAMS ((Unit *unit));
  387. extern void init_unit_opinions PARAMS ((Unit *unit, int nsides));
  388. extern void init_unit_extras PARAMS ((Unit *unit));
  389. extern void change_unit_type PARAMS ((Unit *unit, int newtype, int reason));
  390. extern int max_builds PARAMS ((int u));
  391. extern int enter_cell PARAMS ((Unit *unit, int x, int y));
  392. extern int can_occupy_cell PARAMS ((Unit *unit, int x, int y));
  393. extern int type_can_occupy_cell PARAMS ((int u, int x, int y));
  394. extern int can_occupy_cell_without PARAMS ((Unit *unit, int x, int y, Unit *unit3));
  395. extern int type_can_occupy_cell_without PARAMS ((int u, int x, int y, Unit *unit3));
  396. extern void enter_cell_aux PARAMS ((Unit *unit, int x, int y));
  397. extern int can_occupy PARAMS ((Unit *unit, Unit *transport));
  398. extern int can_carry PARAMS ((Unit *transport, Unit *unit));
  399. extern int type_can_occupy PARAMS ((int u, Unit *transport));
  400. extern int can_occupy_type PARAMS ((Unit *unit, int u2));
  401. extern int can_carry_type PARAMS ((Unit *transport, int u));
  402. extern void enter_transport PARAMS ((Unit *unit, Unit *transport));
  403. extern void leave_cell PARAMS ((Unit *unit));
  404. extern void leave_cell_aux PARAMS ((Unit *unit));
  405. extern void leave_transport PARAMS ((Unit *unit));
  406. extern void eject_excess_occupants PARAMS ((Unit *unit));
  407. extern void eject_occupant PARAMS ((Unit *unit, Unit *occ));
  408. extern void change_unit_side PARAMS ((Unit *unit, Side *newside, int reason, Unit *agent));
  409. extern int unit_allowed_on_side PARAMS ((Unit *unit, Side *side));
  410. extern int test_class_membership PARAMS ((Obj *leaf));
  411. extern int type_allowed_on_side PARAMS ((int u, Side *side));
  412. extern int unit_trusts_unit PARAMS ((Unit *unit1, Unit *unit2));
  413. extern int set_unit_side PARAMS ((Unit *unit, Side *side));
  414. extern int set_unit_origside PARAMS ((Unit *unit, Side *side));
  415. extern void set_unit_plan_type PARAMS ((Side *side, Unit *unit, int type));
  416. extern void set_unit_asleep PARAMS ((Side *side, Unit *unit, int flag, int recurse));
  417. extern void set_unit_reserve PARAMS ((Side *side, Unit *unit, int flag, int recurse));
  418. extern void set_unit_ai_control PARAMS ((Side *side, Unit *unit, int flag, int recurse));
  419. extern void set_unit_name PARAMS ((Side *side, Unit *unit, char *newname));
  420. extern int disband_unit PARAMS ((Side *side, Unit *unit));
  421. extern void kill_unit PARAMS ((Unit *unit, int reason));
  422. extern void kill_unit_aux PARAMS ((Unit *unit, int reason));
  423. extern void dispose_of_plan PARAMS ((Unit *unit));
  424. extern void flush_dead_units PARAMS ((void));
  425. extern void sort_units PARAMS ((void));
  426. extern int moves_till_low_supplies PARAMS ((Unit *unit));
  427. extern char *unit_desig PARAMS ((Unit *unit));
  428. extern char *unit_desig_no_loc PARAMS ((Unit *unit));
  429. extern char *utype_name_n PARAMS ((int u, int n));
  430. extern char *shortest_unique_name PARAMS ((int u));
  431. extern char *actorstate_desig PARAMS ((struct a_actorstate *as));
  432. extern Unit *find_unit PARAMS ((int n));
  433. extern Unit *find_unit_by_name PARAMS ((char *nm));
  434. extern Unit *find_unit_by_number PARAMS ((int nb));
  435. extern Unit *find_unit_dead_or_alive PARAMS ((int n));
  436. extern int find_unit_name PARAMS ((char *str));
  437. extern Unit *first_unit PARAMS ((Side *side));
  438. extern void insert_unit PARAMS ((Unit *unithead, Unit *unit));
  439. extern void delete_unit PARAMS ((Unit *unit));
  440. extern int num_occupants PARAMS ((Unit *unit));
  441. extern int num_units_at PARAMS ((int x, int y));
  442. extern void check_all_units PARAMS ((void));
  443. extern void check_unit PARAMS ((Unit *unit));
  444. extern UnitVector *make_unit_vector PARAMS ((int initsize));
  445. extern void clear_unit_vector PARAMS ((UnitVector *vec));
  446. extern UnitVector *add_unit_to_vector PARAMS ((UnitVector *vec, Unit *unit, int flag));
  447. extern void remove_unit_from_vector PARAMS ((UnitVector *vec, Unit *unit, int pos));
  448. extern void sort_unit_vector PARAMS ((UnitVector *vec));
  449. extern Obj *get_x_property PARAMS ((Unit *unit, int subkey));
  450. extern Obj *get_x_property_by_name PARAMS ((Unit *unit, char *str));
  451.  
  452. extern int disband_unit_directly PARAMS ((Side *side, Unit *unit));
  453.  
  454. #ifdef DESIGNERS
  455. extern Unit *designer_create_unit PARAMS ((Side *side, int u, int s, int x, int y));
  456. extern int designer_teleport PARAMS ((Unit *unit, int x, int y, Unit *other));
  457. extern int designer_change_side PARAMS ((Unit *unit, Side *side));
  458. extern int designer_disband PARAMS ((Unit *unit));
  459. #endif /* DESIGNERS */
  460.  
  461. /* Declarations of plan-related functions. */
  462.  
  463. extern void execute_plan PARAMS ((Unit *unit, int try));
  464. extern int move_into_formation PARAMS ((Unit *unit));
  465. extern void plan_offense PARAMS ((Unit *unit));
  466. extern int do_for_occupants PARAMS ((Unit *unit));
  467. extern void plan_offense_support PARAMS ((Unit *unit));
  468. extern void set_construction PARAMS ((Unit *unit, int u, int num));
  469. extern void plan_defense PARAMS ((Unit *unit));
  470. extern void plan_exploration PARAMS ((Unit *unit));
  471. extern void plan_explorer_support PARAMS ((Unit *unit));
  472. extern int victim_here PARAMS ((int x, int y));
  473. extern int worth_capturing PARAMS ((Side *side, int u2, Side *oside, int x, int y));
  474. extern int go_after_victim PARAMS ((Unit *unit, int range));
  475. extern int target_here PARAMS ((int x, int y));
  476. extern int fire_at_opportunity PARAMS ((Unit *unit));
  477. extern int resupply_if_low PARAMS ((Unit *unit));
  478. extern int rearm_if_low PARAMS ((Unit *unit));
  479. extern int supplies_here PARAMS ((Unit *unit, int x, int y, int m));
  480. extern int indep_captureable_here PARAMS ((int x, int y));
  481. extern int capture_indep_if_nearby PARAMS ((Unit *unit));
  482. extern int useful_captureable_here PARAMS ((int x, int y));
  483. extern int useful_type PARAMS ((Side *side, int u));
  484. extern int capture_useful_if_nearby PARAMS ((Unit *unit));
  485. extern int could_capture_any PARAMS ((int u));
  486. extern void plan_random PARAMS ((Unit *unit));
  487. extern void make_plausible_random_args PARAMS ((char *argtypestr, int i, short *args, Unit *unit));
  488. extern void decide_plan PARAMS ((Side *side, Unit *unit));
  489. extern int doctrine_allows_wait PARAMS ((Unit *unit));
  490. extern void wait_for_orders PARAMS ((Unit *unit));
  491. extern void decide_tasks PARAMS ((Unit *unit));
  492. extern void random_walk PARAMS ((Unit *unit));
  493. extern void reserve_unit PARAMS ((Side *side, Unit *unit));
  494. extern void wake_unit PARAMS ((Unit *unit, int wakeocc, int reason, Unit *unit2));
  495. extern void wake_area PARAMS ((Side *side, int x, int y, int n, int occs));
  496. extern void set_formation PARAMS ((Unit *unit, Unit *leader, int x, int y, int dist, int flex));
  497. extern void delay_unit PARAMS ((Unit *unit, int flag));
  498. extern int find_base PARAMS ((Unit *unit, int (*pred)(void), int extra));
  499. extern int maybe_return_home PARAMS ((Unit *unit));
  500. extern int range_left PARAMS ((Unit *unit));
  501. extern void plan_exploration_route PARAMS ((Unit *unit, int x, int y));
  502. extern int route_to PARAMS ((Unit *unit, int x, int y));
  503. extern int find_worths PARAMS ((int range));
  504. extern int attack_worth PARAMS ((Unit *unit, int e));
  505. extern int threat PARAMS ((Side *side, int u, int x0, int y0));
  506. extern int should_build_base PARAMS ((Unit *unit));
  507. extern int region_portion PARAMS ((int n, int u, int *units_close, int *adjterr));
  508. extern void pop_task PARAMS ((Plan *plan));
  509. extern int react_to_enemies PARAMS ((Unit *unit));
  510. extern int move_patrol PARAMS ((Unit *unit));
  511. extern int build_time PARAMS ((Unit *unit, int prod));
  512. extern int clear_task_agenda PARAMS ((Plan *plan));
  513. extern Plan *create_plan PARAMS ((void));
  514. extern void free_plan PARAMS ((Plan *plan));
  515. extern char *plan_desig PARAMS ((Plan *plan));
  516. extern int might_be_captured PARAMS ((Unit *unit));
  517. extern void force_global_replan PARAMS ((Side *side));
  518. extern int units_nearby PARAMS ((int x, int y, int dist, int type));
  519. extern int survive_to_build_base PARAMS ((Unit *unit));
  520. extern int exact_survive_to_build_base PARAMS ((Unit *unit));
  521. extern int base_here PARAMS ((int x, int y));
  522. extern int any_base_here PARAMS ((int x, int y));
  523. extern int neutral_base_here PARAMS ((int x, int y));
  524. extern int base_nearby PARAMS ((Unit *unit, int range));
  525. extern int any_base_nearby PARAMS ((Unit *unit, int range));
  526. extern int neutral_base_nearby PARAMS ((Unit *unit, int range));
  527. extern int occupant_could_capture PARAMS ((Unit *unit, int etype));
  528. extern int can_capture_neighbor PARAMS ((Unit *unit));
  529. extern int occupant_can_capture_neighbor PARAMS ((Unit *unit));
  530. extern int find_closest_unit PARAMS ((Side *side, int x0, int y0, int maxdist, int (*pred)(void), int *rxp, int *ryp));
  531. extern int fullness PARAMS ((Unit *unit));
  532. extern int can_build PARAMS ((Unit *unit));
  533. extern int can_move PARAMS ((Unit *unit));
  534. extern int out_of_ammo PARAMS ((Unit *unit));
  535. extern int good_haven_p PARAMS ((Side *side, int x, int y));
  536. extern int haven_p PARAMS ((Unit *unit, int x, int y));
  537. extern int shop_p PARAMS ((Unit *unit, int x, int y));
  538. extern int survival_time PARAMS ((Unit *unit));
  539. extern int regions_around PARAMS ((int u, int x, int y, int center));
  540. extern Task *make_route_step PARAMS ((int x, int y, int priority));
  541. extern Task *make_route_chain PARAMS ((int sx, int sy, int tx, int ty));
  542. extern Task *find_route_aux PARAMS ((Unit *unit, int maxdist, int curlen, int fromdir, int sx, int sy, int fx, int fy, int tx, int ty, int flags));
  543. extern int usable_cell PARAMS ((Unit *unit, int x, int y));
  544. extern Task *find_route PARAMS ((Unit *unit, int maxdist, int tx, int ty));
  545. extern Task *find_route_aux_nearest PARAMS ((Unit *unit, int maxdist, int curlen, int fromdir, int sx, int sy, int fx, int fy, int (*pathpred)(void), int (*destpred)(void), int flags));
  546. extern Task *find_route_to_nearest PARAMS ((Unit *unit, int fx, int fy, int maxdist, int (*pathpred)(void), int (*destpred)(void)));
  547. extern int explorable_cell PARAMS ((int x, int y));
  548. extern int reachable_unknown PARAMS ((int x, int y));
  549. extern int adj_known_ok_terrain PARAMS ((int x, int y, Side *side, int u));
  550. extern int explore_reachable_cell PARAMS ((Unit *unit, int range));
  551. extern int optimize_plan PARAMS ((Unit *unit));
  552. extern int should_capture_maker PARAMS ((Unit *unit));
  553. extern int no_possible_moves PARAMS ((Unit *unit));
  554. extern int adj_known_passable PARAMS ((Side *side, int x, int y, int u));
  555. extern int adj_obstacle PARAMS ((int type, int x, int y));
  556. extern int normal_completion_time PARAMS ((int u, int u2));
  557. extern int adj_unit PARAMS ((int x, int y));
  558. extern int past_halfway_point PARAMS ((Unit *unit));
  559.  
  560. extern int self_build_base_for_self PARAMS ((Unit *unit));
  561.  
  562. extern int operating_range_worst PARAMS ((int u));
  563. extern int operating_range_best PARAMS ((int u));
  564.  
  565. extern int terrain_always_impassable PARAMS ((int u, int t));
  566.  
  567. extern int execute_standing_order PARAMS ((Unit *unit, int addtask));
  568. extern int can_build_or_help PARAMS ((Unit *unit));
  569. extern int can_produce PARAMS ((Unit *unit));
  570. extern int low_on_supplies_one PARAMS ((Unit *unit));
  571. extern int low_on_ammo_one PARAMS ((Unit *unit));
  572.  
  573. /* Declarations of task-related functions. */
  574.  
  575. extern void init_tasks PARAMS ((void));
  576. extern void allocate_task_block PARAMS ((void));
  577. extern Task *create_task PARAMS ((TaskType type));
  578. extern Task *clone_task PARAMS ((Task *oldtask));
  579. extern int fire_can_damage PARAMS ((Unit *unit, Unit *unit2));
  580. extern Unit *repair_here PARAMS ((int x, int y));
  581. extern Unit *aux_resupply_here PARAMS ((Unit *unit));
  582. extern Unit *resupply_here PARAMS ((int x, int y));
  583. extern int can_auto_resupply_self PARAMS ((Unit *unit, int *materials, int numtypes));
  584. extern TaskOutcome execute_task PARAMS ((Unit *unit));
  585. extern TaskOutcome execute_task_aux PARAMS ((Unit *unit, Task *task));
  586. extern int choose_move_dirs PARAMS ((Unit *unit, int tx, int ty, int shortest, int (*dirtest)(Unit *, int), void (*dirsort)(Unit *, int *, int), int *dirs));
  587. extern int plausible_move_dir PARAMS ((Unit *unit, int dir));
  588. extern void sort_directions PARAMS ((Unit *unit, int *dirs, int numdirs));
  589. extern void free_task PARAMS ((Task *task));
  590. extern void add_task PARAMS ((Unit *unit, int pos, Task *task));
  591. extern Task *create_move_to_task PARAMS ((int x, int y));
  592. extern void push_move_to_task PARAMS ((Unit *unit, int x, int y));
  593. extern void set_move_to_task PARAMS ((Unit *unit, int x, int y));
  594. extern Task *create_move_near_task PARAMS ((int x, int y, int dist));
  595. extern void set_move_near_task PARAMS ((Unit *unit, int x, int y, int dist));
  596. extern void push_move_near_task PARAMS ((Unit *unit, int x, int y, int dist));
  597. extern Task *create_move_dir_task PARAMS ((int dir, int n));
  598. extern void set_move_dir_task PARAMS ((Unit *unit, int dir, int n));
  599. extern Task *create_build_task PARAMS ((int u2, int run));
  600. extern void push_build_task PARAMS ((Unit *unit, int u2, int run));
  601. extern Task *create_research_task PARAMS ((int u2, int n));
  602. extern void push_research_task PARAMS ((Unit *unit, int u2, int n));
  603. extern void set_hit_task PARAMS ((Unit *unit, int x, int y));
  604. extern void push_specific_hit_task PARAMS ((Unit *unit, int x, int y, int u, int s));
  605. extern void set_specific_hit_task PARAMS ((Unit *unit, int x, int y, int u, int s));
  606. extern void push_hit_task PARAMS ((Unit *unit, int x, int y));
  607. extern Task *create_capture_task PARAMS ((int x, int y));
  608. extern void set_capture_task PARAMS ((Unit *unit, int x, int y));
  609. extern void push_capture_task PARAMS ((Unit *unit, int x, int y));
  610. extern void set_disband_task PARAMS ((Unit *unit));
  611. extern Task *create_resupply_task PARAMS ((int m));
  612. extern void set_resupply_task PARAMS ((Unit *unit, int m));
  613. extern Task *create_occupy_task PARAMS ((Unit *transport));
  614. extern void push_occupy_task PARAMS ((Unit *unit, Unit *transport));
  615. extern Task *create_pickup_task PARAMS ((Unit *occ));
  616. extern void push_pickup_task PARAMS ((Unit *unit, Unit *occ));
  617. extern Task *create_produce_task PARAMS ((int m, int n));
  618. extern void push_produce_task PARAMS ((Unit *unit, int m, int n));
  619. extern Task *create_sentry_task PARAMS ((int n));
  620. extern void set_sentry_task PARAMS ((Unit *unit, int n));
  621. extern void push_sentry_task PARAMS ((Unit *unit, int n));
  622. extern char *parse_task PARAMS ((Side *side, char *str, Task **taskp));
  623. extern char *task_desig PARAMS ((Task *task));
  624. extern Unit *find_unit_to_complete PARAMS ((Unit *unit, Task *task));
  625.  
  626. extern int repair_test PARAMS ((int x, int y));
  627. extern int resupply_test PARAMS ((int x, int y));
  628.  
  629. #undef  DEF_ACTION
  630. #define DEF_ACTION(name,code,args,PREPFN,dofn,CHECKFN,ARGDECL,doc)  \
  631.   extern int PREPFN  PARAMS (ARGDECL);  \
  632.   extern int CHECKFN PARAMS (ARGDECL);
  633.  
  634. #include "action.def"
  635.  
  636.