script.h

Go to the documentation of this file.

 
#ifndef SCRIPT_H
#define SCRIPT_H
 
struct MOBILE;
struct SCRIPT;
struct TILEMAP;
 
#define SCRIPT_ARG_STACK_P 32763
 
#define SCRIPT_ARG_STACK_I 32767
 
#define SCRIPT_ARG_STACK 32765
 
#define SCRIPT_ARG_RANDOM 32766
 
#define SCRIPT_ARG_FOLLOW 32764
 
#define SCRIPT_ARG_MAX 32750
 
#define SCRIPT_GLOBALS_MAX 20
 
#define SCRIPT_STACK_MAX 127
 
/* TODO: This is a valid stack value. */
#define SCRIPT_ERROR_OVERFLOW -1
 
#ifndef NO_SCRIPT_PROTOTYPES
 
typedef uint16_t (*SCRIPT_CB)(
   uint16_t pc, int16_t arg, struct SCRIPT* script,
   struct MOBILE* actor, struct MOBILE* actee, struct TILEMAP_COORDS* tile,
   struct DSEKAI_STATE* state );
 
#endif /* !NO_SCRIPT_PROTOTYPES */
 
#ifdef SCRIPT_TRACE
#  define script_trace_printf( lvl, ... ) debug_printf( lvl, __VA_ARGS__ )
#else
#  define script_trace_printf( ... )
#endif /* SCRIPT_TRACE */
 
#ifndef NO_SCRIPT_STRUCT
#include "scstruct.h"
#endif /* !NO_SCRIPT_STRUCT */
 
#define SCRIPT_CB_TABLE_24( f ) f( 23, SHAKE, 'y' )
 
#define SCRIPT_CB_TABLE_23( f ) f( 23, DISABLE, 'd' ) SCRIPT_CB_TABLE_24( f )
 
#define SCRIPT_CB_TABLE_22( f ) f( 22, WARP,    'w' ) SCRIPT_CB_TABLE_23( f )
#define SCRIPT_CB_TABLE_21( f ) f( 21, ANIM,    'n' ) SCRIPT_CB_TABLE_22( f )
#define SCRIPT_CB_TABLE_20( f ) f( 20, PUSH,    'v' ) SCRIPT_CB_TABLE_21( f )
#define SCRIPT_CB_TABLE_19( f ) f( 19, POP,     '^' ) SCRIPT_CB_TABLE_20( f )
 
#define SCRIPT_CB_TABLE_18( f ) f( 18, EQJMP,   '=' ) SCRIPT_CB_TABLE_19( f )
 
#define SCRIPT_CB_TABLE_17( f ) f( 17, GTJMP,   '>' ) SCRIPT_CB_TABLE_18( f )
 
#define SCRIPT_CB_TABLE_16( f ) f( 16, LTJMP,   '<' ) SCRIPT_CB_TABLE_17( f )
 
#define SCRIPT_CB_TABLE_15( f ) f( 15, ADD,     '+' ) SCRIPT_CB_TABLE_16( f )
 
#define SCRIPT_CB_TABLE_14( f ) f( 14, SUB,     '-' ) SCRIPT_CB_TABLE_15( f )
 
#define SCRIPT_CB_TABLE_13( f ) f( 13, GIVE,    'h' ) SCRIPT_CB_TABLE_14( f )
 
#define SCRIPT_CB_TABLE_12( f ) f( 12, TAKE,    'k' ) SCRIPT_CB_TABLE_13( f ) 
 
#define SCRIPT_CB_TABLE_11( f ) f( 11, DIE,     'z' ) SCRIPT_CB_TABLE_12( f )
 
#define SCRIPT_CB_TABLE_10( f ) f( 10, GGET,    'a' ) SCRIPT_CB_TABLE_11( f )
 
#define SCRIPT_CB_TABLE_9( f ) f( 9,   GSET,    'b' ) SCRIPT_CB_TABLE_10( f )
 
#define SCRIPT_CB_TABLE_8( f ) f( 8,   FACE,    'f' ) SCRIPT_CB_TABLE_9( f )
 
#define SCRIPT_CB_TABLE_7( f ) f( 7,   RETURN,  'x' ) SCRIPT_CB_TABLE_8( f )
 
#define SCRIPT_CB_TABLE_6( f ) f( 6,   SPEAK,   'p' ) SCRIPT_CB_TABLE_7( f )
 
#define SCRIPT_CB_TABLE_5( f ) f( 5,   GOTO,    'g' ) SCRIPT_CB_TABLE_6( f )
 
#define SCRIPT_CB_TABLE_4( f ) f( 4,   START,   't' ) SCRIPT_CB_TABLE_5( f )
 
#define SCRIPT_CB_TABLE_3( f ) f( 3,   SLEEP,   's' ) SCRIPT_CB_TABLE_4( f )
 
#define SCRIPT_CB_TABLE_2( f ) f( 2,   WALK,    'u' ) SCRIPT_CB_TABLE_3( f )
 
#define SCRIPT_CB_TABLE_1( f ) f( 1,   INTERACT,'i' ) SCRIPT_CB_TABLE_2( f )
 
#define SCRIPT_CB_TABLE( f ) f( 0, NOOP, '\0' ) SCRIPT_CB_TABLE_1( f )
 
#ifndef NO_SCRIPT_PROTOTYPES
 
#define SCRIPT_CB_TABLE_PROTOTYPES( idx, name, c ) uint16_t script_handle_ ## name( uint16_t pc, int16_t arg, struct SCRIPT* script, struct MOBILE* actor, struct MOBILE* actee, struct TILEMAP_COORDS* tile, struct DSEKAI_STATE* state );
 
SCRIPT_CB_TABLE( SCRIPT_CB_TABLE_PROTOTYPES )
 
 
uint16_t script_parse_str(
   int8_t script_idx,
   char* script_txt, int16_t script_txt_sz, struct SCRIPT* script
) SECTION_SCRIPT;
 
uint8_t script_init() SECTION_SCRIPT;
 
void script_shutdown() SECTION_SCRIPT;
 
uint16_t script_goto_label(
   uint16_t pc, struct SCRIPT* script, uint16_t label_type, uint16_t label_id );
 
#endif /* !NO_SCRIPT_PROTOTYPES */
 
#ifndef NO_SCRIPT_TABLES
 
#ifdef SCRIPT_C
 
/* === If we're being called inside script.c === */
 
int8_t g_script_globals[SCRIPT_GLOBALS_MAX];
 
#define SCRIPT_CB_TABLE_LIST( idx, name, c ) script_handle_ ## name,
 
RES_CONST SCRIPT_CB gc_script_handlers[] = {
   SCRIPT_CB_TABLE( SCRIPT_CB_TABLE_LIST )
};
 
#define SCRIPT_CB_TABLE_CONSTS( idx, name, c ) RES_CONST uint16_t SCRIPT_ACTION_ ## name = idx;
 
SCRIPT_CB_TABLE( SCRIPT_CB_TABLE_CONSTS );
 
#  ifdef NO_SCRIPT_HANDLERS
 
#define SCRIPT_CB_TABLE_STUBS( idx, name, c ) uint16_t script_handle_ ## name( uint16_t pc, int16_t arg, struct SCRIPT* script, struct MOBILE* actor, struct MOBILE* actee, struct TILEMAP_COORDS* tile, struct DSEKAI_STATE* state ) { return 0; }
 
SCRIPT_CB_TABLE( SCRIPT_CB_TABLE_STUBS )
 
#  endif /* NO_SCRIPT_HANDLERS */
 
#else
 
/* === If we're being called inside anything BUT script.c === */
 
extern int8_t g_script_globals[SCRIPT_GLOBALS_MAX];
 
#define SCRIPT_CB_TABLE_CONSTS( idx, name, c ) extern RES_CONST uint16_t SCRIPT_ACTION_ ## name;
 
SCRIPT_CB_TABLE( SCRIPT_CB_TABLE_CONSTS )
 
extern RES_CONST SCRIPT_CB gc_script_handlers[];
#endif /* !SCRIPT_C */
 
#endif /* !NO_SCRIPT_TABLES */
 
#endif /* SCRIPT_H */