header.h revision 1.10       1  1.10  christos /*	$NetBSD: header.h,v 1.10 1997/07/13 20:21:35 christos Exp $	*/
      2   1.3   mycroft 
      3   1.1       cgd /*	header.h		Larn is copyrighted 1986 by Noah Morgan. */
      4   1.1       cgd 
      5   1.8       mrg #include <sys/types.h>
      6   1.8       mrg 
      7   1.1       cgd #define MAXLEVEL 11
      8   1.1       cgd 	/*	max # levels in the dungeon			*/
      9   1.1       cgd #define MAXVLEVEL 3
     10   1.1       cgd 	/*	max # of levels in the temple of the luran	*/
     11   1.1       cgd #define MAXX 67
     12   1.1       cgd #define MAXY 17
     13   1.1       cgd 
     14   1.1       cgd #define SCORESIZE 10
     15   1.1       cgd 	/*	this is the number of people on a scoreboard max */
     16   1.1       cgd #define MAXPLEVEL 100
     17   1.1       cgd 	/*	maximum player level allowed		*/
     18   1.1       cgd #define MAXMONST 56
     19   1.1       cgd 	/*	maximum # monsters in the dungeon	*/
     20   1.1       cgd #define SPNUM 38
     21   1.1       cgd 	/*	maximum number of spells in existance	*/
     22   1.1       cgd #define MAXSCROLL 28
     23   1.1       cgd 	/*	maximum number of scrolls that are possible	*/
     24   1.1       cgd #define MAXPOTION 35
     25   1.1       cgd 	/*	maximum number of potions that are possible	*/
     26   1.1       cgd #define TIMELIMIT 30000
     27   1.1       cgd 	/*	the maximum number of moves before the game is called */
     28   1.1       cgd #define TAXRATE 1/20
     29   1.1       cgd 	/*	the tax rate for the LRS */
     30   1.1       cgd #define MAXOBJ 93
     31   1.1       cgd 	/* the maximum number of objects   n < MAXOBJ */
     32   1.1       cgd 
     33   1.1       cgd /*	this is the structure definition of the monster data	*/
     34   1.1       cgd struct monst
     35   1.1       cgd 	{
     36   1.1       cgd 	char	*name;
     37   1.1       cgd 	char	level;
     38   1.1       cgd 	short	armorclass;
     39   1.1       cgd 	char	damage;
     40   1.1       cgd 	char	attack;
     41   1.1       cgd 	char	defense;
     42   1.1       cgd 	char	genocided;
     43   1.1       cgd 	char 	intelligence; /* monsters intelligence -- used to choose movement */
     44   1.1       cgd 	short	gold;
     45   1.1       cgd 	short	hitpoints;
     46   1.1       cgd 	unsigned long experience;
     47   1.1       cgd 	};
     48   1.1       cgd 
     49   1.1       cgd /*	this is the structure definition for the items in the dnd store */
     50   1.1       cgd struct _itm
     51   1.1       cgd 	{
     52   1.1       cgd 	short	price;
     53   1.1       cgd 	char	obj;
     54   1.1       cgd 	char	arg;
     55   1.1       cgd 	char	qty;
     56   1.1       cgd 	};
     57   1.1       cgd 
     58   1.1       cgd /*	this is the structure that holds the entire dungeon specifications	*/
     59   1.1       cgd struct cel
     60   1.1       cgd 	{
     61   1.1       cgd 	short	hitp;	/*	monster's hit points	*/
     62   1.1       cgd 	char	mitem;	/*	the monster ID			*/
     63   1.1       cgd 	char	item;	/*	the object's ID			*/
     64   1.1       cgd 	short	iarg;	/*	the object's argument	*/
     65   1.1       cgd 	char	know;	/*	have we been here before*/
     66   1.1       cgd 	};
     67   1.1       cgd 
     68   1.1       cgd /* this is the structure for maintaining & moving the spheres of annihilation */
     69   1.1       cgd struct sphere
     70   1.1       cgd 	{
     71   1.1       cgd 	struct sphere *p;	/* pointer to next structure */
     72   1.1       cgd 	char x,y,lev;		/* location of the sphere */
     73   1.1       cgd 	char dir;			/* direction sphere is going in */
     74   1.9   thorpej 	short lifetime;		/* duration of the sphere */
     75   1.1       cgd 	};
     76   1.1       cgd 
     77   1.1       cgd /*	defines for the character attribute array	c[]	*/
     78   1.1       cgd #define STRENGTH 0		/* characters physical strength not due to objects */
     79   1.1       cgd #define INTELLIGENCE 1
     80   1.1       cgd #define WISDOM 2
     81   1.1       cgd #define CONSTITUTION 3
     82   1.1       cgd #define DEXTERITY 4
     83   1.1       cgd #define CHARISMA 5
     84   1.1       cgd #define HPMAX 6
     85   1.1       cgd #define HP 7
     86   1.1       cgd #define GOLD 8
     87   1.1       cgd #define EXPERIENCE 9
     88   1.1       cgd #define LEVEL 10
     89   1.1       cgd #define REGEN 11
     90   1.1       cgd #define WCLASS 12
     91   1.1       cgd #define AC 13
     92   1.1       cgd #define BANKACCOUNT 14
     93   1.1       cgd #define SPELLMAX 15
     94   1.1       cgd #define SPELLS 16
     95   1.1       cgd #define ENERGY 17
     96   1.1       cgd #define ECOUNTER 18
     97   1.1       cgd #define MOREDEFENSES 19
     98   1.1       cgd #define WEAR 20
     99   1.1       cgd #define PROTECTIONTIME 21
    100   1.1       cgd #define WIELD 22
    101   1.1       cgd #define AMULET 23
    102   1.1       cgd #define REGENCOUNTER 24
    103   1.1       cgd #define MOREDAM 25
    104   1.1       cgd #define DEXCOUNT 26
    105   1.1       cgd #define STRCOUNT 27
    106   1.1       cgd #define BLINDCOUNT 28
    107   1.1       cgd #define CAVELEVEL 29
    108   1.1       cgd #define CONFUSE 30
    109   1.1       cgd #define ALTPRO 31
    110   1.1       cgd #define HERO 32
    111   1.1       cgd #define CHARMCOUNT 33
    112   1.1       cgd #define INVISIBILITY 34
    113   1.1       cgd #define CANCELLATION 35
    114   1.1       cgd #define HASTESELF 36
    115   1.1       cgd #define EYEOFLARN 37
    116   1.1       cgd #define AGGRAVATE 38
    117   1.1       cgd #define GLOBE 39
    118   1.1       cgd #define TELEFLAG 40
    119   1.1       cgd #define SLAYING 41
    120   1.1       cgd #define NEGATESPIRIT 42
    121   1.1       cgd #define SCAREMONST 43
    122   1.1       cgd #define AWARENESS 44
    123   1.1       cgd #define HOLDMONST 45
    124   1.1       cgd #define TIMESTOP 46
    125   1.1       cgd #define HASTEMONST 47
    126   1.1       cgd #define CUBEofUNDEAD 48
    127   1.1       cgd #define GIANTSTR 49
    128   1.1       cgd #define FIRERESISTANCE 50
    129   1.1       cgd #define BESSMANN 51
    130   1.1       cgd #define NOTHEFT 52
    131   1.1       cgd #define HARDGAME 53
    132   1.1       cgd #define CPUTIME 54
    133   1.1       cgd #define BYTESIN 55
    134   1.1       cgd #define BYTESOUT 56
    135   1.1       cgd #define MOVESMADE 57
    136   1.1       cgd #define MONSTKILLED 58
    137   1.1       cgd #define SPELLSCAST 59
    138   1.1       cgd #define LANCEDEATH 60
    139   1.1       cgd #define SPIRITPRO 61
    140   1.1       cgd #define UNDEADPRO 62
    141   1.1       cgd #define SHIELD 63
    142   1.1       cgd #define STEALTH 64
    143   1.1       cgd #define ITCHING 65
    144   1.1       cgd #define LAUGHING 66
    145   1.1       cgd #define DRAINSTRENGTH 67
    146   1.1       cgd #define CLUMSINESS 68
    147   1.1       cgd #define INFEEBLEMENT 69
    148   1.1       cgd #define HALFDAM 70
    149   1.1       cgd #define SEEINVISIBLE 71
    150   1.1       cgd #define FILLROOM 72
    151   1.1       cgd #define RANDOMWALK 73
    152   1.1       cgd #define SPHCAST 74	/* nz if an active sphere of annihilation */
    153   1.1       cgd #define WTW 75		/* walk through walls */
    154   1.1       cgd #define STREXTRA 76	/* character strength due to objects or enchantments */
    155   1.1       cgd #define TMP 77	/* misc scratch space */
    156   1.1       cgd #define LIFEPROT 78 /* life protection counter */
    157   1.1       cgd 
    158   1.1       cgd /*	defines for the objects in the game		*/
    159   1.1       cgd 
    160   1.1       cgd #define OALTAR 1
    161   1.1       cgd #define OTHRONE 2
    162   1.1       cgd #define OORB 3
    163   1.1       cgd #define OPIT 4
    164   1.1       cgd #define OSTAIRSUP 5
    165   1.1       cgd #define OELEVATORUP 6
    166   1.1       cgd #define OFOUNTAIN 7
    167   1.1       cgd #define OSTATUE 8
    168   1.1       cgd #define OTELEPORTER 9
    169   1.1       cgd #define OSCHOOL 10
    170   1.1       cgd #define OMIRROR 11
    171   1.1       cgd #define ODNDSTORE 12
    172   1.1       cgd #define OSTAIRSDOWN 13
    173   1.1       cgd #define OELEVATORDOWN 14
    174   1.1       cgd #define OBANK2 15
    175   1.1       cgd #define OBANK 16
    176   1.1       cgd #define ODEADFOUNTAIN 17
    177   1.1       cgd #define OMAXGOLD 70
    178   1.1       cgd #define OGOLDPILE 18
    179   1.1       cgd #define OOPENDOOR 19
    180   1.1       cgd #define OCLOSEDDOOR 20
    181   1.1       cgd #define OWALL 21
    182   1.1       cgd #define OTRAPARROW 66
    183   1.1       cgd #define OTRAPARROWIV 67
    184   1.1       cgd 
    185   1.1       cgd #define OLARNEYE 22
    186   1.1       cgd 
    187   1.1       cgd #define OPLATE 23
    188   1.1       cgd #define OCHAIN 24
    189   1.1       cgd #define OLEATHER 25
    190   1.1       cgd #define ORING 60
    191   1.1       cgd #define OSTUDLEATHER 61
    192   1.1       cgd #define OSPLINT 62
    193   1.1       cgd #define OPLATEARMOR 63
    194   1.1       cgd #define OSSPLATE 64
    195   1.1       cgd #define OSHIELD 68
    196   1.1       cgd #define OELVENCHAIN 92
    197   1.1       cgd 
    198   1.1       cgd #define OSWORDofSLASHING 26
    199   1.1       cgd #define OHAMMER 27
    200   1.1       cgd #define OSWORD 28
    201   1.1       cgd #define O2SWORD 29
    202   1.1       cgd #define OSPEAR 30
    203   1.1       cgd #define ODAGGER 31
    204   1.1       cgd #define OBATTLEAXE 57
    205   1.1       cgd #define OLONGSWORD 58
    206   1.1       cgd #define OFLAIL 59
    207   1.1       cgd #define OLANCE 65
    208   1.1       cgd #define OVORPAL 90
    209   1.1       cgd #define OSLAYER 91
    210   1.1       cgd 
    211   1.1       cgd #define ORINGOFEXTRA 32
    212   1.1       cgd #define OREGENRING 33
    213   1.1       cgd #define OPROTRING 34
    214   1.1       cgd #define OENERGYRING 35
    215   1.1       cgd #define ODEXRING 36
    216   1.1       cgd #define OSTRRING 37
    217   1.1       cgd #define OCLEVERRING 38
    218   1.1       cgd #define ODAMRING 39
    219   1.1       cgd 
    220   1.1       cgd #define OBELT 40
    221   1.1       cgd 
    222   1.1       cgd #define OSCROLL 41
    223   1.1       cgd #define OPOTION 42
    224   1.1       cgd #define OBOOK 43
    225   1.1       cgd #define OCHEST 44
    226   1.1       cgd #define OAMULET 45
    227   1.1       cgd 
    228   1.1       cgd #define OORBOFDRAGON 46
    229   1.1       cgd #define OSPIRITSCARAB 47
    230   1.1       cgd #define OCUBEofUNDEAD 48
    231   1.1       cgd #define ONOTHEFT 49
    232   1.1       cgd 
    233   1.1       cgd #define ODIAMOND 50
    234   1.1       cgd #define ORUBY 51
    235   1.1       cgd #define OEMERALD 52
    236   1.1       cgd #define OSAPPHIRE 53
    237   1.1       cgd 
    238   1.1       cgd #define OENTRANCE 54
    239   1.1       cgd #define OVOLDOWN 55
    240   1.1       cgd #define OVOLUP 56
    241   1.1       cgd #define OHOME 69
    242   1.1       cgd 
    243   1.1       cgd #define OKGOLD 71
    244   1.1       cgd #define ODGOLD 72
    245   1.1       cgd #define OIVDARTRAP 73
    246   1.1       cgd #define ODARTRAP 74
    247   1.1       cgd #define OTRAPDOOR 75
    248   1.1       cgd #define OIVTRAPDOOR 76
    249   1.1       cgd #define OTRADEPOST 77
    250   1.1       cgd #define OIVTELETRAP 78
    251   1.1       cgd #define ODEADTHRONE 79
    252   1.1       cgd #define OANNIHILATION 80		/* sphere of annihilation */
    253   1.1       cgd #define OTHRONE2 81
    254   1.1       cgd #define OLRS 82				/* Larn Revenue Service */
    255   1.1       cgd #define OCOOKIE 83
    256   1.1       cgd #define OURN 84
    257   1.1       cgd #define OBRASSLAMP 85
    258   1.1       cgd #define OHANDofFEAR 86		/* hand of fear */
    259   1.1       cgd #define OSPHTAILSMAN 87		/* tailsman of the sphere */
    260   1.1       cgd #define OWWAND 88			/* wand of wonder */
    261   1.1       cgd #define OPSTAFF 89			/* staff of power */
    262   1.1       cgd /* used up to 92 */
    263   1.1       cgd 
    264   1.1       cgd /*	defines for the monsters as objects		*/
    265   1.1       cgd 
    266   1.1       cgd #define BAT 1
    267   1.1       cgd #define GNOME 2
    268   1.1       cgd #define HOBGOBLIN 3
    269   1.1       cgd #define JACKAL 4
    270   1.1       cgd #define KOBOLD 5
    271   1.1       cgd #define ORC 6
    272   1.1       cgd #define SNAKE 7
    273   1.1       cgd #define CENTIPEDE 8
    274   1.1       cgd #define JACULI 9
    275   1.1       cgd #define TROGLODYTE 10
    276   1.1       cgd #define ANT 11
    277   1.1       cgd #define EYE 12
    278   1.1       cgd #define LEPRECHAUN 13
    279   1.1       cgd #define NYMPH 14
    280   1.1       cgd #define QUASIT 15
    281   1.1       cgd #define RUSTMONSTER 16
    282   1.1       cgd #define ZOMBIE 17
    283   1.1       cgd #define ASSASSINBUG 18
    284   1.1       cgd #define BUGBEAR 19
    285   1.1       cgd #define HELLHOUND 20
    286   1.1       cgd #define ICELIZARD 21
    287   1.1       cgd #define CENTAUR 22
    288   1.1       cgd #define TROLL 23
    289   1.1       cgd #define YETI 24
    290   1.1       cgd #define WHITEDRAGON 25
    291   1.1       cgd #define ELF 26
    292   1.1       cgd #define CUBE 27
    293   1.1       cgd #define METAMORPH 28
    294   1.1       cgd #define VORTEX 29
    295   1.1       cgd #define ZILLER 30
    296   1.1       cgd #define VIOLETFUNGI 31
    297   1.1       cgd #define WRAITH 32
    298   1.1       cgd #define FORVALAKA 33
    299   1.1       cgd #define LAMANOBE 34
    300   1.1       cgd #define OSEQUIP 35
    301   1.1       cgd #define ROTHE 36
    302   1.1       cgd #define XORN 37
    303   1.1       cgd #define VAMPIRE 38
    304   1.1       cgd #define INVISIBLESTALKER 39
    305   1.1       cgd #define POLTERGEIST 40
    306   1.1       cgd #define DISENCHANTRESS 41
    307   1.1       cgd #define SHAMBLINGMOUND 42
    308   1.1       cgd #define YELLOWMOLD 43
    309   1.1       cgd #define UMBERHULK 44
    310   1.1       cgd #define GNOMEKING 45
    311   1.1       cgd #define MIMIC 46
    312   1.1       cgd #define WATERLORD 47
    313   1.1       cgd #define BRONZEDRAGON 48
    314   1.1       cgd #define GREENDRAGON 49
    315   1.1       cgd #define PURPLEWORM 50
    316   1.1       cgd #define XVART 51
    317   1.1       cgd #define SPIRITNAGA 52
    318   1.1       cgd #define SILVERDRAGON 53
    319   1.1       cgd #define PLATINUMDRAGON 54
    320   1.1       cgd #define GREENURCHIN 55
    321   1.1       cgd #define REDDRAGON 56
    322   1.1       cgd #define DEMONLORD 57
    323   1.1       cgd #define DEMONPRINCE 64
    324   1.1       cgd 
    325   1.1       cgd #define NULL 0
    326   1.1       cgd #define BUFBIG	4096			/* size of the output buffer */
    327   1.1       cgd #define MAXIBUF	4096			/* size of the input buffer */
    328   1.1       cgd #define LOGNAMESIZE 40			/* max size of the players name */
    329   1.1       cgd #define PSNAMESIZE 40			/* max size of the process name */
    330   1.1       cgd 
    331   1.1       cgd #ifndef NODEFS
    332   1.1       cgd extern char VERSION,SUBVERSION;
    333   1.1       cgd extern char aborted[],alpha[],beenhere[],boldon,cheat,ckpfile[],ckpflag;
    334   1.6       cgd extern char *class[],course[],diagfile[],helpfile[];
    335   1.1       cgd extern char *inbuffer,is_alpha[],is_digit[];
    336   1.1       cgd extern char item[MAXX][MAXY],iven[],know[MAXX][MAXY],larnlevels[],lastmonst[];
    337   1.9   thorpej extern char *levelname[],logfile[],loginname[],logname[],*lpbuf,*lpend;
    338   1.1       cgd extern char *lpnt,moved[MAXX][MAXY],mitem[MAXX][MAXY],monstlevel[];
    339   1.1       cgd extern char monstnamelist[],nch[],ndgg[],nlpts[],nomove,nosignal,nowelcome;
    340   1.2   mycroft extern char nplt[],nsw[],*objectname[],objnamelist[],optsfile[];
    341   1.2   mycroft extern char *potionhide[],*potionname[],playerids[],potprob[];
    342   1.1       cgd extern char predostuff,psname[],restorflag,savefilename[],scorefile[],scprob[];
    343   1.2   mycroft extern char screen[MAXX][MAXY],*scrollhide[],*scrollname[],sex,*spelcode[];
    344   1.2   mycroft extern char *speldescript[];
    345   1.1       cgd extern char spelknow[],*spelname[],*spelmes[],spelweird[MAXMONST+8][SPNUM];
    346   1.1       cgd extern char splev[],stealth[MAXX][MAXY],to_lower[],to_upper[],wizard;
    347   1.1       cgd extern short diroffx[],diroffy[],hitflag,hit2flag,hit3flag,hitp[MAXX][MAXY];
    348   1.1       cgd extern short iarg[MAXX][MAXY],ivenarg[],lasthx,lasthy,lastnum,lastpx,lastpy;
    349   1.9   thorpej extern short nobeep,oldx,oldy,playerx,playery,level;
    350   1.1       cgd extern int dayplay,enable_scroll,srcount,yrepcount,userid,wisid,lfd,fd;
    351   1.8       mrg extern uid_t uid, euid;
    352  1.10  christos extern long initialtime,outstanding_taxes,skill[],gltime,c[],cbak[];
    353   1.1       cgd extern unsigned long randx;
    354   1.1       cgd extern struct cel *cell;
    355   1.1       cgd extern struct monst monster[];
    356   1.1       cgd extern struct sphere *spheres;
    357   1.1       cgd extern struct _itm itm[];
    358   1.1       cgd 
    359   1.5       cgd char *fortune(),*getenv(),*getlogin(),*lgetw(),*lgetl(),*ctime();
    360   1.1       cgd char *tmcapcnv(),*tgetstr(),*tgoto();
    361   1.7       cgd long paytaxes(),lgetc(),lrint();
    362   1.1       cgd unsigned long readnum();
    363   1.5       cgd void *malloc();
    364   1.1       cgd 
    365   1.1       cgd 	/* macro to create scroll #'s with probability of occurrence */
    366   1.1       cgd #define newscroll() (scprob[rund(81)])
    367   1.1       cgd 	/* macro to return a potion # created with probability of occurrence */
    368   1.1       cgd #define newpotion() (potprob[rund(41)])
    369   1.1       cgd 	/* macro to return the + points on created leather armor */
    370   1.1       cgd #define newleather() (nlpts[rund(c[HARDGAME]?13:15)])
    371   1.1       cgd 	/* macro to return the + points on chain armor */
    372   1.1       cgd #define newchain() (nch[rund(10)])
    373   1.1       cgd 	/* macro to return + points on plate armor */
    374   1.1       cgd #define newplate() (nplt[rund(c[HARDGAME]?4:12)])
    375   1.1       cgd 	/* macro to return + points on new daggers */
    376   1.1       cgd #define newdagger() (ndgg[rund(13)])
    377   1.1       cgd 	/* macro to return + points on new swords */
    378   1.1       cgd #define newsword() (nsw[rund(c[HARDGAME]?6:13)])
    379   1.1       cgd 	/* macro to destroy object at present location */
    380   1.1       cgd #define forget() (item[playerx][playery]=know[playerx][playery]=0)
    381   1.1       cgd 	/* macro to wipe out a monster at a location */
    382   1.1       cgd #define disappear(x,y) (mitem[x][y]=know[x][y]=0)
    383   1.1       cgd 
    384   1.1       cgd #ifdef VT100
    385   1.1       cgd 	/* macro to turn on bold display for the terminal */
    386   1.1       cgd #define setbold() (lprcat(boldon?"\33[1m":"\33[7m"))
    387   1.1       cgd 	/* macro to turn off bold display for the terminal */
    388   1.1       cgd #define resetbold() (lprcat("\33[m"))
    389   1.1       cgd 	/* macro to setup the scrolling region for the terminal */
    390   1.1       cgd #define setscroll() (lprcat("\33[20;24r"))
    391   1.1       cgd 	/* macro to clear the scrolling region for the terminal */
    392   1.1       cgd #define resetscroll() (lprcat("\33[;24r"))
    393   1.1       cgd 	/* macro to clear the screen and home the cursor */
    394   1.1       cgd #define clear() (lprcat("\33[2J\33[f"), cbak[SPELLS]= -50)
    395   1.1       cgd #define cltoeoln() lprcat("\33[K")
    396   1.1       cgd #else VT100
    397   1.1       cgd 	/* defines below are for use in the termcap mode only */
    398   1.1       cgd #define ST_START 1
    399   1.1       cgd #define ST_END   2
    400   1.1       cgd #define BOLD     3
    401   1.1       cgd #define END_BOLD 4
    402   1.1       cgd #define CLEAR    5
    403   1.1       cgd #define CL_LINE  6
    404   1.1       cgd #define CL_DOWN 14
    405   1.1       cgd #define CURSOR  15
    406   1.1       cgd 	/* macro to turn on bold display for the terminal */
    407   1.1       cgd #define setbold() (*lpnt++ = ST_START)
    408   1.1       cgd 	/* macro to turn off bold display for the terminal */
    409   1.1       cgd #define resetbold() (*lpnt++ = ST_END)
    410   1.1       cgd 	/* macro to setup the scrolling region for the terminal */
    411   1.1       cgd #define setscroll() enable_scroll=1
    412   1.1       cgd 	/* macro to clear the scrolling region for the terminal */
    413   1.1       cgd #define resetscroll() enable_scroll=0
    414   1.1       cgd 	/* macro to clear the screen and home the cursor */
    415   1.1       cgd #define clear() (*lpnt++ =CLEAR, cbak[SPELLS]= -50)
    416   1.1       cgd 	/* macro to clear to end of line */
    417   1.1       cgd #define cltoeoln() (*lpnt++ = CL_LINE)
    418   1.1       cgd #endif VT100
    419   1.1       cgd 
    420   1.1       cgd 	/* macro to output one byte to the output buffer */
    421   1.1       cgd #define lprc(ch) ((lpnt>=lpend)?(*lpnt++ =(ch), lflush()):(*lpnt++ =(ch)))
    422   1.1       cgd 
    423   1.1       cgd 	/* macro to seed the random number generator */
    424   1.1       cgd #define srand(x) (randx=x)
    425   1.1       cgd #ifdef MACRORND
    426   1.1       cgd 	/* macros to generate random numbers   1<=rnd(N)<=N   0<=rund(N)<=N-1 */
    427   1.1       cgd #define rnd(x)  ((((randx=randx*1103515245+12345)>>7)%(x))+1)
    428   1.1       cgd #define rund(x) ((((randx=randx*1103515245+12345)>>7)%(x))  )
    429   1.1       cgd #endif MACRORND
    430   1.1       cgd 	/* macros for miscellaneous data conversion */
    431   1.1       cgd #define min(x,y) (((x)>(y))?(y):(x))
    432   1.1       cgd #define max(x,y) (((x)>(y))?(x):(y))
    433   1.1       cgd #define isalpha(x) (is_alpha[x])
    434   1.1       cgd #define isdigit(x) (is_digit[x])
    435   1.1       cgd #define tolower(x) (to_lower[x])
    436   1.1       cgd #define toupper(x) (to_upper[x])
    437   1.1       cgd #define lcc(x) (to_lower[x])
    438   1.1       cgd #define ucc(x) (to_upper[x])
    439   1.1       cgd #endif NODEFS
    440   1.1       cgd 
    441