// STATEMENT FUNCTIONS
//   used a lot in Fortran ... just do regular small functions here
#ifndef ADV_FUNC_H
#define ADV_FUNC_H

#include "adventur.h"
#include "adv_common.h"

BOOL toting(int obj);
BOOL here(int obj);
BOOL at(int obj);
int liq2(int pbotl);
int liq(void);
int liqloc(int loc);
BOOL bitset(int l, int n);
BOOL forced(int loc);
BOOL dark(void);
int pct(int n);
int dwarf_here(int loc);
int strpos(char *str, char ch);
BOOL strequ(char *str1, char *str2);

#endif