zork/parse.h

695 lines
33 KiB
C

/* parse.h -- header file for parsing structures used by dungeon */
/* These structures are only used by the parsing routines. They are in
* their own file since they are so large.
*/
#ifndef PARSE_H
#define PARSE_H
#ifndef EXTERN
#define EXTERN extern
#endif
EXTERN struct {
integer act, o1, o2, p1, p2;
} pv_;
#define pv_1 pv_
#define pvec ((integer *)&pv_1)
#define objvec ((integer *)&pv_1 + 1)
#define prpvec ((integer *)&pv_1 + 3)
EXTERN struct {
integer vflag, dobj, dfl1, dfl2, dfw1, dfw2, iobj, ifl1, ifl2, ifw1, ifw2;
} syntax_;
#define syntax_1 syntax_
#define syn ((integer *)&syntax_1)
/* Object flags (objflg) */
#define VABIT (16384)
#define VRBIT (8192)
#define VTBIT (4096)
#define VCBIT (2048)
#define VEBIT (1024)
#define VFBIT (512)
#define VPMASK (511)
/* Syntax flags (synflg) */
#define SDIR (16384)
#define SIND (8192)
#define SSTD (4096)
#define SFLIP (2048)
#define SDRIV (1024)
#define SVMASK (511)
/* BUZZ WORDS-- IGNORED IN SYNTACTIC PROCESSING */
/* THE FOLLOWING DATA STATEMENT WAS CONVERTED FROM: */
/* DATA BVOC/3RAND,0,2RBY,0,2RIS,0,1RA,0, */
/* & 2RAN,0,3RTHE,0,3RRUN,0,2RGO,0,3RPRO,3RCEE,0,0/ */
EXTERN const struct {
integer bvoc[20];
} buzvoc_
#ifdef INIT
= { 2164, 0, 4200, 0, 15160, 0, 1600, 0, 2160, 0, 32325, 0,
29654, 0, 11800, 0, 26335, 5005, 0, 0 }
#endif
;
#define buzvoc_1 buzvoc_
/* PREPOSITIONS-- MAPS PREPOSITIONS TO INDICES */
/* THE FOLLOWING DATA STATEMENT WAS CONVERTED FROM: */
/* DATA PVOC/3ROVE,1RR,1,3RWIT,1RH,2,3RUSI,2RNG,2,3RTHR,3ROUG,2, */
/* & 2RAT,0,3,2RTO,0,4,2RIN,0,5,3RINS,3RIDE,5,3RINT,1RO,5, */
/* & 3RDOW,1RN,6,2RUP,0,7,3RUND,2RER,8,2ROF,0,9,2RON,0,10, */
/* & 3ROFF,0,11/ */
EXTERN const struct {
integer pvoc[45];
} prpvoc_
#ifdef INIT
= { 24885, 28800, 1, 37180, 12800, 2, 34369, 22680, 2, 32338,
24847, 2, 2400, 0, 3, 32600, 0, 4, 14960, 0, 5, 14979, 14565, 5,
14980, 0, 5, 7023, 22400, 6, 34240, 0, 7, 34164, 8720, 8, 24240,
0, 9, 24560, 0, 10, 24246, 0, 11 }
#endif
;
#define prpvoc_1 prpvoc_
/* DIRECTIONS-- MAPS DIRECTIONS TO INDICES */
/* THE FOLLOWING DATA STATEMENT WAS CONVERTED FROM: */
/* DATA DVOC/1RN,0,"2000,3RNOR,2RTH,"2000,1RS,0,"12000, */
/* & 1RE,0,"6000,3REAS,1RT,"6000,1RW,0,"16000,3RWES,1RT,"16000, */
/* & 2RSE,0,"10000,2RSW,0,"14000, */
/* & 2RNE,0,"4000,2RNW,0,"20000, */
/* & 1RU,0,"22000,2RUP,0,"22000,1RD,0,"24000,3RDOW,1RN,"24000, */
/* & 3RLAU,3RNCH,"26000,3RLAN,1RD,"30000,3RENT,2RER,"32000, */
/* & 3REXI,1RT,"34000,3ROUT,0,"34000,3RLEA,2RVE,"34000, */
/* & 3RTRA,3RVEL,"36000,3RSOU,2RTH,"12000, */
/* & 2RIN,0,"32000, */
/* & 3RCRO,2RSS,"36000/ */
EXTERN const struct {
integer dvoc[75];
} dirvoc_
#ifdef INIT
= { 22400, 0, 1024, 23018, 32320, 1024, 30400, 0, 5120, 8000, 0,
3072, 8059, 32000, 3072, 36800, 0, 7168, 37019, 32000, 7168,
30600, 0, 4096, 31320, 0, 6144, 22600, 0, 2048, 23320, 0, 8192,
33600, 0, 9216, 34240, 0, 9216, 6400, 0, 10240, 7023, 22400,
10240, 19261, 22528, 11264, 19254, 6400, 12288, 8580, 8720, 13312,
8969, 32000, 14336, 24860, 0, 14336, 19401, 35400, 14336, 32721,
35412, 15360, 31021, 32320, 5120, 14960, 0, 13312, 5535, 31160,
15360 }
#endif
;
#define dirvoc_1 dirvoc_
/* ADJECTIVES-- MAPS ADJECTIVES TO OBJECT NUMBERS */
/* EACH ENTRY IS VARIABLE LENGTH AND CONSISTS OF A TWO WORD */
/* ADJECTIVE IN RADIX-50 FOLLOWED BY ONE OR MORE OBJECT NUMBERS. */
/* NOTE THAT ADJECTIVES CAN BE DISTINGUISHED FROM OBJECTS AS */
/* FOLLOWS-- ALL ADJECTIVES ARE .GE. 1RA (1600), WHILE ALL OBJECTS */
/* ARE .LE. OLNT (255 MAX). */
/* THE DATA STATEMENT BELOW WAS CONVERTED FROM: */
/* DATA AVOC1/3RBRO,2RWN,1,81,3RELO,3RNGA,1,3RHOT,0,3,3RPEP,3RPER,3, */
/* & 3RVIT,3RREO,4,3RJAD,1RE,6,3RHUG,1RE,8,3RENO,3RRMO,8,122, */
/* & 3RTRO,3RPHY,9,3RCLE,2RAR,10,3RLAR,2RGE,12,26,47,95,96,123, */
/* & 133,135,146,147,150,176,3RNAS,2RTY,13,3RELV,3RISH,14, */
/* & 3RBRA,2RSS,15,16,46,156, */
/* & 3RBRO,3RKEN,16,22,92,113,155,158,3RORI,3RENT,17, */
/* & 3RBLO,3RODY,20,3RRUS,2RTY,21,3RBUR,3RNED,22, */
/* & 3RDEA,1RD,22,3ROLD,0,25,41,44,45,3RLEA,3RTHE,25, */
/* & 3RPLA,3RTIN,26,3RPEA,2RRL,27, */
/* & 3RMOB,1RY,31,3RCRY,3RSTA,32,126, */
/* & 3RGOL,1RD,33,85,104,157,158,188, */
/* & 3RIVO,2RRY,34,3RSAP,3RPHI,37,3RWOO,3RDEN,38,67,136,137, */
/* & 165,173,174,175,3RWOO,1RD,38,67,136,137,165,173,174,175, */
/* & 3RSTE,2REL,39,125,189, */
/* & 3RDEN,3RTED,39,3RFAN,2RCY,40,3RANC,3RIEN,41,44, */
/* & 3RSMA,2RLL,5,46,52,53,89,102,103,153,187, */
/* & 3RBLA,2RCK,47,162,3RTOU,1RR,49, */
/* & 3RVIS,3RCOU,55,3RVIC,3RIOU,62, */
/* & 3RGLA,2RSS,10,126,132,3RTRA,1RP,66/ */
/* DATA AVOC2/3RFRO,2RNT,68,3RSTO,2RNE,69,150,214,3RMAN,3RGLE,72, */
/* & 3RRED,0,79,94,140,161,170,171,3RYEL,3RLOW,80,159, */
/* & 3RBLU,1RE,82,112,114,141, */
/* & 3RVAM,3RPIR,83,3RMAG,2RIC,90, */
/* & 3RSEA,3RWOR,90,3RTAN,0,91,3RSHA,2RRP,92, */
/* & 3RWIC,3RKER,98,3RCLO,2RTH,100, */
/* & 3RBRA,3RIDE,101, */
/* & 3RGAU,2RDY,108,3RSQU,3RARE,109,127,3RCLA,1RY,109, */
/* & 3RSHI,2RNY,110,3RTHI,1RN,110, */
/* & 3RGRE,2REN,115,143,3RPUR,3RPLE,116,3RWHI,2RTE,117,147,160, */
/* & 3RMAR,3RBLE,119,3RCOK,1RE,121,3REMP,2RTY,121, */
/* & 3RROU,2RND,128,3RTRI,3RANG,129, */
/* & 2 3RRAR,1RE,134,3ROBL,3RONG,135,3REAT,3R$ME,138, */
/* & 3REAT,2RME,138,3RORA,3RNGE,139,3RECC,1RH,141/ */
/* DATA AVOC3/3RROC,2RKY,147,3RSHE,2RER,147, */
/* & 3R200,0,148,3RNEA,1RT,148,3RSHI,3RMME,151, */
/* & 3RZUR,3RICH,152,3RBIR,2RDS,153,154,155, */
/* & 3RENC,3RRUS,154,155,3RBEA,3RUTI,156,3RCLO,3RCKW,157,158, */
/* & 3RMEC,3RHAN,157,158, */
/* & 3RMAH,3ROGA,163,3RPIN,1RE,164,3RLON,1RG,166, */
/* & 3RCEN,3RTER,166,3RSHO,2RRT,167,1RT,0,168, */
/* & 3RCOM,3RPAS,169,211,3RBRO,3RNZE,172,3RCEL,1RL,174,175, */
/* & 3RLOC,3RKED,174,3RSUN,0,177, */
/* & 3RBAR,1RE,200,3RSON,1RG,203, */
/* & 3RNOR,2RTH,205,3RNOR,3RTHE,205,3RSOU,2RTH,206, */
/* & 3RSOU,3RTHE,206,3REAS,1RT,207,3REAS,3RTER,207, */
/* & 3RWES,1RT,208,3RWES,3RTER,208,3RDUN,3RGEO,215/ */
EXTERN const integer avoc[]
#ifdef INIT
= { 3935, 37360, 1, 81, 8495, 22681, 1, 13420, 0, 3, 25816,
25818, 3, 35580, 29015, 4, 16044, 8000, 6, 13647, 8000, 8, 8575,
29335, 8, 122, 32735, 25945, 9, 5285, 2320, 10, 19258, 11400, 12,
26, 47, 95, 96, 123, 133, 135, 146, 147, 150, 176, 22459, 33000,
13, 8502, 15168, 14, 3921, 31160, 15, 16, 46, 156, 3935, 17814,
16, 22, 92, 113, 155, 158, 24729, 8580, 17, 3695, 24185, 20,
29659, 33000, 21, 4058, 22604, 22, 6601, 6400, 22, 24484, 0, 25,
41, 44, 45, 19401, 32325, 25, 26081, 32374, 26, 25801, 29280, 27,
21402, 40000, 31, 5545, 31201, 32, 126, 11812, 6400, 33, 85, 104,
157, 158, 188, 15295, 29800, 34, 30456, 25929, 37, 37415, 6614,
38, 67, 136, 137, 165, 173, 174, 175, 37415, 6400, 38, 67, 136,
137, 165, 173, 174, 175, 31205, 8480, 39, 125, 189, 6614, 32204,
39, 9654, 5800, 40, 2163, 14614, 41, 44, 30921, 19680, 5, 46, 52,
53, 89, 102, 103, 153, 187, 3681, 5240, 47, 162, 32621, 28800, 49,
35579, 5421, 55, 35563, 15021, 62, 11681, 31160, 10, 126, 132,
32721, 25600, 66, 10335, 23200, 68, 31215, 22600, 69, 150, 214,
20854, 11685, 72, 29004, 0, 79, 94, 140, 161, 170, 171, 40212,
19823, 80, 159, 3701, 8000, 82, 112, 114, 141, 35253, 25978, 83,
20847, 14520, 90, 30601, 37418, 90, 32054, 0, 91, 30721, 29440,
92, 37163, 17818, 98, 5295, 32320, 100, 3921, 14565, 101, 11261,
7400, 108, 31101, 2325, 109, 127, 5281, 4000, 109, 30729, 23400,
110, 32329, 22400, 110, 11925, 8560, 115, 143, 26458, 26085, 116,
37129, 32200, 117, 147, 160, 20858, 3685, 119, 5411, 8000, 121,
8536, 33000, 121, 29421, 22560, 128, 32729, 2167, 129, 28858,
8000, 134, 24092, 24567, 135, 8060, 43725, 138, 8060, 21000, 138,
24721, 22685, 139, 8123, 12800, 141, 29403, 18600, 147, 30725,
8720, 147, 52430, 0, 148, 22601, 32000, 148, 30729, 21325, 151,
42458, 14528, 152, 3578, 7160, 153, 154, 155, 8563, 29659, 154,
155, 3401, 34409, 156, 5295, 5263, 157, 158, 21003, 12854, 157,
158, 20848, 24281, 163, 25974, 8000, 164, 19814, 11200, 166, 5014,
32218, 166, 30735, 29600, 167, 32000, 0, 168, 5413, 25659, 169,
211, 3935, 23445, 172, 5012, 19200, 174, 175, 19803, 17804, 174,
31254, 0, 177, 3258, 8000, 200, 31014, 11200, 203, 23018, 32320,
205, 23018, 32325, 205, 31021, 32320, 206, 31021, 32325, 206,
8059, 32000, 207, 8059, 32218, 207, 37019, 32000, 208, 37019,
32218, 208, 7254, 11415, 215, -1 }
#endif
;
/* VERBS-- MAPS VERBS TO SYNTAX SLOTS */
/* EACH ENTRY IS VARIABLE LENGTH AND CONSISTS OF ONE OR MORE */
/* TWO WORD VERBS IN RADIX-50 FOLLOWED BY A SYNTAX WORD COUNT */
/* FOLLOWED BY ONE OR MORE SYNTAXES. NOTE THAT VERBS CAN BE */
/* DISTINGUISHED FROM WORD COUNTS AS FOLLOWS-- */
/* ALL VERBS ARE .GE. 1RA (1600), WHILE ALL SYNTAX WORD COUNTS */
/* ARE .LE. 255. */
/* SYNTAX ENTRIES CONSIST OF A FLAG WORD FOLLOWED BY 0, 1, OR 2 */
/* OBJECT DESCRIPTIONS. THE FLAG WORD HAS THE FOLLOWING FORMAT-- */
/* BIT <14> IF 1, SYNTAX INCLUDES DIRECT OBJECT */
/* BIT <13> IF 1, SYNTAX INCLUDES INDIRECT OBJECT */
/* BIT <12> IF 1, DIRECT OBJECT IS IMPLICIT (STANDARD FORM) */
/* BIT <11> IF 1, DIRECT AND INDIRECT OBJECT MUST BE SWAPPED */
/* AFTER SYNTAX PROCESSING */
/* BIT <10> IF 1, THIS IS DEFAULT SYNTAX FOR ORPHANERY */
/* BITS <8:0> VERB NUMBER FOR VAPPLI */
/* OBJECT DESCRIPTIONS CONSIST OF A FLAG WORD AND TWO FWIM WORDS. */
/* THE FLAG WORD HAS THE FOLLOWING FORMAT-- */
/* BIT <14> IF 1, SEARCH ADVENTURER FOR OBJECT */
/* BIT <13> IF 1, SEARCH ROOM FOR OBJECT */
/* BIT <12> IF 1, PARSER WILL TRY TO TAKE OBJECT */
/* BIT <11> IF 1, ADVENTURER MUST HAVE OBJECT */
/* BIT <10> IF 1, QUALIFYING BITS (NORMALLY -1,-1) ARE SAME */
/* AS FWIM BITS */
/* BIT <9> IF 1, OBJECT MUST BE REACHABLE */
/* BITS <8:0> PREPOSITION NUMBER FOR SYNMCH */
/* THE FWIM WORDS HAVE THE SAME FORMAT AS THE TWO OBJECT FLAG WORDS. */
/* NOTE THAT BITS 12 AND 11 OF OBJECT DESCRIPTIONS ACTUALLY HAVE */
/* FOUR DISTINCT STATES-- */
/* BIT 12 BIT 11 MDLDESC INTERPRETATION */
/* ------ ------ ------- --------------- */
/* 0 0 -- NO PARSER ACTION */
/* 0 1 HAVE ADVENTURER MUST HAVE OBJECT */
/* 1 0 TRY TRY TO TAKE, DONT CARE IF FAIL */
/* 1 1 TAKE TRY TO TAKE, CARE IF FAIL */
/* THE FOLLOWING DATA STATEMENT WAS ORIGINALLY: */
/* DATA VVOC1/3RBRI,2REF,1,70,3RVER,3RBOS,1,71, */
/* & 3RSUP,3RERB,1,72,3RSTA,1RY,1,73,3RVER,3RSIO,1,74, */
/* & 3RSWI,1RM,3RBAT,2RHE,3RWAD,1RE,1,75,3RGER,3RONI,1,76, */
/* & 3RULY,3RSSE,3RODY,3RSSE,1,77, */
/* & 3RWEL,1RL,1,78,3RPRA,1RY,1,79,3RTRE,3RASU,1,80, */
/* & 3RTEM,3RPLE,1,81,3RBLA,2RST,1,82,3RSCO,2RRE,1,83, */
/* & 1RQ,0,3RQUI,1RT,1,84,3RHEL,1RP,1,40,3RINF,1RO,1,41, */
/* & 3RHIS,3RTOR,3RUPD,3RATE,1,42,3RBAC,1RK,1,43, */
/* & 3RSIG,1RH,3RMUM,3RBLE,1,44/ */
/* DATA VVOC1A/3RCHO,2RMP,3RLOS,1RE,3RBAR,1RF,1,45, */
/* & 3RDUN,3RGEO,1,46,3RFRO,3RBOZ,1,47,3RFOO,0,3RBLE,3RTCH, */
/* & 3RBAR,0,1,48,3RREP,3RENT,1,49,3RHOU,2RRS,3RSCH,3REDU,1,50, */
/* & 3RWIN,0,1,51,3RYEL,1RL,3RSCR,3REAM,3RSHO,2RUT,1,52, */
/* & 3RHOP,0,3RSKI,1RP,1,53,3RFUC,1RK,3RSHI,1RT,3RDAM,1RN, */
/* & 3RCUR,2RSE,1,54,3RZOR,1RK,1,55,3RGRA,3RNIT,1,"50070, */
/* & 3RSAV,1RE,1,149,3RRES,3RTOR,1,150,3RTIM,1RE,1,90, */
/* & 3RDIA,3RGNO,1,94,3REXO,3RRCI,1,105,3RINV,3RENT, */
/* & 1RI,0,1,133,3RWAI,1RT,1,128, */
/* & 3RINC,3RANT,1,95,3RANS,3RWER,1,96/ */
/* DATA VVOC1B/3RAGA,2RIN,1,57,3RNOO,2RBJ,1,58, */
/* & 3RBUG,0,3RGRI,2RPE,3RCOM,3RPLA,1,59, */
/* & 3RFEA,3RTUR,3RCOM,3RMEN,3RSUG,3RGES,3RIDE,1RA,1,60, */
/* & 3RROO,1RM,1,65,3ROBJ,3RECT,1,66,3RRNA,2RME,1,67/ */
/* DATA VVOC2/3RDEF,3RLAT,1,"50147, */
/* & 3RDES,3RCRI,3RWHA,1RT,3REXA,3RMIN,1,"50170, */
/* & 3RFIL,1RL,11,"60206,"61000,"200,0,"61002,"400,0, */
/* & "40206,"61000,"200,0, */
/* & 3RFIN,1RD,3RSEE,1RK,3RWHE,2RRE,3RSEE,0,4,"40177,"60000,-1,-1, */
/* & 3RFOL,3RLOW,2,"125,"50125, */
/* & 3RKIC,1RK,3RBIT,1RE,3RTAU,2RNT,1,"50153,3RLOW,2RER,1,"50156, */
/* & 3RPUS,1RH,3RPRE,2RSS,1,"50160,3RRIN,1RG,3RPEA,1RL,1,"50127, */
/* & 3RRUB,0,3RCAR,3RESS,3RTOU,2RCH,3RFON,3RDLE,1,"50157, */
/* & 3RSHA,2RKE,1,"50171,3RSPI,1RN,1,"50201, */
/* & 3RUNT,2RIE,3RFRE,1RE,1,"50161,3RWAL,1RK,9,"50216, */
/* & "40126,"61002,-1,-1,"40126,"61005,-1,-1/ */
/* DATA VVOC3/3RATT,3RACK,3RFIG,2RHT,3RINJ,3RURE,3RHIT,0,3RHUR,1RT, */
/* & 7,"60215,"21000,0,"200,"44002,0,"1000, */
/* & 3RBOA,2RRD,4,"40202,"21000,0,"2, */
/* & 3RBRU,2RSH,3RCLE,2RAN,5,"52130,"70130,"61002,-1,-1, */
/* & 3RBUR,1RN,3RIGN,3RITE,3RINC,3RINE,7,"60211,"61000,"20,0, */
/* & "64002,"10,0, */
/* & 3RCLI,2RMB,12,"40235,"20007,0,"4000, */
/* & "40236,"20006,0,"4000,"40234,"20000,0,"4000, */
/* & 3RCLO,2RSE,4,"40176,"61000,"10200,0, */
/* & 3RDIG,0,4,"40131,"44002,"4,0, */
/* & 3RDIS,3REMB,4,"40203,"20000,0,"2, */
/* & 3RDRI,2RNK,3RIMB,3RIBE,3RSWA,3RLLO,4,"40210,"61000,"400,0, */
/* & 3RDRO,1RP,3RREL,3REAS,11,"42221,"41000,-1,-1, */
/* & "60221,"41000,-1,-1,"61005,-1,-1, */
/* & 3REAT,0,3RCON,3RSUM,3RGOB,3RBLE,3RMUN,2RCH,3RTAS,2RTE, */
/* & 4,"40207,"75000,"2000,0, */
/* & 3REXT,3RING,3RDOU,2RSE,4,"40174,"75000,"100,0/ */
/* DATA VVOC4/3RGIV,1RE,3RHAN,1RD,3RDON,3RATE,11,"72222,"21004, */
/* & "40,0,"64222,"21000,"40,0,"61000,-1,-1, */
/* & 3RHEL,2RLO,2RHI,0,2,"2227,"50227, */
/* & 3RBLO,1RW,15,"62146,"61007,-1,-1,"61002,"4,0, */
/* & "40160,"61007,-1,-1,"40165,"61005,-1,-1, */
/* & 3RINF,3RLAT,4,"70146,"61002,"4,0, */
/* & 3RJUM,1RP,3RLEA,1RP,5,"133,"40133,"61001,-1,-1, */
/* & 3RKIL,1RL,3RMUR,3RDER,3RSLA,1RY,3RSTA,1RB,3RDIS,3RPAT, */
/* & 7,"60213,"21000,0,"200, */
/* & "44002,0,"1000, */
/* & 3RKNO,2RCK,3RRAP,0,12,"42166,"61003,-1,-1, */
/* & "40166,"61012,-1,-1,"40215,"23006,"40,0, */
/* & 3RLIG,2RHT,11,"42173,"75000,"100,0, */
/* & "60211,"61000,"100,0,"54002,"10,0, */
/* & 3RLOC,1RK,4,"40134,"20000,-1,-1/ */
/* DATA VVOC5/3RLOO,1RK,1RL,0,3RSTA,2RRE,3RGAZ,1RE, */
/* & 13,"167,"40167,"60003,-1,-1, */
/* & "40231,"61010,-1,-1,"40230,"60005,-1,-1, */
/* & 3RMEL,1RT,3RLIQ,3RUIF,4,"70145,"61002,"10,0, */
/* & 3RMOV,1RE,4,"40172,"20000,-1,-1, */
/* & 3RPUL,1RL,3RTUG,0,8,"42172,"21000,-1,-1, */
/* & "40172,"21012,-1,-1, */
/* & 3RMUN,1RG,3RHAC,1RK,3RFRO,1RB,3RDAM,3RAGE, */
/* & 5,"52212,"70212,"44002,-1,-1, */
/* & 3ROPE,1RN,11,"42175,"61000,"10200,0, */
/* & "60175,"61000,"10200,0,"54002,"4,"1000, */
/* & 3RPIC,1RK,4,"40204,"61007,"20000,"40, */
/* & 3RPLU,1RG,3RGLU,1RE,3RPAT,2RCH,4,"70152,"61002,-1,-1, */
/* & 3RPOK,1RE,3RBRE,2RAK,3RJAB,0,7,"60212,"21000,0,"200, */
/* & "44002,0,"1000, */
/* & 3RPOU,1RR,3RSPI,2RLL,11,"42223,"42000,"400,0, */
/* & "60223,"42000,"400,0,"60005,-1,-1, */
/* & 3RPUM,1RP,4,"60232,"60007,-1,-1/ */
/* DATA VVOC6/3RPUT,0,3RINS,3RERT,3RSTU,2RFF,3RPLA,2RCE, */
/* & 8,"72220,"61005,-1,-1, */
/* & "40221,"61006,-1,-1, */
/* & 3RRAI,2RSE,3RLIF,1RT,5,"52155,"40155,"61007,-1,-1, */
/* & 3RREA,1RD,3RSKI,1RM,11,"42144,"71000,"40000,0, */
/* & "60144,"71000,"40000,0,"61002,-1,-1, */
/* & 3RSTR,3RIKE,12,"60215,"23000,"40,0, */
/* & "44002,0,"1000,"42215,"23000,"40,0,"50173, */
/* & 3RSWI,2RNG,3RTHR,3RUST,7,"60214,"44000,0,"1000, */
/* & "21003,0,"200, */
/* & 3RTAK,1RE,3RGET,0,3RHOL,1RD,3RCAR,2RRY,3RREM,3ROVE, */
/* & 4,"40204,"61000,"20000,"40, */
/* & 3RTEL,1RL,3RCOM,3RMAN,3RREQ,3RUES,4,"40217,"20000,0,"2000, */
/* & 3RTHR,2ROW,3RHUR,1RL,3RCHU,2RCK,14,"60224,"44000,-1,-1, */
/* & "21003,"40,0,"60224,"44000,-1,-1,"21002,"40,0/ */
/* DATA VVOC7/3RTIE,0,3RFAS,3RTEN,11,"70162,"61004,-1,-1, */
/* & "60163,"21000,"40,0,"65002,"4,0, */
/* & 3RTUR,1RN,3RSET,0,22,"62164,"61000,"2,0, */
/* & "64002,"4,0, */
/* & "40173,"75012,"100,0,"40174,"75013,"100,0, */
/* & "60237,"61000,"2,0,"20004,-1,-1, */
/* & 3RUNL,3ROCK,7,"60135,"21000,-1,-1, */
/* & "74002,"4,0, */
/* & 3RWAK,1RE,3RSUR,3RPRI,3RALA,2RRM,3RSTA,3RRTL, */
/* & 8,"42150,"20000,"40,0, */
/* & "40150,"20007,"40,0, */
/* & 3RWAV,1RE,3RFLA,3RUNT,3RBRA,3RNDI,4,"40154,"40000,-1,-1, */
/* & 3RWIN,1RD,5,"50233,"40233,"61007,-1,-1/ */
EXTERN const integer vvoc[]
#ifdef INIT
= { 3929, 8240, 1, 70, 35418, 3819, 1, 71, 31256, 8722, 1, 72,
31201, 40000, 1, 73, 35418, 30775, 1, 74, 31329, 20800, 3260,
13000, 36844, 8000, 1, 75, 11418, 24569, 1, 76, 34105, 31165,
24185, 31165, 1, 77, 37012, 19200, 1, 78, 26321, 40000, 1, 79,
32725, 2381, 1, 80, 32213, 26085, 1, 81, 3681, 31200, 1, 82,
30535, 29000, 1, 83, 27200, 0, 28049, 32000, 1, 84, 13012, 25600,
1, 40, 14966, 24000, 1, 41, 13179, 32618, 34244, 2405, 1, 42,
3243, 17600, 1, 43, 30767, 12800, 21653, 3685, 1, 44, 5135, 21440,
19819, 8000, 3258, 9600, 1, 45, 7254, 11415, 1, 46, 10335, 3826,
1, 47, 10215, 0, 3685, 32128, 3258, 0, 1, 48, 29016, 8580, 1, 49,
13421, 29560, 30528, 8181, 1, 50, 37174, 0, 1, 51, 40212, 19200,
30538, 8053, 30735, 34400, 1, 52, 13416, 0, 30849, 25600, 1, 53,
10443, 17600, 30729, 32000, 6453, 22400, 5658, 30600, 1, 54,
42218, 17600, 1, 55, 11921, 22780, 1, 20536, 30462, 8000, 1, 149,
29019, 32618, 1, 150, 32373, 8000, 1, 90, 6761, 11775, 1, 94,
8975, 28929, 1, 105, 14982, 8580, 14400, 0, 1, 133, 36849, 32000,
1, 128, 14963, 2180, 1, 95, 2179, 37018, 1, 96, 1881, 14960, 1,
57, 23015, 3600, 1, 58, 4047, 0, 11929, 25800, 5413, 26081, 1, 59,
9801, 32858, 5413, 21014, 31247, 11419, 14565, 1600, 1, 60,
29415, 20800, 1, 65, 24090, 8140, 1, 66, 29361, 21000, 1, 67,
6606, 19260, 1, 20583, 6619, 5529, 37121, 32000, 8961, 21174, 1,
20600, 9972, 19200, 11, 24710, 25088, 128, 0, 25090, 256, 0,
16518, 25088, 128, 0, 9974, 6400, 30605, 17600, 37125, 29000,
30605, 0, 4, 16511, 24576, -1, -1, 10212, 19823, 2, 85, 20565,
17963, 17600, 3580, 8000, 32061, 23200, 1, 20587, 19823, 8720, 1,
20590, 26459, 12800, 26325, 31160, 1, 20592, 29174, 11200, 25801,
19200, 1, 20567, 29642, 0, 4858, 8779, 32621, 5120, 10214, 6885,
1, 20591, 30721, 17800, 1, 20601, 31049, 22400, 1, 20609, 34180,
14600, 10325, 8000, 1, 20593, 36852, 17600, 9, 20622, 16470,
25090, -1, -1, 16470, 25093, -1, -1, 2420, 1731, 9967, 13600,
14970, 34325, 13180, 0, 13658, 32000, 7, 24717, 8704, 0, 128,
18434, 0, 512, 3801, 28960, 4, 16514, 8704, 0, 2, 3941, 30720,
5285, 2160, 5, 21592, 28760, 25090, -1, -1, 4058, 22400, 14694,
15205, 14963, 14965, 7, 24713, 25088, 16, 0, 26626, 8, 0, 5289,
20880, 12, 16541, 8199, 0, 2048, 16542, 8198, 0, 2048, 16540,
8192, 0, 2048, 5295, 30600, 4, 16510, 25088, 4224, 0, 6767, 0, 4,
16473, 18434, 4, 0, 6779, 8522, 4, 16515, 8192, 0, 2, 7129, 22840,
14922, 14485, 31321, 19695, 4, 16520, 25088, 256, 0, 7135, 25600,
29012, 8059, 11, 17553, 16896, -1, -1, 24721, 16896, -1, -1,
25093, -1, -1, 8060, 0, 5414, 31253, 11802, 3685, 21654, 5120,
32059, 32200, 4, 16519, 31232, 1024, 0, 8980, 14967, 7021, 30600,
4, 16508, 31232, 64, 0, 11582, 8000, 12854, 6400, 7014, 2405, 11,
29842, 8708, 32, 0, 26770, 8704, 32, 0, 25088, -1, -1, 13012,
19800, 13160, 0, 2, 1175, 20631, 3695, 36800, 15, 25702, 25095,
-1, -1, 25090, 4, 0, 16496, 25095, -1, -1, 16501, 25093, -1, -1,
14966, 19260, 4, 28774, 25090, 4, 0, 16853, 25600, 19401, 25600,
5, 91, 16475, 25089, -1, -1, 17972, 19200, 21658, 6618, 30881,
40000, 31201, 3200, 6779, 25660, 7, 24715, 8704, 0, 128, 18434, 0,
512, 18175, 5240, 28856, 0, 12, 17526, 25091, -1, -1, 16502,
25098, -1, -1, 16525, 9734, 32, 0, 19567, 13600, 11, 17531, 31232,
64, 0, 24713, 25088, 64, 0, 22530, 8, 0, 19803, 17600, 4, 16476,
8192, -1, -1, 19815, 17600, 19200, 0, 31201, 29000, 11266, 8000,
13, 119, 16503, 24579, -1, -1, 16537, 25096, -1, -1, 16536, 24581,
-1, -1, 21012, 32000, 19577, 33966, 4, 28773, 25090, 8, 0, 21422,
8000, 4, 16506, 8192, -1, -1, 26452, 19200, 32847, 0, 8, 17530,
8704, -1, -1, 16506, 8714, -1, -1, 21654, 11200, 12843, 17600,
10335, 3200, 6453, 1885, 5, 21642, 28810, 18434, -1, -1, 24645,
22400, 11, 17533, 25088, 4224, 0, 24701, 25088, 4224, 0, 22530, 4,
512, 25963, 17600, 4, 16516, 25095, 8192, 32, 26101, 11200,
11701, 8000, 25660, 5120, 4, 28778, 25090, -1, -1, 26211, 8000,
3925, 2040, 16042, 0, 7, 24714, 8704, 0, 128, 18434, 0, 512,
26221, 28800, 31049, 19680, 11, 17555, 17408, 256, 0, 24723,
17408, 256, 0, 24581, -1, -1, 26453, 25600, 4, 24730, 24583, -1,
-1, 26460, 0, 14979, 8740, 31221, 9840, 26081, 5000, 8, 29840,
25093, -1, -1, 16529, 25094, -1, -1, 28849, 30600, 19566, 32000,
5, 21613, 16493, 25095, -1, -1, 29001, 6400, 30849, 20800, 11,
17508, 29184, 16384, 0, 24676, 29184, 16384, 0, 25090, -1, -1,
31218, 14845, 12, 24717, 9728, 32, 0, 18434, 0, 512, 17549, 9728,
32, 0, 20603, 31329, 22680, 32338, 34380, 7, 24716, 18432, 0, 512,
8707, 0, 128, 32051, 8000, 11420, 0, 13412, 6400, 4858, 29800,
29013, 24885, 4, 16516, 25088, 8192, 32, 32212, 19200, 5413,
20854, 29017, 33819, 4, 16527, 8192, 0, 1024, 32338, 24920, 13658,
19200, 5141, 5240, 14, 24724, 18432, -1, -1, 8707, 32, 0, 24724,
18432, -1, -1, 8706, 32, 0, 32365, 0, 9659, 32214, 11, 28786,
25092, -1, -1, 24691, 8704, 32, 0, 27138, 4, 0, 32858, 22400,
30620, 0, 22, 25716, 25088, 2, 0, 26626, 4, 0, 16507, 31242, 64,
0, 16508, 31243, 64, 0, 24735, 25088, 2, 0, 8196, -1, -1, 34172,
24131, 7, 24669, 8704, -1, -1, 30722, 4, 0, 36851, 8000, 31258,
26329, 2081, 29320, 31201, 29612, 8, 17512, 8192, 32, 0, 16488,
8199, 32, 0, 36862, 8000, 10081, 34180, 3921, 22569, 4, 16492,
16384, -1, -1, 37174, 6400, 5, 20635, 16539, 25095, -1, -1, -1 }
#endif
;
/* OBJECTS-- MAPS OBJECTS TO OBJECT INDICES */
/* SAME FORMAT AS AVOC. */
/* THE FOLLOWING DATA STATEMENT WAS ORIGINALLY: */
/* DATA OVOC1/3RBAG,0,1,25,100,3RSAC,1RK,1,3RGAR,3RLIC,2, */
/* & 3RCLO,2RVE,2,3RFOO,1RD,3,3RSAN,3RDWI,3,3RLUN,2RCH,3, */
/* & 3RDIN,3RNER,3, */
/* & 3RGUN,1RK,4,55,3RPIE,2RCE,4,143,186,3RSLA,1RG,4,3RCOA,1RL,5, */
/* & 3RPIL,1RE,5,18,38,78,87,88,122,3RHEA,1RP,5, */
/* & 3RFIG,3RURI,6, */
/* & 3RMAC,3RHIN,7,3RPDP,2R10,7,3RPDP,2R11,7,3RDRY,2RER,7, */
/* & 3RLID,0,7,3RDIA,3RMON,8,3RCAS,1RE,9,123,3RBOT,3RTLE,10,121, */
/* & 3RCON,3RTAI,10,3RWAT,2RER,11,209,3RQUA,3RNTI,11,209, */
/* & 3RLIQ,3RUID,11,209,3RH2O,0,11,209, */
/* & 3RROP,1RE,12,101,3RHEM,1RP,12,3RCOI,1RL,12,110, */
/* & 3RKNI,2RFE,13,21,3RBLA,2RDE,13,14,3RSWO,2RRD,14,3RORC,3RHRI,14, */
/* & 3RGLA,3RMDR,14,3RLAM,1RP,15,16,22,3RLAN,3RTER,15,16,22, */
/* & 3RRUG,0,17,3RCAR,3RPET,17, */
/* & 3RLEA,3RVES,18,3RLEA,1RF,18,3RTRO,2RLL,19, */
/* & 3RAXE,0,20,3RDIN,3RNER,3/ */
/* DATA OVOC2/3RKEY,1RS,23,3RKEY,0,23, */
/* & 3RSET,0,23,3RBON,2RES,24,3RSKE,3RLET,24,3RBOD,1RY,24,73, */
/* & 3RCOI,2RNS,25,3RBAR,0,26,165,168, */
/* & 3RNEC,3RKLA,27,3RPEA,3RRLS,27,3RMIR,3RROR,28,29,212, */
/* & 3RICE,0,30,3RMAS,1RS,30,3RGLA,3RCIE,30,3RRUB,1RY,31, */
/* & 3RTRI,3RDEN,32,3RFOR,1RK,32,3RCOF,3RFIN,33,3RCAS,3RKET,33, */
/* & 3RTOR,2RCH,34,3RCAG,1RE,35,36,124,125,3RDUM,3RBWA,35,36, */
/* & 3RBAS,3RKET,35,36,98,113,3RBRA,3RCEL,37, */
/* & 3RJEW,2REL,37,3RTIM,3RBER,38,3RBOX,0,39,53,105,3RSTR,3RADI,40, */
/* & 3RVIO,3RLIN,40,3RENG,3RRAV,41,3RINS,3RCRI,41,44,3RGHO,2RST,42, */
/* & 3RSPI,3RRIT,42,3RFIE,2RND,42,3RGRA,2RIL,43,3RPRA,3RYER,44,47, */
/* & 3RTRU,2RNK,45,3RCHE,2RST,45,3RBEL,1RL,46, */
/* & 3RBOO,1RK,47,49,114,115,116,117,3RBIB,2RLE,47/ */
/* DATA OVOC3/3RGOO,3RDBO,47,3RCAN,3RDLE,48,3RPAI,1RR,48, */
/* & 3RGUI,3RDEB,49, */
/* & 3RGUI,2RDE,49,3RPAP,2RER,50,122,143,186,3RNEW,3RSPA,50, */
/* & 3RISS,2RUE,50,3RREP,3RORT,50,3RMAG,3RAZI,50,3RNEW,1RS,50, */
/* & 3RMAT,3RCHB,51, */
/* & 3RMAT,2RCH,51,3RMAT,3RCHE,51,3RADV,3RERT,52,3RPAM,3RPHL,52, */
/* & 3RLEA,3RFLE,52,3RBOO,3RKLE,52,3RMAI,3RLBO,53, */
/* & 3RTUB,1RE,54,3RTOO,3RTHP,54,3RPUT,2RTY,55,3RMAT,3RERI,55, */
/* & 3RGLU,1RE,55,3RWRE,3RNCH,56,3RSCR,3REWD,57, */
/* & 3RCYC,3RLOP,58,3RMON,3RSTE,58,3RCHA,3RLIC,59,3RCUP,0,59, */
/* & 3RGOB,3RLET,59,3RPAI,3RNTI,60,149,3RART,0,60,149, */
/* & 3RCAN,3RVAS,60,3RPIC,3RTUR,60,3RWOR,1RK,60, */
/* & 3RMAS,3RTER,60,215,3RTHI,2REF,61,3RROB,3RBER,61, */
/* & 3RCRI,3RMIN,61,3RBAN,3RDIT,61,3RCRO,2ROK,61,3RGEN,1RT,61, */
/* & 3RGEN,3RTLE,61,3RMAN,0,61,3RTHU,1RG,61, */
/* & 3RBAG,3RMAN,61,3RSTI,3RLLE,62/ */
/* DATA OVOC4/3RWIN,3RDOW,63,3RBOL,1RT,64,3RNUT,0,64, */
/* & 3RGRA,2RTE,65,3RGRA,3RTIN,65,3RDOO,1RR,66,67,68,69, */
/* & 164,172,173,174,175,189,3RTRA,3RPDO,66, */
/* & 3RTRA,3RP$D,66,3RSWI,3RTCH,70,76,79,80,81,82,170, */
/* & 3RHEA,1RD,71,120,3RCOR,3RPSE,72,73,3RBOD,3RIES,73, */
/* & 3RDAM,0,74,3RGAT,2RES,74,76,3RGAT,1RE,74,76, */
/* & 3RFCD,0,74,3RRAI,1RL,75,3RRAI,3RLIN,75, */
/* & 3RBUT,3RTON,76,79,80,81,82,127,128,129,170,176, */
/* & 3RBUB,3RBLE,77,3RLEA,1RK,78,3RDRI,1RP,78, */
/* & 3RHOL,1RE,78,107, */
/* & 3RBAT,0,83,3RRAI,3RNBO,84, */
/* & 3RPOT,0,85,3RSTA,3RTUE,86,3RSCU,3RLPT,86,3RROC,1RK,86, */
/* & 3RBOA,1RT,87,88,90,3RPLA,3RSTI,87,88, */
/* & 3RPUM,1RP,89/ */
/* DATA OVOC5/3RAIR,3RPUM,89,3RAIR,3R$PU,89,3RLAB,2REL,91,112, */
/* & 3RFIN,3REPR,91,3RSTI,2RCK,92,3RBAR,3RREL,93,3RBUO,1RY,94, */
/* & 3REME,3RRAL,95,3RSHO,3RVEL,96,3RGUA,2RNO,97,3RCRA,1RP,97, */
/* & 3RSHI,1RT,97,3RHUN,1RK,97,3RBAL,3RLOO,98,113, */
/* & 3RREC,3REPT,99,3RWIR,1RE,101,110, */
/* & 3RHOO,1RK,102,103,3RZOR,3RKMI,104,148,3RCOI,1RN,104, */
/* & 3RSAF,1RE,105,3RCAR,1RD,106,188,3RNOT,1RE,106,186, */
/* & 3RSLO,1RT,107,187,3RCRO,2RWN,108,3RBRI,2RCK,109, */
/* & 3RFUS,1RE,110,3RGNO,2RME,111,152, */
/* & 3RSTA,2RMP,118, */
/* & 3RTOM,1RB,119,3RCRY,2RPT,119,3RGRA,2RVE,119,3RHEA,2RDS,120, */
/* & 3RPOL,2RES,120,3RIMP,3RLEM,120/ */
/* DATA OVOC6/3RLOS,3RERS,120,3RCOK,2RES,121, */
/* & 3RLIS,3RTIN,122,3RSTA,2RCK,122, */
/* & 3RPRI,3RNTO,122, */
/* & 3RSPH,3RERE,126,3RBAL,1RL,126, */
/* & 3RETC,3RHIN,130,131, */
/* & 3RWAL,2RLS,130,131,198,205,206,207,208,3RWAL,1RL, */
/* & 130,131,159,160,161,162,163,164,198,205,206,207,208, */
/* & 3RFLA,2RSK,132,3RPOO,1RL,133,3RSEW,3RAGE,133, */
/* & 3RTIN,0,134,3RSAF,3RFRO,134,3RSPI,3RCES,134,3RTAB,2RLE,135, */
/* & 3RPOS,1RT,136,166,167,3RPOS,2RTS,136,3RBUC,3RKET,137, */
/* & 3RCAK,1RE,138,139,140,141,3RICI,2RNG,139,140,141, */
/* & 3RROB,2ROT,142,3RROB,2RBY,142, */
/* & 3RC3P,1RO,142,3RR2D,1R2,142/ */
/* DATA OVOC6A/3RPAN,2REL,159,160,161,162,163,164,213, */
/* & 3RPOL,1RE,166,167,3RTBA,1RR,168,3RT$B,2RAR,168, */
/* & 3RARR,2ROW,169,3RPOI,2RNT,169,3RBEA,1RM,171, */
/* & 3RDIA,1RL,177,3RSUN,3RDIA,177,1R1,0,178, */
/* & 3RONE,0,178,1R2,0,179,3RTWO,0,179,1R3,0,180, */
/* & 3RTHR,2REE,180,1R4,0,181,3RFOU,1RR,181,1R5,0,182, */
/* & 3RFIV,1RE,182,1R6,0,183,3RSIX,0,183,1R7,0,184, */
/* & 3RSEV,2REN,184,1R8,0,185,3REIG,2RHT,185, */
/* & 3RWAR,3RNIN,186,3RSLI,1RT,187, */
/* & 2RIT,0,192,3RTHA,1RT,192,3RTHI,1RS,192/ */
/* DATA OVOC7/2RME,0,193,3RMYS,3RELF,193,3RCRE,3RTIN,193, */
/* & 3RALL,0,194,3REVE,3RRYT,194, */
/* & 3RTRE,3RASU,195,3RVAL,3RUAB,195,3RSAI,3RLOR,196,3RTEE,2RTH,197, */
/* & 3RGRU,1RE,199,3RHAN,1RD,200,3RHAN,2RDS,200, */
/* & 3RLUN,2RGS,201,3RAIR,0,201,3RAVI,3RATO,202, */
/* & 3RFLY,2RER,202,3RTRE,1RE,144,145,204, */
/* & 3RCLI,2RFF,146,147,3RLED,2RGE,146,147,3RPOR,3RTRA,149, */
/* & 3RSTA,2RCK,148,3RBIL,2RLS,148, */
/* & 3RVAU,2RLT,150,3RCUB,1RE,150,3RLET,3RTER,67,150, */
/* & 3RCUR,3RTAI,151,3RLIG,2RHT,151,3RNES,1RT,153, */
/* & 3REGG,0,154,155,3RBAU,3RBLE,156,3RCAN,3RARY,157,158, */
/* & 3RBIR,1RD,203,3RSON,3RGBI,203, */
/* & 3RGUA,2RRD,210,3RGUA,3RRDI,210,3RROS,1RE,211, */
/* & 3RSTR,3RUCT,212,3RCHA,3RNNE,214, */
/* & 3RKEE,3RPER,215,3RLAD,3RDER,216/ */
EXTERN const integer ovoc[]
#ifdef INIT
= { 3247, 0, 1, 25, 100, 30443, 17600, 1, 11258, 19563, 2, 5295,
35400, 2, 10215, 6400, 3, 30454, 7329, 3, 20054, 5120, 3, 6774,
22618, 3, 12054, 17600, 4, 55, 25965, 5000, 4, 143, 186, 30881,
11200, 4, 5401, 19200, 5, 25972, 8000, 5, 18, 38, 78, 87, 88, 122,
13001, 25600, 5, 9967, 34329, 6, 20843, 13174, 7, 25776, 50800,
7, 25776, 50840, 7, 7145, 8720, 7, 19564, 0, 7, 6761, 21414, 8,
4859, 8000, 9, 123, 3820, 32485, 10, 121, 5414, 32049, 10, 36860,
8720, 11, 209, 28041, 23209, 11, 209, 19577, 33964, 11, 209,
14095, 0, 11, 209, 29416, 8000, 12, 101, 13013, 25600, 12, 5409,
19200, 12, 110, 18169, 9800, 13, 21, 3681, 6600, 13, 14, 31335,
28960, 14, 24723, 13529, 14, 11681, 20978, 14, 19253, 25600, 15,
16, 22, 19254, 32218, 15, 16, 22, 29647, 0, 17, 4858, 25820, 17,
19401, 35419, 18, 19401, 9600, 18, 32735, 19680, 19, 2565, 0, 20,
6774, 22618, 3, 17825, 30400, 23, 17825, 0, 23, 30620, 0, 23,
3814, 8760, 24, 30845, 19420, 24, 3804, 40000, 24, 73, 5409,
23160, 25, 3258, 0, 26, 165, 168, 22603, 18081, 27, 25801, 29299,
27, 21178, 29418, 28, 29, 212, 14525, 0, 30, 20859, 30400, 30,
11681, 5165, 30, 29642, 40000, 31, 32729, 6614, 32, 10218, 17600,
32, 5406, 9974, 33, 4859, 17820, 33, 32618, 5120, 34, 4847, 8000,
35, 36, 124, 125, 7253, 4121, 35, 36, 3259, 17820, 35, 36, 98,
113, 3921, 5012, 37, 16223, 8480, 37, 32373, 3418, 38, 3824, 0,
39, 53, 105, 31218, 1769, 40, 35575, 19574, 40, 8567, 28862, 41,
14979, 5529, 41, 44, 11535, 31200, 42, 31049, 29180, 42, 9965,
22560, 42, 11921, 14880, 43, 26321, 40218, 44, 47, 32741, 22840,
45, 5125, 31200, 45, 3412, 19200, 46, 3815, 17600, 47, 49, 114,
115, 116, 117, 3562, 19400, 47, 11815, 6495, 47, 4854, 6885, 48,
25649, 28800, 48, 12049, 6602, 49, 12049, 6600, 49, 25656, 8720,
50, 122, 143, 186, 22623, 31041, 50, 15179, 33800, 50, 29016,
24740, 50, 20847, 2649, 50, 22623, 30400, 50, 20860, 5122, 51,
20860, 5120, 51, 20860, 5125, 51, 1782, 8740, 52, 25653, 25932,
52, 19401, 10085, 52, 3815, 18085, 52, 20849, 19295, 53, 32842,
8000, 54, 32615, 32336, 54, 26460, 33000, 55, 20860, 8729, 55,
11701, 8000, 55, 37525, 22528, 56, 30538, 8924, 57, 5803, 19816,
58, 21414, 31205, 58, 5121, 19563, 59, 5656, 0, 59, 11802, 19420,
59, 25649, 23209, 60, 149, 2340, 0, 60, 149, 4854, 35259, 60,
25963, 32858, 60, 37418, 17600, 60, 20859, 32218, 60, 215, 32329,
8240, 61, 29402, 3418, 61, 5529, 21175, 61, 3254, 6780, 61, 5535,
24440, 61, 11414, 32000, 61, 11414, 32485, 61, 20854, 0, 61,
32341, 11200, 61, 3247, 20854, 61, 31209, 19685, 62, 37174, 7023,
63, 3812, 32000, 64, 23260, 0, 64, 11921, 32200, 65, 11921, 32374,
65, 7015, 28800, 66, 67, 68, 69, 164, 172, 173, 174, 175, 189,
32721, 25775, 66, 32721, 26684, 66, 31329, 32128, 70, 76, 79, 80,
81, 82, 170, 13001, 6400, 71, 120, 5418, 26365, 72, 73, 3804,
14619, 73, 6453, 0, 74, 11260, 8760, 74, 76, 11260, 8000, 74, 76,
9724, 0, 74, 28849, 19200, 75, 28849, 19574, 75, 4060, 32614, 76,
79, 80, 81, 82, 127, 128, 129, 170, 176, 4042, 3685, 77, 19401,
17600, 78, 7129, 25600, 78, 13412, 8000, 78, 107, 3260, 0, 83,
28849, 22495, 84, 26220, 0, 85, 31201, 32845, 86, 30541, 19860,
86, 29403, 17600, 86, 3801, 32000, 87, 88, 90, 26081, 31209, 87,
88, 26453, 25600, 89, 1978, 26453, 89, 1978, 43861, 89, 19242,
8480, 91, 112, 9974, 8658, 91, 31209, 5240, 92, 3258, 29012, 93,
4055, 40000, 94, 8525, 28852, 95, 30735, 35412, 96, 12041, 23000,
97, 5521, 25600, 97, 30729, 32000, 97, 13654, 17600, 97, 3252,
19815, 98, 113, 29003, 8660, 99, 37178, 8000, 101, 110, 13415,
17600, 102, 103, 42218, 18129, 104, 148, 5409, 22400, 104, 30446,
8000, 105, 4858, 6400, 106, 188, 23020, 8000, 106, 186, 30895,
32000, 107, 187, 5535, 37360, 108, 3929, 5240, 109, 10459, 8000,
110, 11775, 21000, 111, 152, 31201, 21440, 118, 32613, 3200, 119,
5545, 26400, 119, 11921, 35400, 119, 13001, 7160, 120, 26212,
8760, 120, 14936, 19413, 120, 19819, 8739, 120, 5411, 8760, 121,
19579, 32374, 122, 31201, 5240, 122, 26329, 23215, 122, 31048,
8725, 126, 3252, 19200, 126, 8803, 13174, 130, 131, 36852, 19960,
130, 131, 198, 205, 206, 207, 208, 36852, 19200, 130, 131, 159,
160, 161, 162, 163, 164, 198, 205, 206, 207, 208, 10081, 30840,
132, 26215, 19200, 133, 30623, 1885, 133, 32374, 0, 134, 30446,
10335, 134, 31049, 5019, 134, 32042, 19400, 135, 26219, 32000,
136, 166, 167, 26219, 32760, 136, 4043, 17820, 137, 4851, 8000,
138, 139, 140, 141, 14529, 22680, 139, 140, 141, 29402, 24800,
142, 29402, 4200, 142, 6136, 24000, 142, 30084, 51200, 142, 25654,
8480, 159, 160, 161, 162, 163, 164, 213, 26212, 8000, 166, 167,
32081, 28800, 168, 33082, 2320, 168, 2338, 24920, 169, 26209,
23200, 169, 3401, 20800, 171, 6761, 19200, 177, 31254, 6761, 177,
49600, 0, 178, 24565, 0, 178, 51200, 0, 179, 32935, 0, 179, 52800,
0, 180, 32338, 8200, 180, 54400, 0, 181, 10221, 28800, 181,
56000, 0, 182, 9982, 8000, 182, 57600, 0, 183, 30784, 0, 183,
59200, 0, 184, 30622, 8560, 184, 60800, 0, 185, 8367, 13600, 185,
36858, 22774, 186, 30889, 32000, 187, 15200, 0, 192, 32321, 32000,
192, 32329, 30400, 192, 21000, 0, 193, 21819, 8486, 193, 5525,
32374, 193, 2092, 0, 194, 8885, 29820, 194, 32725, 2381, 195,
35252, 33642, 195, 30449, 19818, 196, 32205, 32320, 197, 11941,
8000, 199, 12854, 6400, 200, 12854, 7160, 200, 20054, 11960, 201,
1978, 0, 201, 2489, 2415, 202, 10105, 8720, 202, 32725, 8000, 144,
145, 204, 5289, 9840, 146, 147, 19404, 11400, 146, 147, 26218,
32721, 149, 31201, 5240, 148, 3572, 19960, 148, 35261, 20000, 150,
5642, 8000, 150, 19420, 32218, 67, 150, 5658, 32049, 151, 19567,
13600, 151, 22619, 32000, 153, 8287, 0, 154, 155, 3261, 3685, 156,
4854, 2345, 157, 158, 3578, 6400, 203, 31014, 11289, 203, 12041,
28960, 210, 12041, 28969, 210, 29419, 8000, 211, 31218, 33740,
212, 5121, 22965, 214, 17805, 25818, 215, 19244, 6618, 216, -1 }
#endif
;
#endif