data.c revision 1.5
1 /* $NetBSD: data.c,v 1.5 1995/03/23 08:33:17 cgd Exp $ */ 2 3 /*- 4 * Copyright (c) 1988 The Regents of the University of California. 5 * All rights reserved. 6 * 7 * Redistribution and use in source and binary forms, with or without 8 * modification, are permitted provided that the following conditions 9 * are met: 10 * 1. Redistributions of source code must retain the above copyright 11 * notice, this list of conditions and the following disclaimer. 12 * 2. Redistributions in binary form must reproduce the above copyright 13 * notice, this list of conditions and the following disclaimer in the 14 * documentation and/or other materials provided with the distribution. 15 * 3. All advertising materials mentioning features or use of this software 16 * must display the following acknowledgement: 17 * This product includes software developed by the University of 18 * California, Berkeley and its contributors. 19 * 4. Neither the name of the University nor the names of its contributors 20 * may be used to endorse or promote products derived from this software 21 * without specific prior written permission. 22 * 23 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 24 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 25 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 26 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 27 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 28 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 29 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 30 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 31 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 32 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 33 * SUCH DAMAGE. 34 */ 35 36 #ifndef lint 37 #if 0 38 static char sccsid[] = "@(#)data.c 5.3 (Berkeley) 5/13/91"; 39 #else 40 static char rcsid[] = "$NetBSD: data.c,v 1.5 1995/03/23 08:33:17 cgd Exp $"; 41 #endif 42 #endif /* not lint */ 43 44 /* data.c Larn is copyrighted 1986 by Noah Morgan. */ 45 #define NODEFS 46 #include "header.h" 47 48 /* 49 class[c[LEVEL]-1] gives the correct name of the players experience level 50 */ 51 static char aa1[] = " mighty evil master"; 52 static char aa2[] = "apprentice demi-god"; 53 static char aa3[] = " minor demi-god "; 54 static char aa4[] = " major demi-god "; 55 static char aa5[] = " minor deity "; 56 static char aa6[] = " major deity "; 57 static char aa7[] = " novice guardian "; 58 static char aa8[] = "apprentice guardian"; 59 static char aa9[] = " The Creator "; 60 char *class[]= 61 { " novice explorer ", "apprentice explorer", " practiced explorer",/* -3*/ 62 " expert explorer ", " novice adventurer", " adventurer ",/* -6*/ 63 "apprentice conjurer", " conjurer ", " master conjurer ",/* -9*/ 64 " apprentice mage ", " mage ", " experienced mage ",/* -12*/ 65 " master mage ", " apprentice warlord", " novice warlord ",/* -15*/ 66 " expert warlord ", " master warlord ", " apprentice gorgon ",/* -18*/ 67 " gorgon ", " practiced gorgon ", " master gorgon ",/* -21*/ 68 " demi-gorgon ", " evil master ", " great evil master ",/* -24*/ 69 aa1 , aa1 , aa1 ,/* -27*/ 70 aa1 , aa1 , aa1 ,/* -30*/ 71 aa1 , aa1 , aa1 ,/* -33*/ 72 aa1 , aa1 , aa1 ,/* -36*/ 73 aa1 , aa1 , aa1 ,/* -39*/ 74 aa2 , aa2 , aa2 ,/* -42*/ 75 aa2 , aa2 , aa2 ,/* -45*/ 76 aa2 , aa2 , aa2 ,/* -48*/ 77 aa3 , aa3 , aa3 ,/* -51*/ 78 aa3 , aa3 , aa3 ,/* -54*/ 79 aa3 , aa3 , aa3 ,/* -57*/ 80 aa4 , aa4 , aa4 ,/* -60*/ 81 aa4 , aa4 , aa4 ,/* -63*/ 82 aa4 , aa4 , aa4 ,/* -66*/ 83 aa5 , aa5 , aa5 ,/* -69*/ 84 aa5 , aa5 , aa5 ,/* -72*/ 85 aa5 , aa5 , aa5 ,/* -75*/ 86 aa6 , aa6 , aa6 ,/* -78*/ 87 aa6 , aa6 , aa6 ,/* -81*/ 88 aa6 , aa6 , aa6 ,/* -84*/ 89 aa7 , aa7 , aa7 ,/* -87*/ 90 aa8 , aa8 , aa8 ,/* -90*/ 91 aa8 , aa8 , aa8 ,/* -93*/ 92 " earth guardian ", " air guardian ", " fire guardian ",/* -96*/ 93 " water guardian ", " time guardian ", " ethereal guardian ",/* -99*/ 94 aa9 , aa9 , aa9 ,/* -102*/ 95 }; 96 97 /* 98 table of experience needed to be a certain level of player 99 skill[c[LEVEL]] is the experience required to attain the next level 100 */ 101 #define MEG 1000000 102 long skill[] = { 103 0, 10, 20, 40, 80, 160, 320, 640, 1280, 2560, 5120, /* 1-11 */ 104 10240, 20480, 40960, 100000, 200000, 400000, 700000, 1*MEG, /* 12-19 */ 105 2*MEG,3*MEG,4*MEG,5*MEG,6*MEG,8*MEG,10*MEG, /* 20-26 */ 106 12*MEG,14*MEG,16*MEG,18*MEG,20*MEG,22*MEG,24*MEG,26*MEG,28*MEG, /* 27-35 */ 107 30*MEG,32*MEG,34*MEG,36*MEG,38*MEG,40*MEG,42*MEG,44*MEG,46*MEG, /* 36-44 */ 108 48*MEG,50*MEG,52*MEG,54*MEG,56*MEG,58*MEG,60*MEG,62*MEG,64*MEG, /* 45-53 */ 109 66*MEG,68*MEG,70*MEG,72*MEG,74*MEG,76*MEG,78*MEG,80*MEG,82*MEG, /* 54-62 */ 110 84*MEG,86*MEG,88*MEG,90*MEG,92*MEG,94*MEG,96*MEG,98*MEG,100*MEG, /* 63-71 */ 111 105*MEG,110*MEG,115*MEG,120*MEG, 125*MEG, 130*MEG, 135*MEG, 140*MEG, /* 72-79 */ 112 145*MEG,150*MEG,155*MEG,160*MEG, 165*MEG, 170*MEG, 175*MEG, 180*MEG, /* 80-87 */ 113 185*MEG,190*MEG,195*MEG,200*MEG, 210*MEG, 220*MEG, 230*MEG, 240*MEG, /* 88-95 */ 114 250*MEG,260*MEG,270*MEG,280*MEG, 290*MEG, 300*MEG /* 96-101*/ 115 }; 116 #undef MEG 117 118 char *lpbuf,*lpnt,*inbuffer,*lpend; /* input/output pointers to the buffers */ 119 struct cel *cell; /* pointer to the dungeon storage */ 120 short hitp[MAXX][MAXY]; /* monster hp on level */ 121 short iarg[MAXX][MAXY]; /* arg for the item array */ 122 char item[MAXX][MAXY]; /* objects in maze if any */ 123 char know[MAXX][MAXY]; /* 1 or 0 if here before */ 124 char mitem[MAXX][MAXY]; /* monster item array */ 125 char moved[MAXX][MAXY]; /* monster movement flags */ 126 char stealth[MAXX][MAXY]; /* 0=sleeping 1=awake monst*/ 127 char iven[26]; /* inventory for player */ 128 short ivenarg[26]; /* inventory for player */ 129 char lastmonst[40]; /* this has the name of the current monster */ 130 char beenhere[MAXLEVEL+MAXVLEVEL]={0}; /* 1 if have been on this level */ 131 char VERSION=VER; /* this is the present version # of the program */ 132 char SUBVERSION=SUBVER; 133 char nosignal=0; /* set to 1 to disable the signals from doing anything */ 134 char predostuff=0; /* 2 means that the trap handling routines must do a 135 showplayer() after a trap. 0 means don't showplayer() 136 0 - we are in create player screen 137 1 - we are in welcome screen 138 2 - we are in the normal game */ 139 char loginname[20]; /* players login name */ 140 char logname[LOGNAMESIZE]; /* players name storage for scoring */ 141 char sex=1; /* default is a man 0=woman */ 142 char boldon=1; /* 1=bold objects 0=inverse objects */ 143 char ckpflag=0; /* 1 if want checkpointing of game, 0 otherwise */ 144 char cheat=0; /* 1 if the player has fudged save file */ 145 char level=0; /* cavelevel player is on = c[CAVELEVEL] */ 146 char wizard=0; /* the wizard mode flag */ 147 short lastnum=0; /* the number of the monster last hitting player */ 148 short hitflag=0; /* flag for if player has been hit when running */ 149 short hit2flag=0; /* flag for if player has been hit when running */ 150 short hit3flag=0; /* flag for if player has been hit flush input */ 151 short playerx,playery; /* the room on the present level of the player */ 152 short lastpx,lastpy; /* 0 --- MAXX-1 or 0 --- MAXY-1 */ 153 short oldx,oldy; 154 short lasthx=0,lasthy=0; /* location of monster last hit by player */ 155 short nobeep=0; /* true if program is not to beep */ 156 unsigned long randx=33601; /* the random number seed */ 157 long initialtime=0; /* time playing began */ 158 long gtime=0; /* the clock for the game */ 159 long outstanding_taxes=0; /* present tax bill from score file */ 160 long c[100],cbak[100]; /* the character description arrays */ 161 int enable_scroll=0; /* constant for enabled/disabled scrolling regn */ 162 char aborted[] = " aborted"; 163 struct sphere *spheres=0; /*pointer to linked list for spheres of annihilation*/ 164 char *levelname[]= 165 { " H"," 1"," 2"," 3"," 4"," 5"," 6"," 7"," 8"," 9","10","V1","V2","V3" }; 166 167 char objnamelist[]=" ATOP%^F&^+M=%^$$f*OD#~][[)))(((||||||||{?!BC}o:@.<<<<EVV))([[]]](^ [H*** ^^ S tsTLc............................................"; 168 char monstnamelist[]=" BGHJKOScjtAELNQRZabhiCTYdegmvzFWflorXV pqsyUkMwDDPxnDDuD ..............................................................."; 169 char *objectname[]= 170 { 0,"a holy altar","a handsome jewel encrusted throne","the orb","a pit", 171 "a staircase leading upwards","an elevator going up","a bubbling fountain", 172 "a great marble statue","a teleport trap","the college of Larn", 173 "a mirror","the DND store","a staircase going down","an elevator going down", 174 "the bank of Larn","the 5th branch of the Bank of Larn", 175 "a dead fountain","gold","an open door","a closed door", 176 "a wall","The Eye of Larn","plate mail","chain mail","leather armor", 177 "a sword of slashing","Bessman's flailing hammer","a sunsword", 178 "a two handed sword","a spear","a dagger", 179 "ring of extra regeneration","a ring of regeneration","a ring of protection", 180 "an energy ring","a ring of dexterity","a ring of strength", 181 "a ring of cleverness","a ring of increase damage","a belt of striking", 182 "a magic scroll","a magic potion","a book","a chest", 183 "an amulet of invisibility","an orb of dragon slaying", 184 "a scarab of negate spirit","a cube of undead control", 185 "device of theft prevention","a brilliant diamond","a ruby", 186 "an enchanting emerald","a sparkling sapphire","the dungeon entrance", 187 "a volcanic shaft leaning downward","the base of a volcanic shaft", 188 "a battle axe","a longsword","a flail","ring mail","studded leather armor", 189 "splint mail","plate armor","stainless plate armor","a lance of death", 190 "an arrow trap","an arrow trap","a shield","your home", 191 "gold","gold","gold","a dart trap", 192 "a dart trap","a trapdoor","a trapdoor","the local trading post", 193 "a teleport trap", "a massive throne", 194 "a sphere of annihilation","a handsome jewel encrusted throne", 195 "the Larn Revenue Service","a fortune cookie","","","","","","", 196 "","","","","","","","","","","","","","","","","","","","" 197 }; 198 199 200 /* 202 * for the monster data 203 * 204 * array to do rnd() to create monsters <= a given level 205 */ 206 char monstlevel[] = { 5, 11, 17, 22, 27, 33, 39, 42, 46, 50, 53, 56, 59 }; 207 208 struct monst monster[] = { 209 /* NAME LV AC DAM ATT DEF GEN INT GOLD HP EXP 210 ----------------------------------------------------------------- */ 211 { "", 0, 0, 0, 0, 0, 0, 3, 0, 0, 0 }, 212 { "bat", 1, 0, 1, 0, 0, 0, 3, 0, 1, 1 }, 213 { "gnome", 1, 10, 1, 0, 0, 0, 8, 30, 2, 2 }, 214 { "hobgoblin", 1, 14, 2, 0, 0, 0, 5, 25, 3, 2 }, 215 { "jackal", 1, 17, 1, 0, 0, 0, 4, 0, 1, 1 }, 216 { "kobold", 1, 20, 1, 0, 0, 0, 7, 10, 1, 1 }, 217 218 { "orc", 2, 12, 1, 0, 0, 0, 9, 40, 4, 2 }, 219 { "snake", 2, 15, 1, 0, 0, 0, 3, 0, 3, 1 }, 220 { "giant centipede",2, 14, 0, 4, 0, 0, 3, 0, 1, 2 }, 221 { "jaculi", 2, 20, 1, 0, 0, 0, 3, 0, 2, 1 }, 222 { "troglodyte", 2, 10, 2, 0, 0, 0, 5, 80, 4, 3 }, 223 { "giant ant", 2, 8, 1, 4, 0, 0, 4, 0, 5, 5 }, 224 225 /* NAME LV AC DAM ATT DEF GEN INT GOLD HP EXP 226 ----------------------------------------------------------------- */ 227 228 { "floating eye", 3, 8, 1, 0, 0, 0, 3, 0, 5, 2 }, 229 { "leprechaun", 3, 3, 0, 8, 0, 0, 3,1500, 13, 45 }, 230 { "nymph", 3, 3, 0, 14, 0, 0, 9, 0, 18, 45 }, 231 { "quasit", 3, 5, 3, 0, 0, 0, 3, 0, 10, 15 }, 232 { "rust monster", 3, 4, 0, 1, 0, 0, 3, 0, 18, 25 }, 233 { "zombie", 3, 12, 2, 0, 0, 0, 3, 0, 6, 7 }, 234 235 { "assassin bug", 4, 9, 3, 0, 0, 0, 3, 0, 20, 15 }, 236 { "bugbear", 4, 5, 4, 15, 0, 0, 5, 40, 20, 35 }, 237 { "hell hound", 4, 5, 2, 2, 0, 0, 6, 0, 16, 35 }, 238 { "ice lizard", 4, 11, 2, 10, 0, 0, 6, 50, 16, 25 }, 239 { "centaur", 4, 6, 4, 0, 0, 0, 10, 40, 24, 45 }, 240 241 /* NAME LV AC DAM ATT DEF GEN INT GOLD HP EXP 242 ----------------------------------------------------------------- */ 243 244 { "troll", 5, 4, 5, 0, 0, 0, 9, 80, 50, 300 }, 245 { "yeti", 5, 6, 4, 0, 0, 0, 5, 50, 35, 100 }, 246 { "white dragon", 5, 2, 4, 5, 0, 0, 16, 500, 55, 1000}, 247 { "elf", 5, 8, 1, 0, 0, 0, 15, 50, 22, 35 }, 248 { "gelatinous cube",5, 9, 1, 0, 0, 0, 3, 0, 22, 45 }, 249 250 { "metamorph", 6, 7, 3, 0, 0, 0, 3, 0, 30, 40 }, 251 { "vortex", 6, 4, 3, 0, 0, 0, 3, 0, 30, 55 }, 252 { "ziller", 6, 15, 3, 0, 0, 0, 3, 0, 30, 35 }, 253 { "violet fungi", 6, 12, 3, 0, 0, 0, 3, 0, 38, 100 }, 254 { "wraith", 6, 3, 1, 6, 0, 0, 3, 0, 30, 325 }, 255 { "forvalaka", 6, 2, 5, 0, 0, 0, 7, 0, 50, 280 }, 256 257 /* NAME LV AC DAM ATT DEF GEN INT GOLD HP EXP 258 ----------------------------------------------------------------- */ 259 260 { "lama nobe", 7, 7, 3, 0, 0, 0, 6, 0, 35, 80 }, 261 { "osequip", 7, 4, 3, 16, 0, 0, 4, 0, 35, 100 }, 262 { "rothe", 7, 15, 5, 0, 0, 0, 3, 100, 50, 250 }, 263 { "xorn", 7, 0, 6, 0, 0, 0, 13, 0, 60, 300 }, 264 { "vampire", 7, 3, 4, 6, 0, 0, 17, 0, 50, 1000}, 265 { "invisible stalker",7,3, 6, 0, 0, 0, 5, 0, 50, 350 }, 266 267 { "poltergeist", 8, 1, 4, 0, 0, 0, 3, 0, 50, 450 }, 268 { "disenchantress", 8, 3, 0, 9, 0, 0, 3, 0, 50, 500 }, 269 { "shambling mound",8, 2, 5, 0, 0, 0, 6, 0, 45, 400 }, 270 { "yellow mold", 8, 12, 4, 0, 0, 0, 3, 0, 35, 250 }, 271 { "umber hulk", 8, 3, 7, 11, 0, 0, 14, 0, 65, 600 }, 272 273 /* NAME LV AC DAM ATT DEF GEN INT GOLD HP EXP 274 ----------------------------------------------------------------- */ 275 276 { "gnome king", 9, -1, 10, 0, 0, 0, 18, 2000, 100,3000 }, 277 { "mimic", 9, 5, 6, 0, 0, 0, 8, 0, 55, 99 }, 278 { "water lord", 9, -10, 15, 7, 0, 0, 20, 0, 150,15000 }, 279 { "bronze dragon", 9, 2, 9, 3, 0, 0, 16, 300, 80, 4000 }, 280 { "green dragon", 9, 3, 8, 10, 0, 0, 15, 200, 70, 2500 }, 281 { "purple worm", 9, -1, 11, 0, 0, 0, 3, 100, 120,15000 }, 282 { "xvart", 9, -2, 12, 0, 0, 0, 13, 0, 90, 1000 }, 283 284 { "spirit naga", 10, -20,12, 12, 0, 0, 23, 0, 95, 20000 }, 285 { "silver dragon", 10, -1, 12, 3, 0, 0, 20, 700, 100,10000 }, 286 { "platinum dragon",10, -5, 15, 13, 0, 0, 22, 1000, 130,24000 }, 287 { "green urchin", 10, -3, 12, 0, 0, 0, 3, 0, 85, 5000 }, 288 { "red dragon", 10, -2, 13, 3, 0, 0, 19, 800, 110,14000 }, 289 290 { "type I demon lord", 12,-30, 18, 0, 0, 0, 20, 0, 140,50000 }, 291 { "type II demon lord", 13,-30, 18, 0, 0, 0, 21, 0, 160,75000 }, 292 { "type III demon lord",14,-30, 18, 0, 0, 0, 22, 0, 180,100000 }, 293 { "type IV demon lord", 15,-35, 20, 0, 0, 0, 23, 0, 200,125000 }, 294 { "type V demon lord", 16,-40, 22, 0, 0, 0, 24, 0, 220,150000 }, 295 { "type VI demon lord", 17,-45, 24, 0, 0, 0, 25, 0, 240,175000 }, 296 { "type VII demon lord",18,-70, 27, 6, 0, 0, 26, 0, 260,200000 }, 297 { "demon prince", 25,-127,30, 6, 0, 0, 28, 0, 345,300000 } 298 299 /* NAME LV AC DAM ATT DEF GEN INT GOLD HP EXP 300 --------------------------------------------------------------------- */ 301 }; 302 303 /* name array for scrolls */ 304 305 char *scrollname[] = {"","","","","","","","","","","","","","", 306 "","","","","","","","","","","","","",""}; 307 308 char *scrollhide[] = { 309 " enchant armor", 310 " enchant weapon", 311 " enlightenment", 312 " blank paper", 313 " create monster", 314 " create artifact", 315 " aggravate monsters", 316 " time warp", 317 " teleportation", 318 " expanded awareness", 319 " haste monsters", 320 " monster healing", 321 " spirit protection", 322 " undead protection", 323 " stealth", 324 " magic mapping", 325 " hold monsters", 326 " gem perfection", 327 " spell extension", 328 " identify", 329 " remove curse", 330 " annihilation", 331 " pulverization", 332 " life protection", 333 " ", 334 " ", 335 " ", 336 " " 337 }; 338 339 char *potionname[] = {"","","","","","","","","","","","","","", 340 "","","","","","","","","","","","","","", 341 "","","","","","",""}; 342 343 /* name array for magic potions */ 344 char *potionhide[] = { 345 " sleep", 346 " healing", 347 " raise level", 348 " increase ability", 349 " wisdom", 350 " strength", 351 " raise charisma", 352 " dizziness", 353 " learning", 354 " gold detection", 355 " monster detection", 356 " forgetfulness", 357 " water", 358 " blindness", 359 " confusion", 360 " heroism", 361 " sturdiness", 362 " giant strength", 363 " fire resistance", 364 " treasure finding", 365 " instant healing", 366 " cure dianthroritis", 367 " poison", 368 " see invisible", 369 " ", 370 " ", 371 " ", 372 " ", 373 " ", 374 " ", 375 " ", 376 " ", 377 " ", 378 " ", 379 " " 380 }; 381 382 383 /* 385 spell data 386 */ 387 char spelknow[SPNUM]={0}; 388 char splev[] = { 1, 4, 9, 14, 18, 22, 26, 29, 32, 35, 37, 37, 37, 37, 37 }; 389 390 char *spelcode[]={ 391 "pro", "mle", "dex", "sle", "chm", "ssp", 392 "web", "str", "enl", "hel", "cbl", "cre", "pha", "inv", 393 "bal", "cld", "ply", "can", "has", "ckl", "vpr", 394 "dry", "lit", "drl", "glo", "flo", "fgr", 395 "sca", "hld", "stp", "tel", "mfi", /* 31 */ 396 "sph", "gen", "sum", "wtw", "alt", "per" 397 }; 398 399 char *spelname[]={ 400 "protection", "magic missile", "dexterity", 401 "sleep", "charm monster", "sonic spear", 402 403 "web", "strength", "enlightenment", 404 "healing", "cure blindness", "create monster", 405 "phantasmal forces", "invisibility", 406 407 "fireball", "cold", "polymorph", 408 "cancellation", "haste self", "cloud kill", 409 "vaporize rock", 410 411 "dehydration", "lightning", "drain life", 412 "invulnerability", "flood", "finger of death", 413 414 "scare monster", "hold monster", "time stop", 415 "teleport away", "magic fire", 416 417 "sphere of annihilation", "genocide", "summon demon", 418 "walk through walls", "alter reality", "permanence", 419 "" 420 }; 421 422 char *speldescript[]={ 423 /* 1 */ 424 "generates a +2 protection field", 425 "creates and hurls a magic missile equivalent to a + 1 magic arrow", 426 "adds +2 to the casters dexterity", 427 "causes some monsters to go to sleep", 428 "some monsters may be awed at your magnificence", 429 "causes your hands to emit a screeching sound toward what they point", 430 /* 7 */ 431 "causes strands of sticky thread to entangle an enemy", 432 "adds +2 to the casters strength for a short term", 433 "the caster becomes aware of things around him", 434 "restores some hp to the caster", 435 "restores sight to one so unfortunate as to be blinded", 436 "creates a monster near the caster appropriate for the location", 437 "creates illusions, and if believed, monsters die", 438 "the caster becomes invisible", 439 /* 15 */ 440 "makes a ball of fire that burns on what it hits", 441 "sends forth a cone of cold which freezes what it touches", 442 "you can find out what this does for yourself", 443 "negates the ability of a monster to use his special abilities", 444 "speeds up the casters movements", 445 "creates a fog of poisonous gas which kills all that is within it", 446 "this changes rock to air", 447 /* 22 */ 448 "dries up water in the immediate vicinity", 449 "you finger will emit a lightning bolt when this spell is cast", 450 "subtracts hit points from both you and a monster", 451 "this globe helps to protect the player from physical attack", 452 "this creates an avalanche of H2O to flood the immediate chamber", 453 "this is a holy spell and calls upon your god to back you up", 454 /* 28 */ 455 "terrifies the monster so that hopefully he wont hit the magic user", 456 "the monster is frozen in his tracks if this is successful", 457 "all movement in the caverns ceases for a limited duration", 458 "moves a particular monster around in the dungeon (hopefully away from you)", 459 "this causes a curtain of fire to appear all around you", 460 /* 33 */ 461 "anything caught in this sphere is instantly killed. Warning -- dangerous", 462 "eliminates a species of monster from the game -- use sparingly", 463 "summons a demon who hopefully helps you out", 464 "allows the player to walk through walls for a short period of time", 465 "god only knows what this will do", 466 "makes a character spell permanent, i. e. protection, strength, etc.", 467 "" 468 }; 469 470 char spelweird[MAXMONST+8][SPNUM] = { 471 /* p m d s c s w s e h c c p i b c p c h c v d l d g f f s h s t m s g s w a p */ 472 /* r l e l h s e t n e b r h n a l l a a k p r i r l l g c l t e f p e u t l e */ 473 /* o e x e m p b r l l l e a v l d y n s l r y t l o o r a d p l i h n m w t r */ 474 475 476 /* bat */ { 0,0,0,0,0,0, 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0, 0,0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0,0 }, 477 /* gnome */ { 0,0,0,0,0,0, 0,0,0,0,0,0,0,5, 0,0,0,0,0,0,0, 0,0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0,0 }, 478 /* hobgoblin */ { 0,0,0,0,0,0, 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0, 0,0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0,0 }, 479 /* jackal */ { 0,0,0,0,0,0, 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0, 0,0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0,0 }, 480 /* kobold */ { 0,0,0,0,0,0, 0,0,0,0,0,0,0,5, 0,0,0,0,0,0,0, 0,0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0,0 }, 481 482 /* orc */ { 0,0,0,0,0,0, 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0, 4,0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0,0 }, 483 /* snake */ { 0,0,0,0,0,0, 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0, 0,0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0,0 }, 484 /*giant centipede */ { 0,0,0,0,0,0, 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0, 0,0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0,0 }, 485 /* jaculi */ { 0,0,0,0,0,0, 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0, 0,0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0,0 }, 486 /* troglodyte */ { 0,0,0,0,0,0, 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0, 0,0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0,0 }, 487 488 /* giant ant */ { 0,0,0,0,0,0, 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0, 0,0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0,0 }, 489 /* floating eye */ { 0,0,0,0,0,0, 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0, 0,0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0,0 }, 490 /* leprechaun */ { 0,0,0,0,0,0, 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0, 0,0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0,0 }, 491 /* nymph */ { 0,0,0,0,0,0, 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0, 0,0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0,0 }, 492 /* quasit */ { 0,0,0,0,0,0, 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0, 0,0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0,0 }, 493 494 /* rust monster */ { 0,0,0,0,0,0, 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0, 4,0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0,0 }, 495 /* zombie */ { 0,0,0,8,0,4, 0,0,0,0,0,0,0,0, 0,0,0,0,0,4,0, 4,0,0,0,0,4, 0,0,0,0,0, 0,0,0,0,0,0 }, 496 /* assassin bug */ { 0,0,0,0,0,0, 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0, 0,0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0,0 }, 497 /* bugbear */ { 0,0,0,0,0,0, 0,0,0,0,0,0,0,5, 0,0,0,0,0,0,0, 0,0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0,0 }, 498 /* hell hound */ { 0,6,0,0,0,0, 12,0,0,0,0,0,0,0, 0,0,0,0,0,0,0, 0,0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0,0 }, 499 500 /* ice lizard */ { 0,0,0,0,0,0, 11,0,0,0,0,0,0,0, 0,15,0,0,0,0,0, 0,0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0,0 }, 501 /* centaur */ { 0,0,0,0,0,0, 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0, 0,0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0,0 }, 502 /* troll */ { 0,7,0,0,0,0, 0,0,0,0,0,0,0,5, 0,0,0,0,0,0,0, 4,0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0,0 }, 503 /* yeti */ { 0,0,0,0,0,0, 0,0,0,0,0,0,0,0, 0,15,0,0,0,0,0, 0,0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0,0 }, 504 /* white dragon */ { 0,0,0,0,0,0, 0,0,0,0,0,0,14,0, 0,15,0,0,0,0,0, 4,0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0,0 }, 505 506 /* elf */ { 0,0,0,0,0,0, 0,0,0,0,0,0,14,5, 0,0,0,0,0,0,0, 0,0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0,0 }, 507 /*gelatinous cube */ { 0,0,0,0,0,0, 2,0,0,0,0,0,0,0, 0,0,0,0,0,4,0, 0,0,0,0,0,4, 0,0,0,0,0, 0,0,0,0,0,0 }, 508 /* metamorph */ { 0,13,0,0,0,0, 2,0,0,0,0,0,0,0, 0,0,0,0,0,4,0, 4,0,0,0,0,4, 0,0,0,0,0, 0,0,0,0,0,0 }, 509 /* vortex */ { 0,13,0,0,0,10, 1,0,0,0,0,0,0,0, 0,0,0,0,0,4,0, 4,0,0,0,4,4, 0,0,0,0,0, 0,0,0,0,0,0 }, 510 /* ziller */ { 0,0,0,0,0,0, 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0, 0,0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0,0 }, 511 512 /* violet fungi */ { 0,0,0,0,0,0, 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0, 0,0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0,0 }, 513 /* wraith */ { 0,0,0,8,0,4, 0,0,0,0,0,0,0,0, 0,0,0,0,0,4,0, 4,0,0,0,0,4, 0,0,0,0,0, 0,0,0,0,0,0 }, 514 /* forvalaka */ { 0,0,0,0,0,0, 0,0,0,0,0,0,0,5, 0,0,0,0,0,0,0, 0,0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0,0 }, 515 /* lama nobe */ { 0,0,0,0,0,0, 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0, 0,0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0,0 }, 516 /* osequip */ { 0,0,0,0,0,0, 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0, 0,0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0,0 }, 517 518 /* rothe */ { 0,7,0,0,0,0, 0,0,0,0,0,0,0,5, 0,0,0,0,0,0,0, 0,0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0,0 }, 519 /* xorn */ { 0,7,0,0,0,0, 0,0,0,0,0,0,0,5, 0,0,0,0,0,0,0, 4,0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0,0 }, 520 /* vampire */ { 0,0,0,8,0,4, 0,0,0,0,0,0,0,0, 0,0,0,0,0,4,0, 0,0,0,0,0,4, 0,0,0,0,0, 0,0,0,0,0,0 }, 521 /*invisible staker*/ { 0,0,0,0,0,0, 1,0,0,0,0,0,0,0, 0,0,0,0,0,0,0, 0,0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0,0 }, 522 /* poltergeist */ { 0,13,0,8,0,4, 1,0,0,0,0,0,0,0, 0,4,0,0,0,4,0, 4,0,0,0,4,4, 0,0,0,0,0, 0,0,0,0,0,0 }, 523 524 /* disenchantress */ { 0,0,0,8,0,0, 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0, 0,0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0,0 }, 525 /*shambling mound */ { 0,0,0,0,0,10, 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0, 0,0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0,0 }, 526 /* yellow mold */ { 0,0,0,8,0,0, 1,0,0,0,0,0,4,0, 0,0,0,0,0,4,0, 0,0,0,0,0,4, 0,0,0,0,0, 0,0,0,0,0,0 }, 527 /* umber hulk */ { 0,7,0,0,0,0, 0,0,0,0,0,0,0,5, 0,0,0,0,0,0,0, 0,0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0,0 }, 528 /* gnome king */ { 0,7,0,0,3,0, 0,0,0,0,0,0,0,5, 0,0,9,0,0,0,0, 0,0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0,0 }, 529 530 /* mimic */ { 0,0,0,0,0,0, 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0, 0,0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0,0 }, 531 /* water lord */ { 0,13,0,8,3,4, 1,0,0,0,0,0,0,0, 0,0,9,0,0,4,0, 0,0,0,0,16,4, 0,0,0,0,0, 0,0,0,0,0,0 }, 532 /* bronze dragon */ { 0,7,0,0,0,0, 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0, 0,0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0,0 }, 533 /* green dragon */ { 0,7,0,0,0,0, 11,0,0,0,0,0,0,0, 0,0,0,0,0,0,0, 0,0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0,0 }, 534 /* purple worm */ { 0,0,0,0,0,0, 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0, 0,0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0,0 }, 535 536 /* xvart */ { 0,0,0,0,0,0, 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0, 0,0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0,0 }, 537 /* spirit naga */ { 0,13,0,8,3,4, 1,0,0,0,0,0,0,5, 0,4,9,0,0,4,0, 4,0,0,0,4,4, 0,0,0,0,0, 0,0,0,0,0,0 }, 538 /* silver dragon */ { 0,6,0,9,0,0, 12,0,0,0,0,0,0,0, 0,0,0,0,0,0,0, 0,0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0,0 }, 539 /*platinum dragon */ { 0,7,0,9,0,0, 11,0,0,0,0,0,14,0, 0,0,0,0,0,0,0, 0,0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0,0 }, 540 /* green urchin */ { 0,0,0,0,0,0, 0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0, 0,0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0,0 }, 541 /* red dragon */ { 0,6,0,0,0,0, 12,0,0,0,0,0,0,0, 0,0,0,0,0,0,0, 0,0,0,0,0,0, 0,0,0,0,0, 0,0,0,0,0,0 }, 542 543 /* p m d s c s w s e h c c p i b c p c h c v d l d g f f s h s t m s g s w a p */ 544 /* r l e l h s e t n e b r h n a l l a a k p r i r l l g c l t e f p e u t l e */ 545 /* o e x e m p b r l l l e a v l d y n s l r y t l o o r a d p l i h n m w t r */ 546 547 /* demon lord */ { 0,7,0,4,3,0, 1,0,0,0,0,0,14,5, 0,0,4,0,0,4,0, 4,0,0,0,4,4, 0,0,0,0,0, 9,0,0,0,0,0 }, 548 /* demon lord */ { 0,7,0,4,3,0, 1,0,0,0,0,0,14,5, 0,0,4,0,0,4,0, 4,0,0,0,4,4, 0,0,0,0,0, 9,0,0,0,0,0 }, 549 /* demon lord */ { 0,7,0,4,3,0, 1,0,0,0,0,0,14,5, 0,0,4,0,0,4,0, 4,0,0,0,4,4, 0,0,0,0,0, 9,0,0,0,0,0 }, 550 /* demon lord */ { 0,7,0,4,3,0, 1,0,0,0,0,0,14,5, 0,0,4,0,0,4,0, 4,0,0,0,4,4, 0,0,0,0,0, 9,0,0,0,0,0 }, 551 /* demon lord */ { 0,7,0,4,3,0, 1,0,0,0,0,0,14,5, 0,0,4,0,0,4,0, 4,0,0,0,4,4, 0,0,0,0,0, 9,0,0,0,0,0 }, 552 /* demon lord */ { 0,7,0,4,3,0, 1,0,0,0,0,0,14,5, 0,0,4,0,0,4,0, 4,0,0,0,4,4, 0,0,0,0,0, 9,0,0,0,0,0 }, 553 /* demon lord */ { 0,7,0,4,3,0, 1,0,0,0,0,0,14,5, 0,0,4,0,0,4,0, 4,0,0,0,4,4, 0,0,0,0,0, 9,0,0,0,0,0 }, 554 /* demon prince */ { 0,7,0,4,3,9, 1,0,0,0,0,0,14,5, 0,0,4,0,0,4,0, 4,0,0,0,4,4, 4,0,0,0,4, 9,0,0,0,0,0 } 555 556 }; 557 558 char *spelmes[] = { "", 559 /* 1 */ "the web had no effect on the %s", 560 /* 2 */ "the %s changed shape to avoid the web", 561 /* 3 */ "the %s isn't afraid of you", 562 /* 4 */ "the %s isn't affected", 563 /* 5 */ "the %s can see you with his infravision", 564 /* 6 */ "the %s vaporizes your missile", 565 /* 7 */ "your missile bounces off the %s", 566 /* 8 */ "the %s doesn't sleep", 567 /* 9 */ "the %s resists", 568 /* 10 */ "the %s can't hear the noise", 569 /* 11 */ "the %s's tail cuts it free of the web", 570 /* 12 */ "the %s burns through the web", 571 /* 13 */ "your missiles pass right through the %s", 572 /* 14 */ "the %s sees through your illusions", 573 /* 15 */ "the %s loves the cold!", 574 /* 16 */ "the %s loves the water!" 575 }; 576 577 char to_lower[]= /* tolower[character] = lower case converted character */ 578 { 579 0000,0001,0002,0003,0004,0005,0006,0007,0010,0011,0012,0013,0014,0015,0016,0017, /* NUL-SI*/ 580 0020,0021,0022,0023,0024,0025,0026,0027,0030,0031,0032,0033,0034,0035,0036,0037, /* DLE-US*/ 581 0040,0041,0042,0043,0044,0045,0046,0047,0050,0051,0052,0053,0054,0055,0056,0057, /* SP-/ */ 582 0060,0061,0062,0063,0064,0065,0066,0067,0070,0071,0072,0073,0074,0075,0076,0077, /* 0-? */ 583 0100,0141,0142,0143,0144,0145,0146,0147,0150,0151,0152,0153,0154,0155,0156,0157, /* @-O */ 584 0160,0161,0162,0163,0164,0165,0166,0167,0170,0171,0172,0133,0134,0135,0136,0137, /* P-_ */ 585 0140,0141,0142,0143,0144,0145,0146,0147,0150,0151,0152,0153,0154,0155,0156,0157, /* `-o */ 586 0160,0161,0162,0163,0164,0165,0166,0167,0170,0171,0172,0173,0174,0175,0176,0177, /* p-DEL */ 587 }; 588 589 char to_upper[]= /* toupper[character] = upper case converted character */ 590 { 591 0000,0001,0002,0003,0004,0005,0006,0007,0010,0011,0012,0013,0014,0015,0016,0017, /* NUL-SI*/ 592 0020,0021,0022,0023,0024,0025,0026,0027,0030,0031,0032,0033,0034,0035,0036,0037, /* DLE-US*/ 593 0040,0041,0042,0043,0044,0045,0046,0047,0050,0051,0052,0053,0054,0055,0056,0057, /* SP-/ */ 594 0060,0061,0062,0063,0064,0065,0066,0067,0070,0071,0072,0073,0074,0075,0076,0077, /* 0-? */ 595 0100,0101,0102,0103,0104,0105,0106,0107,0110,0111,0112,0113,0114,0115,0116,0117, /* @-O */ 596 0120,0121,0122,0123,0124,0125,0126,0127,0130,0131,0132,0133,0134,0135,0136,0137, /* P-_ */ 597 0140,0101,0102,0103,0104,0105,0106,0107,0110,0111,0112,0113,0114,0115,0116,0117, /* `-o */ 598 0120,0121,0122,0123,0124,0125,0126,0127,0130,0131,0132,0173,0174,0175,0176,0177, /* p-DEL */ 599 }; 600 601 char is_digit[]= /* isdigit[character] = TRUE || FALSE */ 602 { 603 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* NUL-SI*/ 604 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* DLE-US*/ 605 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* SP-/ */ 606 1,1,1,1,1,1,1,1,1,1,0,0,0,0,0,0, /* 0-? */ 607 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* @-O */ 608 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* P-_ */ 609 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* `-o */ 610 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* p-DEL */ 611 }; 612 613 char is_alpha[]= /* isalpha[character] = TRUE || FALSE */ 614 { 615 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* NUL-SI*/ 616 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* DLE-US*/ 617 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* SP-/ */ 618 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, /* 0-? */ 619 0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1, /* @-O */ 620 1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0, /* P-_ */ 621 0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1, /* `-o */ 622 1,1,1,1,1,1,1,1,1,1,1,0,0,0,0,0, /* p-DEL */ 623 }; 624 625 /* 626 * function to create scroll numbers with appropriate probability of 627 * occurrence 628 * 629 * 0 - armor 1 - weapon 2 - enlightenment 3 - paper 630 * 4 - create monster 5 - create item 6 - aggravate 7 - time warp 631 * 8 - teleportation 9 - expanded awareness 10 - haste monst 632 * 11 - heal monster 12 - spirit protection 13 - undead protection 633 * 14 - stealth 15 - magic mapping 16 - hold monster 634 * 17 - gem perfection 18 - spell extension 19 - identify 635 * 20 - remove curse 21 - annihilation 22 - pulverization 636 * 23 - life protection 637 */ 638 char scprob[]= { 0, 0, 0, 0, 1, 1, 1, 1, 1, 2, 2, 2, 2, 2, 2, 3, 3, 639 3, 3, 3, 4, 4, 4, 5, 5, 5, 5, 5, 6, 6, 6, 6, 6, 7, 7, 7, 7, 8, 8, 8, 9, 9, 640 9, 9, 10, 10, 10, 10, 11, 11, 11, 12, 12, 12, 13, 13, 13, 13, 14, 14, 641 15, 15, 16, 16, 16, 17, 17, 18, 18, 19, 19, 19, 20, 20, 20, 20, 21, 22, 642 22, 22, 23 }; 643 644 /* 645 * function to return a potion number created with appropriate probability 646 * of occurrence 647 * 648 * 0 - sleep 1 - healing 2 - raise level 649 * 3 - increase ability 4 - gain wisdom 5 - gain strength 650 * 6 - charismatic character 7 - dizziness 8 - learning 651 * 9 - gold detection 10 - monster detection 11 - forgetfulness 652 * 12 - water 13 - blindness 14 - confusion 653 * 15 - heroism 16 - sturdiness 17 - giant strength 654 * 18 - fire resistance 19 - treasure finding 20 - instant healing 655 * 21 - cure dianthroritis 22 - poison 23 - see invisible 656 */ 657 char potprob[] = { 0, 0, 1, 1, 1, 2, 3, 3, 4, 4, 5, 5, 6, 6, 7, 7, 8, 9, 9, 9, 10, 10, 10, 11, 11, 12, 12, 13, 14, 15, 16, 17, 18, 19, 19, 20, 20, 22, 22, 23, 23 }; 658 659 char nlpts[] = { 0, 0, 0, 0, 0, 1, 1, 2, 2, 3, 3, 4, 5, 6, 7 }; 660 char nch[] = { 0, 0, 0, 1, 1, 1, 2, 2, 3, 4 }; 661 char nplt[] = { 0, 0, 0, 0, 1, 1, 2, 2, 3, 4 }; 662 char ndgg[] = { 0, 0, 0, 1, 1, 1, 1, 2, 2, 3, 3, 4, 5 }; 663 char nsw[] = { 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 2, 3 }; 664
Indexes created Tue Sep 30 11:09:46 GMT 2025