Home | History | Annotate | Line # | Download | only in larn
header.h revision 1.7.6.1
      1  1.7.6.1      mrg /*	$NetBSD: header.h,v 1.7.6.1 1996/05/27 15:54:20 mrg Exp $	*/
      2      1.3  mycroft 
      3      1.1      cgd /*	header.h		Larn is copyrighted 1986 by Noah Morgan. */
      4      1.1      cgd 
      5  1.7.6.1      mrg #include <sys/types.h>
      6  1.7.6.1      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.1      cgd 	char 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.1      cgd extern char level,*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.1      cgd extern short nobeep,oldx,oldy,playerx,playery;
    350      1.1      cgd extern int dayplay,enable_scroll,srcount,yrepcount,userid,wisid,lfd,fd;
    351  1.7.6.1      mrg extern uid_t uid, euid;
    352      1.1      cgd extern long initialtime,outstanding_taxes,skill[],gtime,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