'OHRRPGCE GAME - Globals '(C) Copyright 1997-2005 James Paige and Hamster Republic Productions 'Please read LICENSE.txt for GPL License details and disclaimer of liability 'See README.txt for code docs and apologies for crappyness of this code ;) ' #include "udts.bi" #include "game_udts.bi" #include "battle_udts.bi" #include "slices.bi" #include "os.bi" #include "scripting.bi" 'Misc game globals EXTERN prefsdir as string EXTERN config_file as string EXTERN savedir as string EXTERN speedcontrol as double EXTERN autotestmode as bool EXTERN always_enable_debug_keys as bool EXTERN presentsong as integer EXTERN lastsaveslot as integer EXTERN usepreunlump as bool EXTERN fatal as bool EXTERN checkfatal as bool EXTERN err_suppress_lvl as scriptErrEnum EXTERN backcompat_sound_slot_mode as bool EXTERN backcompat_sound_slots() as integer EXTERN autosnap as integer EXTERN custom_version as string EXTERN master_channel as IPCChannel EXTERN modified_lumps as string vector EXTERN lump_reloading as LumpReloadOptions EXTERN force_prefsdir_save as bool EXTERN persist_reld_doc as DocPtr 'Game state globals EXTERN gam as GameState EXTERN txt as TextBoxState EXTERN tag() as integer EXTERN onetime() as integer 'Vehicle globals EXTERN vstate as VehicleState 'Map state globals EXTERN gmap() as integer EXTERN maptiles() as TileMap EXTERN pass as TileMap EXTERN foemap as TileMap EXTERN zmap as ZoneMap EXTERN mapsizetiles as XYPair EXTERN as integer mapx, mapy 'camera pos EXTERN tilesets() as TilesetData ptr 'Hero walkabout globals EXTERN cats() as CaterpillarHistory EXTERN herow() as HeroWalkabout 'NPC globals EXTERN npcs() as NPCType EXTERN npc() as NPCInst 'Item globals EXTERN inventory() as InventSlot EXTERN gold as integer 'Script globals EXTERN script() as ScriptData Ptr EXTERN global() as integer EXTERN heap() as integer EXTERN scrat() as OldScriptState EXTERN scriptinsts() as ScriptInst EXTERN retvals() as integer EXTERN wantimmediate as integer EXTERN scriptprofiling as bool EXTERN timing_fibre as bool EXTERN insideinterpreter as bool EXTERN nowscript as integer EXTERN scriptret as integer EXTERN numloadedscr as integer EXTERN totalscrmem as integer EXTERN unused_script_cache_mem as integer EXTERN scriptctr as uinteger EXTERN next_interpreter_check_time as double EXTERN interruption_grace_period as integer EXTERN scripts_use_cc_scancodes as bool EXTERN scrst as Stack EXTERN curcmd as ScriptCommand ptr EXTERN last_queued_script as ScriptFibre ptr EXTERN mainFibreGroup as ScriptFibre ptr vector 'debugger aids EXTERN globalp as integer ptr EXTERN heapp as integer ptr EXTERN scratp as OldScriptState ptr EXTERN scriptp as ScriptData ptr ptr EXTERN retvalsp as integer ptr EXTERN plotslicesp as slice ptr ptr EXTERN timers() as PlotTimer 'Script string globals EXTERN plotstr() as Plotstring 'Battle globals EXTERN battl as BattleState ptr EXTERN lastformation as integer EXTERN bstackstart as integer EXTERN atkq() as AttackQueue 'Menu globals EXTERN menus() as MenuDef EXTERN mstates() as MenuState EXTERN menu_set as MenuSet EXTERN topmenu as integer EXTERN remembered_menu_pts() as integer 'Slice handles EXTERN SliceTable as SliceTableType EXTERN plotslices() as Slice ptr EXTERN next_slice_handle as integer EXTERN num_reusable_slice_handles as integer