home *** CD-ROM | disk | FTP | other *** search
/ Source Code 1992 March / Source_Code_CD-ROM_Walnut_Creek_March_1992.iso / usenet / compsrcs / games / nethack2 / part09 < prev    next >
SHell self-extracting ARchive  |  1988-10-17  |  104.8 KB

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text

This file was processed as: SHell self-extracting ARchive (archive/shar).

You can browse this item here: part09

ConfidenceProgramDetectionMatch TypeSupport
100% dexvert SHell self-extracting ARchive (archive/shar) magic Supported
1% dexvert Text File (text/txt) fallback Supported
100% file POSIX shell script text executable default
99% file a /bin/sh script, ASCII text executable default (weak)
75% TrID shar SHell self-extracting aRchive default
15% TrID Xilinx User Constraints File default (weak)
9% TrID Perl script default
100% checkBytes Printable ASCII default
100% perlTextCheck Likely Text (Perl) default
100% siegfried fmt/329 Shell Archive Format default
100% gt2 Shell Skript: '/bin/sh' default (weak)
100% detectItEasy Format: plain text[LF] default (weak)
100% binwalkID Executable script, shebang: "/bin/sh" default (weak)
100% xdgMime application/x-shellscript default (weak)



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 23 21 20 2f 62 69 6e 2f | 73 68 0a 23 20 54 68 69 |#! /bin/|sh.# Thi|
|00000010| 73 20 69 73 20 61 20 73 | 68 65 6c 6c 20 61 72 63 |s is a s|hell arc|
|00000020| 68 69 76 65 2e 20 20 52 | 65 6d 6f 76 65 20 61 6e |hive. R|emove an|
|00000030| 79 74 68 69 6e 67 20 62 | 65 66 6f 72 65 20 74 68 |ything b|efore th|
|00000040| 69 73 20 6c 69 6e 65 2c | 20 74 68 65 6e 20 75 6e |is line,| then un|
|00000050| 70 61 63 6b 0a 23 20 69 | 74 20 62 79 20 73 61 76 |pack.# i|t by sav|
|00000060| 69 6e 67 20 69 74 20 69 | 6e 74 6f 20 61 20 66 69 |ing it i|nto a fi|
|00000070| 6c 65 20 61 6e 64 20 74 | 79 70 69 6e 67 20 22 73 |le and t|yping "s|
|00000080| 68 20 66 69 6c 65 22 2e | 20 20 54 6f 20 6f 76 65 |h file".| To ove|
|00000090| 72 77 72 69 74 65 20 65 | 78 69 73 74 69 6e 67 0a |rwrite e|xisting.|
|000000a0| 23 20 66 69 6c 65 73 2c | 20 74 79 70 65 20 22 73 |# files,| type "s|
|000000b0| 68 20 66 69 6c 65 20 2d | 63 22 2e 20 20 59 6f 75 |h file -|c". You|
|000000c0| 20 63 61 6e 20 61 6c 73 | 6f 20 66 65 65 64 20 74 | can als|o feed t|
|000000d0| 68 69 73 20 61 73 20 73 | 74 61 6e 64 61 72 64 20 |his as s|tandard |
|000000e0| 69 6e 70 75 74 20 76 69 | 61 0a 23 20 75 6e 73 68 |input vi|a.# unsh|
|000000f0| 61 72 2c 20 6f 72 20 62 | 79 20 74 79 70 69 6e 67 |ar, or b|y typing|
|00000100| 20 22 73 68 20 3c 66 69 | 6c 65 22 2c 20 65 2e 67 | "sh <fi|le", e.g|
|00000110| 2e 2e 20 20 49 66 20 74 | 68 69 73 20 61 72 63 68 |.. If t|his arch|
|00000120| 69 76 65 20 69 73 20 63 | 6f 6d 70 6c 65 74 65 2c |ive is c|omplete,|
|00000130| 20 79 6f 75 0a 23 20 77 | 69 6c 6c 20 73 65 65 20 | you.# w|ill see |
|00000140| 74 68 65 20 66 6f 6c 6c | 6f 77 69 6e 67 20 6d 65 |the foll|owing me|
|00000150| 73 73 61 67 65 20 61 74 | 20 74 68 65 20 65 6e 64 |ssage at| the end|
|00000160| 3a 0a 23 09 09 22 45 6e | 64 20 6f 66 20 61 72 63 |:.#.."En|d of arc|
|00000170| 68 69 76 65 20 39 20 28 | 6f 66 20 31 33 29 2e 22 |hive 9 (|of 13)."|
|00000180| 0a 23 20 43 6f 6e 74 65 | 6e 74 73 3a 20 20 4e 65 |.# Conte|nts: Ne|
|00000190| 77 73 74 75 66 66 2f 62 | 75 67 66 69 78 33 20 64 |wstuff/b|ugfix3 d|
|000001a0| 6f 2e 63 20 64 6f 5f 77 | 65 61 72 2e 63 20 6c 65 |o.c do_w|ear.c le|
|000001b0| 76 2e 63 20 6d 6f 6e 6d | 6f 76 65 2e 63 20 70 61 |v.c monm|ove.c pa|
|000001c0| 67 65 72 2e 63 0a 23 20 | 20 20 73 68 6b 6e 61 6d |ger.c.# | shknam|
|000001d0| 2e 63 20 75 6e 69 78 75 | 6e 69 78 2e 63 20 77 69 |.c unixu|nix.c wi|
|000001e0| 7a 61 72 64 2e 63 0a 23 | 20 57 72 61 70 70 65 64 |zard.c.#| Wrapped|
|000001f0| 20 62 79 20 62 69 6c 6c | 72 40 74 65 6b 72 65 64 | by bill|r@tekred|
|00000200| 20 6f 6e 20 4d 6f 6e 20 | 4a 75 6e 20 32 30 20 31 | on Mon |Jun 20 1|
|00000210| 31 3a 33 39 3a 30 37 20 | 31 39 38 38 0a 50 41 54 |1:39:07 |1988.PAT|
|00000220| 48 3d 2f 62 69 6e 3a 2f | 75 73 72 2f 62 69 6e 3a |H=/bin:/|usr/bin:|
|00000230| 2f 75 73 72 2f 75 63 62 | 20 3b 20 65 78 70 6f 72 |/usr/ucb| ; expor|
|00000240| 74 20 50 41 54 48 0a 69 | 66 20 74 65 73 74 20 2d |t PATH.i|f test -|
|00000250| 66 20 4e 65 77 73 74 75 | 66 66 2f 62 75 67 66 69 |f Newstu|ff/bugfi|
|00000260| 78 33 20 2d 61 20 22 24 | 7b 31 7d 22 20 21 3d 20 |x3 -a "$|{1}" != |
|00000270| 22 2d 63 22 20 3b 20 74 | 68 65 6e 20 0a 20 20 65 |"-c" ; t|hen . e|
|00000280| 63 68 6f 20 73 68 61 72 | 3a 20 57 69 6c 6c 20 6e |cho shar|: Will n|
|00000290| 6f 74 20 6f 76 65 72 2d | 77 72 69 74 65 20 65 78 |ot over-|write ex|
|000002a0| 69 73 74 69 6e 67 20 66 | 69 6c 65 20 5c 22 4e 65 |isting f|ile \"Ne|
|000002b0| 77 73 74 75 66 66 2f 62 | 75 67 66 69 78 33 5c 22 |wstuff/b|ugfix3\"|
|000002c0| 0a 65 6c 73 65 0a 65 63 | 68 6f 20 73 68 61 72 3a |.else.ec|ho shar:|
|000002d0| 20 45 78 74 72 61 63 74 | 69 6e 67 20 5c 22 4e 65 | Extract|ing \"Ne|
|000002e0| 77 73 74 75 66 66 2f 62 | 75 67 66 69 78 33 5c 22 |wstuff/b|ugfix3\"|
|000002f0| 20 5c 28 31 31 37 31 30 | 20 63 68 61 72 61 63 74 | \(11710| charact|
|00000300| 65 72 73 5c 29 0a 73 65 | 64 20 22 73 2f 5e 58 2f |ers\).se|d "s/^X/|
|00000310| 2f 22 20 3e 4e 65 77 73 | 74 75 66 66 2f 62 75 67 |/" >News|tuff/bug|
|00000320| 66 69 78 33 20 3c 3c 27 | 45 4e 44 5f 4f 46 5f 4e |fix3 <<'|END_OF_N|
|00000330| 65 77 73 74 75 66 66 2f | 62 75 67 66 69 78 33 27 |ewstuff/|bugfix3'|
|00000340| 0a 58 50 61 74 68 3a 20 | 74 65 6b 72 65 64 21 74 |.XPath: |tekred!t|
|00000350| 65 6b 67 65 6e 21 74 65 | 6b 74 72 6f 6e 69 78 21 |ekgen!te|ktronix!|
|00000360| 75 75 6e 65 74 21 77 75 | 63 73 31 21 77 75 63 73 |uunet!wu|cs1!wucs|
|00000370| 32 21 73 77 31 65 21 74 | 6e 65 73 73 31 21 74 6e |2!sw1e!t|ness1!tn|
|00000380| 65 73 73 37 21 62 65 6c | 6c 63 6f 72 65 21 6a 63 |ess7!bel|lcore!jc|
|00000390| 72 69 63 6b 65 74 21 72 | 61 6a 0a 58 46 72 6f 6d |ricket!r|aj.XFrom|
|000003a0| 3a 20 72 61 6a 40 6a 63 | 72 69 63 6b 65 74 2e 63 |: raj@jc|ricket.c|
|000003b0| 74 74 2e 62 65 6c 6c 63 | 6f 72 65 2e 63 6f 6d 20 |tt.bellc|ore.com |
|000003c0| 28 52 61 6e 64 79 20 4a | 61 63 6b 73 6f 6e 29 0a |(Randy J|ackson).|
|000003d0| 58 4e 65 77 73 67 72 6f | 75 70 73 3a 20 63 6f 6d |XNewsgro|ups: com|
|000003e0| 70 2e 73 6f 75 72 63 65 | 73 2e 67 61 6d 65 73 2e |p.source|s.games.|
|000003f0| 62 75 67 73 0a 58 53 75 | 62 6a 65 63 74 3a 20 4e |bugs.XSu|bject: N|
|00000400| 65 74 68 61 63 6b 20 32 | 2e 33 20 42 6c 69 6e 64 |ethack 2|.3 Blind|
|00000410| 66 6f 6c 64 20 62 75 67 | 0a 58 53 75 6d 6d 61 72 |fold bug|.XSummar|
|00000420| 79 3a 20 46 69 78 20 66 | 6f 72 20 4e 79 6d 70 68 |y: Fix f|or Nymph|
|00000430| 20 73 74 65 61 6c 69 6e | 67 20 62 6c 69 6e 64 66 | stealin|g blindf|
|00000440| 6f 6c 64 0a 58 4d 65 73 | 73 61 67 65 2d 49 44 3a |old.XMes|sage-ID:|
|00000450| 20 3c 37 32 37 39 40 62 | 65 6c 6c 63 6f 72 65 2e | <7279@b|ellcore.|
|00000460| 62 65 6c 6c 63 6f 72 65 | 2e 63 6f 6d 3e 0a 58 44 |bellcore|.com>.XD|
|00000470| 61 74 65 3a 20 31 30 20 | 4d 61 79 20 38 38 20 31 |ate: 10 |May 88 1|
|00000480| 33 3a 32 30 3a 32 30 20 | 47 4d 54 0a 58 53 65 6e |3:20:20 |GMT.XSen|
|00000490| 64 65 72 3a 20 6e 65 77 | 73 40 62 65 6c 6c 63 6f |der: new|s@bellco|
|000004a0| 72 65 2e 62 65 6c 6c 63 | 6f 72 65 2e 63 6f 6d 0a |re.bellc|ore.com.|
|000004b0| 58 52 65 70 6c 79 2d 54 | 6f 3a 20 72 61 6a 40 6a |XReply-T|o: raj@j|
|000004c0| 63 72 69 63 6b 65 74 2e | 55 55 43 50 20 28 52 61 |cricket.|UUCP (Ra|
|000004d0| 6e 64 79 20 4a 61 63 6b | 73 6f 6e 29 0a 58 44 69 |ndy Jack|son).XDi|
|000004e0| 73 74 72 69 62 75 74 69 | 6f 6e 3a 20 63 6f 6d 70 |stributi|on: comp|
|000004f0| 2e 73 6f 75 72 63 65 73 | 2e 67 61 6d 65 73 2e 62 |.sources|.games.b|
|00000500| 75 67 73 0a 58 4f 72 67 | 61 6e 69 7a 61 74 69 6f |ugs.XOrg|anizatio|
|00000510| 6e 3a 20 43 6f 6d 70 75 | 74 65 72 20 54 65 63 68 |n: Compu|ter Tech|
|00000520| 6e 6f 6c 6f 67 79 20 54 | 72 61 6e 73 66 65 72 2c |nology T|ransfer,|
|00000530| 20 42 65 6c 6c 63 6f 72 | 65 0a 58 4c 69 6e 65 73 | Bellcor|e.XLines|
|00000540| 3a 20 36 37 0a 58 0a 58 | 0a 58 09 54 68 65 20 66 |: 67.X.X|.X.The f|
|00000550| 6f 6c 6c 6f 77 69 6e 67 | 20 64 69 66 66 73 20 77 |ollowing| diffs w|
|00000560| 69 6c 6c 20 66 69 78 20 | 74 68 65 20 62 75 67 20 |ill fix |the bug |
|00000570| 77 68 65 72 65 20 74 68 | 65 20 6e 79 6d 70 68 20 |where th|e nymph |
|00000580| 73 74 65 61 6c 73 20 79 | 6f 75 72 0a 58 09 62 6c |steals y|our.X.bl|
|00000590| 69 6e 64 66 6f 6c 64 20 | 77 68 69 6c 65 20 79 6f |indfold |while yo|
|000005a0| 75 20 61 72 65 20 77 65 | 61 72 69 6e 67 20 69 74 |u are we|aring it|
|000005b0| 20 61 6e 64 20 79 6f 75 | 20 61 72 65 20 6c 65 66 | and you| are lef|
|000005c0| 74 20 62 6c 69 6e 64 2e | 20 54 68 65 20 70 61 74 |t blind.| The pat|
|000005d0| 63 68 0a 58 09 73 68 6f | 75 6c 64 20 62 65 20 61 |ch.X.sho|uld be a|
|000005e0| 70 70 6c 69 65 64 20 74 | 6f 20 74 68 65 20 32 2e |pplied t|o the 2.|
|000005f0| 33 20 73 6f 75 72 63 65 | 20 66 6f 72 20 73 74 65 |3 source| for ste|
|00000600| 61 6c 2e 63 2e 0a 58 0a | 58 2d 2d 2d 2d 2d 2d 2d |al.c..X.|X-------|
|00000610| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000620| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 63 75 |--------|------cu|
|00000630| 74 20 68 65 72 65 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |t here--|--------|
|00000640| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000650| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000660| 2d 2d 0a 58 0a 58 2a 2a | 2a 20 73 74 65 61 6c 2e |--.X.X**|* steal.|
|00000670| 63 2e 6f 72 69 67 09 46 | 72 69 20 4d 61 79 20 20 |c.orig.F|ri May |
|00000680| 36 20 31 36 3a 35 35 3a | 33 34 20 31 39 38 38 0a |6 16:55:|34 1988.|
|00000690| 58 2d 2d 2d 20 73 74 65 | 61 6c 2e 63 09 46 72 69 |X--- ste|al.c.Fri|
|000006a0| 20 4d 61 79 20 20 36 20 | 31 37 3a 31 36 3a 34 33 | May 6 |17:16:43|
|000006b0| 20 31 39 38 38 0a 58 2a | 2a 2a 2a 2a 2a 2a 2a 2a | 1988.X*|********|
|000006c0| 2a 2a 2a 2a 2a 2a 0a 58 | 2a 2a 2a 20 38 36 2c 31 |******.X|*** 86,1|
|000006d0| 30 34 20 2a 2a 2a 2a 0a | 58 20 20 09 09 69 6d 70 |04 ****.|X ..imp|
|000006e0| 6f 73 73 69 62 6c 65 28 | 22 53 74 65 61 6c 20 66 |ossible(|"Steal f|
|000006f0| 61 69 6c 73 21 22 29 3b | 0a 58 20 20 09 09 72 65 |ails!");|.X ..re|
|00000700| 74 75 72 6e 28 30 29 3b | 0a 58 20 20 09 7d 0a 58 |turn(0);|.X .}.X|
|00000710| 20 20 09 69 66 28 6f 74 | 6d 70 2d 3e 6f 5f 69 64 | .if(ot|mp->o_id|
|00000720| 20 3d 3d 20 73 74 65 61 | 6c 6f 69 64 29 0a 58 20 | == stea|loid).X |
|00000730| 20 09 09 72 65 74 75 72 | 6e 28 30 29 3b 0a 58 21 | ..retur|n(0);.X!|
|00000740| 20 09 69 66 28 28 6f 74 | 6d 70 2d 3e 6f 77 6f 72 | .if((ot|mp->owor|
|00000750| 6e 6d 61 73 6b 20 26 20 | 28 57 5f 41 52 4d 4f 52 |nmask & |(W_ARMOR|
|00000760| 20 7c 20 57 5f 52 49 4e | 47 29 29 29 7b 0a 58 20 | | W_RIN|G))){.X |
|00000770| 20 09 09 73 77 69 74 63 | 68 28 6f 74 6d 70 2d 3e | ..switc|h(otmp->|
|00000780| 6f 6c 65 74 29 20 7b 0a | 58 20 20 09 09 63 61 73 |olet) {.|X ..cas|
|00000790| 65 20 52 49 4e 47 5f 53 | 59 4d 3a 0a 58 20 20 09 |e RING_S|YM:.X .|
|000007a0| 09 09 72 69 6e 67 6f 66 | 66 28 6f 74 6d 70 29 3b |..ringof|f(otmp);|
|000007b0| 0a 58 20 20 09 09 09 62 | 72 65 61 6b 3b 0a 58 20 |.X ...b|reak;.X |
|000007c0| 20 09 09 63 61 73 65 20 | 41 52 4d 4f 52 5f 53 59 | ..case |ARMOR_SY|
|000007d0| 4d 3a 0a 58 20 20 09 09 | 09 69 66 28 6d 75 6c 74 |M:.X ..|.if(mult|
|000007e0| 69 20 3c 20 30 20 7c 7c | 20 6f 74 6d 70 20 3d 3d |i < 0 ||| otmp ==|
|000007f0| 20 75 61 72 6d 73 29 7b | 0a 58 20 20 09 09 09 20 | uarms){|.X ... |
|00000800| 20 73 65 74 77 6f 72 6e | 28 28 73 74 72 75 63 74 | setworn|((struct|
|00000810| 20 6f 62 6a 20 2a 29 20 | 30 2c 20 6f 74 6d 70 2d | obj *) |0, otmp-|
|00000820| 3e 6f 77 6f 72 6e 6d 61 | 73 6b 20 26 20 57 5f 41 |>owornma|sk & W_A|
|00000830| 52 4d 4f 52 29 3b 0a 58 | 20 20 09 09 09 20 20 62 |RMOR);.X| ... b|
|00000840| 72 65 61 6b 3b 0a 58 20 | 20 09 09 09 7d 0a 58 20 |reak;.X | ...}.X |
|00000850| 20 09 09 7b 20 69 6e 74 | 20 63 75 72 73 73 76 20 | ..{ int| curssv |
|00000860| 3d 20 6f 74 6d 70 2d 3e | 63 75 72 73 65 64 3b 0a |= otmp->|cursed;.|
|00000870| 58 20 20 09 09 09 6f 74 | 6d 70 2d 3e 63 75 72 73 |X ...ot|mp->curs|
|00000880| 65 64 20 3d 20 30 3b 0a | 58 20 20 09 09 09 73 74 |ed = 0;.|X ...st|
|00000890| 6f 70 5f 6f 63 63 75 70 | 61 74 69 6f 6e 28 29 3b |op_occup|ation();|
|000008a0| 0a 58 20 20 09 09 09 69 | 66 28 66 6c 61 67 73 2e |.X ...i|f(flags.|
|000008b0| 66 65 6d 61 6c 65 29 0a | 58 2d 2d 2d 20 38 36 2c |female).|X--- 86,|
|000008c0| 31 31 34 20 2d 2d 2d 2d | 0a 58 20 20 09 09 69 6d |114 ----|.X ..im|
|000008d0| 70 6f 73 73 69 62 6c 65 | 28 22 53 74 65 61 6c 20 |possible|("Steal |
|000008e0| 66 61 69 6c 73 21 22 29 | 3b 0a 58 20 20 09 09 72 |fails!")|;.X ..r|
|000008f0| 65 74 75 72 6e 28 30 29 | 3b 0a 58 20 20 09 7d 0a |eturn(0)|;.X .}.|
|00000900| 58 20 20 09 69 66 28 6f | 74 6d 70 2d 3e 6f 5f 69 |X .if(o|tmp->o_i|
|00000910| 64 20 3d 3d 20 73 74 65 | 61 6c 6f 69 64 29 0a 58 |d == ste|aloid).X|
|00000920| 20 20 09 09 72 65 74 75 | 72 6e 28 30 29 3b 0a 58 | ..retu|rn(0);.X|
|00000930| 21 20 09 69 66 28 28 6f | 74 6d 70 2d 3e 6f 77 6f |! .if((o|tmp->owo|
|00000940| 72 6e 6d 61 73 6b 20 26 | 20 28 57 5f 41 52 4d 4f |rnmask &| (W_ARMO|
|00000950| 52 20 7c 20 57 5f 52 49 | 4e 47 20 7c 20 57 5f 54 |R | W_RI|NG | W_T|
|00000960| 4f 4f 4c 29 29 29 7b 0a | 58 20 20 09 09 73 77 69 |OOL))){.|X ..swi|
|00000970| 74 63 68 28 6f 74 6d 70 | 2d 3e 6f 6c 65 74 29 20 |tch(otmp|->olet) |
|00000980| 7b 0a 58 20 20 09 09 63 | 61 73 65 20 52 49 4e 47 |{.X ..c|ase RING|
|00000990| 5f 53 59 4d 3a 0a 58 20 | 20 09 09 09 72 69 6e 67 |_SYM:.X | ...ring|
|000009a0| 6f 66 66 28 6f 74 6d 70 | 29 3b 0a 58 20 20 09 09 |off(otmp|);.X ..|
|000009b0| 09 62 72 65 61 6b 3b 0a | 58 20 20 09 09 63 61 73 |.break;.|X ..cas|
|000009c0| 65 20 41 52 4d 4f 52 5f | 53 59 4d 3a 0a 58 20 20 |e ARMOR_|SYM:.X |
|000009d0| 09 09 09 69 66 28 6d 75 | 6c 74 69 20 3c 20 30 20 |...if(mu|lti < 0 |
|000009e0| 7c 7c 20 6f 74 6d 70 20 | 3d 3d 20 75 61 72 6d 73 ||| otmp |== uarms|
|000009f0| 29 7b 0a 58 20 20 09 09 | 09 20 20 73 65 74 77 6f |){.X ..|. setwo|
|00000a00| 72 6e 28 28 73 74 72 75 | 63 74 20 6f 62 6a 20 2a |rn((stru|ct obj *|
|00000a10| 29 20 30 2c 20 6f 74 6d | 70 2d 3e 6f 77 6f 72 6e |) 0, otm|p->oworn|
|00000a20| 6d 61 73 6b 20 26 20 57 | 5f 41 52 4d 4f 52 29 3b |mask & W|_ARMOR);|
|00000a30| 0a 58 20 20 09 09 09 20 | 20 62 72 65 61 6b 3b 0a |.X ... | break;.|
|00000a40| 58 2b 20 09 09 09 7d 0a | 58 2b 20 09 09 63 61 73 |X+ ...}.|X+ ..cas|
|00000a50| 65 20 54 4f 4f 4c 5f 53 | 59 4d 3a 0a 58 2b 20 09 |e TOOL_S|YM:.X+ .|
|00000a60| 09 09 69 66 28 6f 74 6d | 70 2d 3e 6f 74 79 70 20 |..if(otm|p->otyp |
|00000a70| 3d 3d 20 42 4c 49 4e 44 | 46 4f 4c 44 29 7b 0a 58 |== BLIND|FOLD){.X|
|00000a80| 2b 20 09 09 09 09 42 6c | 69 6e 64 66 6f 6c 64 65 |+ ....Bl|indfolde|
|00000a90| 64 20 3d 20 30 3b 0a 58 | 2b 20 09 09 09 09 69 66 |d = 0;.X|+ ....if|
|00000aa0| 28 21 42 6c 69 6e 64 65 | 64 29 20 42 6c 69 6e 64 |(!Blinde|d) Blind|
|00000ab0| 65 64 20 3d 20 31 3b 0a | 58 2b 20 09 09 09 09 62 |ed = 1;.|X+ ....b|
|00000ac0| 72 65 61 6b 3b 0a 58 2b | 20 09 09 09 7d 0a 58 2b |reak;.X+| ...}.X+|
|00000ad0| 20 09 09 09 65 6c 73 65 | 20 69 66 28 6f 74 6d 70 | ...else| if(otmp|
|00000ae0| 2d 3e 6f 74 79 70 20 3d | 3d 20 42 41 44 47 45 29 |->otyp =|= BADGE)|
|00000af0| 7b 0a 58 2b 20 09 09 09 | 09 42 61 64 67 65 64 20 |{.X+ ...|.Badged |
|00000b00| 3d 20 30 3b 0a 58 2b 20 | 09 09 09 09 62 72 65 61 |= 0;.X+ |....brea|
|00000b10| 6b 3b 0a 58 20 20 09 09 | 09 7d 0a 58 20 20 09 09 |k;.X ..|.}.X ..|
|00000b20| 7b 20 69 6e 74 20 63 75 | 72 73 73 76 20 3d 20 6f |{ int cu|rssv = o|
|00000b30| 74 6d 70 2d 3e 63 75 72 | 73 65 64 3b 0a 58 20 20 |tmp->cur|sed;.X |
|00000b40| 09 09 09 6f 74 6d 70 2d | 3e 63 75 72 73 65 64 20 |...otmp-|>cursed |
|00000b50| 3d 20 30 3b 0a 58 20 20 | 09 09 09 73 74 6f 70 5f |= 0;.X |...stop_|
|00000b60| 6f 63 63 75 70 61 74 69 | 6f 6e 28 29 3b 0a 58 20 |occupati|on();.X |
|00000b70| 20 09 09 09 69 66 28 66 | 6c 61 67 73 2e 66 65 6d | ...if(f|lags.fem|
|00000b80| 61 6c 65 29 0a 58 0a 58 | 0a 58 2d 2d 2d 2d 2d 2d |ale).X.X|.X------|
|00000b90| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000ba0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 63 |--------|-------c|
|00000bb0| 75 74 20 68 65 72 65 2d | 2d 2d 2d 2d 2d 2d 2d 2d |ut here-|--------|
|00000bc0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000bd0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000be0| 2d 2d 2d 0a 58 0a 58 2a | 2a 2a 2a 2a 2a 2a 2a 2a |---.X.X*|********|
|00000bf0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000c00| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000c10| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000c20| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000c30| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 0a 58 2a 20 52 |********|***.X* R|
|00000c40| 61 6e 64 79 20 41 20 4a | 61 63 6b 73 6f 6e 20 20 |andy A J|ackson |
|00000c50| 20 20 20 20 20 20 20 42 | 65 6c 6c 63 6f 72 65 20 | B|ellcore |
|00000c60| 20 20 20 20 20 20 20 20 | 72 61 6a 40 63 74 74 21 | |raj@ctt!|
|00000c70| 62 65 6c 6c 63 6f 72 65 | 2e 63 6f 6d 20 20 20 20 |bellcore|.com |
|00000c80| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000c90| 2a 0a 58 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |*.X*****|********|
|00000ca0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000cb0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000cc0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000cd0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000ce0| 2a 2a 2a 2a 2a 2a 2a 0a | 58 0a 58 0a 58 50 61 74 |*******.|X.X.XPat|
|00000cf0| 68 3a 20 74 65 6b 72 65 | 64 21 74 65 6b 67 65 6e |h: tekre|d!tekgen|
|00000d00| 21 74 65 6b 74 72 6f 6e | 69 78 21 75 75 6e 65 74 |!tektron|ix!uunet|
|00000d10| 21 68 75 73 63 36 21 62 | 6c 6f 6f 6d 2d 62 65 61 |!husc6!b|loom-bea|
|00000d20| 63 6f 6e 21 6d 69 74 2d | 65 64 64 69 65 21 75 77 |con!mit-|eddie!uw|
|00000d30| 2d 62 65 61 76 65 72 21 | 63 6f 72 6e 65 6c 6c 21 |-beaver!|cornell!|
|00000d40| 67 69 6c 0a 58 46 72 6f | 6d 3a 20 67 69 6c 40 73 |gil.XFro|m: gil@s|
|00000d50| 76 61 78 2e 63 73 2e 63 | 6f 72 6e 65 6c 6c 2e 65 |vax.cs.c|ornell.e|
|00000d60| 64 75 20 28 47 69 6c 20 | 4e 65 69 67 65 72 29 0a |du (Gil |Neiger).|
|00000d70| 58 4e 65 77 73 67 72 6f | 75 70 73 3a 20 63 6f 6d |XNewsgro|ups: com|
|00000d80| 70 2e 73 6f 75 72 63 65 | 73 2e 67 61 6d 65 73 2e |p.source|s.games.|
|00000d90| 62 75 67 73 2c 72 65 63 | 2e 67 61 6d 65 73 2e 68 |bugs,rec|.games.h|
|00000da0| 61 63 6b 0a 58 53 75 62 | 6a 65 63 74 3a 20 45 6d |ack.XSub|ject: Em|
|00000db0| 70 74 79 20 48 69 76 65 | 73 0a 58 4d 65 73 73 61 |pty Hive|s.XMessa|
|00000dc0| 67 65 2d 49 44 3a 20 3c | 31 37 33 39 35 40 63 6f |ge-ID: <|17395@co|
|00000dd0| 72 6e 65 6c 6c 2e 55 55 | 43 50 3e 0a 58 44 61 74 |rnell.UU|CP>.XDat|
|00000de0| 65 3a 20 31 38 20 4d 61 | 79 20 38 38 20 31 36 3a |e: 18 Ma|y 88 16:|
|00000df0| 33 35 3a 30 33 20 47 4d | 54 0a 58 53 65 6e 64 65 |35:03 GM|T.XSende|
|00000e00| 72 3a 20 6e 6f 62 6f 64 | 79 40 63 6f 72 6e 65 6c |r: nobod|y@cornel|
|00000e10| 6c 2e 55 55 43 50 0a 58 | 52 65 70 6c 79 2d 54 6f |l.UUCP.X|Reply-To|
|00000e20| 3a 20 67 69 6c 40 63 73 | 2e 63 6f 72 6e 65 6c 6c |: gil@cs|.cornell|
|00000e30| 2e 65 64 75 20 28 47 69 | 6c 20 4e 65 69 67 65 72 |.edu (Gi|l Neiger|
|00000e40| 29 0a 58 44 69 73 74 72 | 69 62 75 74 69 6f 6e 3a |).XDistr|ibution:|
|00000e50| 20 63 6f 6d 70 0a 58 4f | 72 67 61 6e 69 7a 61 74 | comp.XO|rganizat|
|00000e60| 69 6f 6e 3a 20 43 6f 72 | 6e 65 6c 6c 20 55 6e 69 |ion: Cor|nell Uni|
|00000e70| 76 2e 20 43 53 20 44 65 | 70 74 2c 20 49 74 68 61 |v. CS De|pt, Itha|
|00000e80| 63 61 20 4e 59 0a 58 4c | 69 6e 65 73 3a 20 31 30 |ca NY.XL|ines: 10|
|00000e90| 0a 58 58 72 65 66 3a 20 | 74 65 6b 72 65 64 20 63 |.XXref: |tekred c|
|00000ea0| 6f 6d 70 2e 73 6f 75 72 | 63 65 73 2e 67 61 6d 65 |omp.sour|ces.game|
|00000eb0| 73 2e 62 75 67 73 3a 31 | 36 36 20 72 65 63 2e 67 |s.bugs:1|66 rec.g|
|00000ec0| 61 6d 65 73 2e 68 61 63 | 6b 3a 32 37 35 37 0a 58 |ames.hac|k:2757.X|
|00000ed0| 0a 58 4e 65 74 68 61 63 | 6b 20 69 73 20 63 75 72 |.XNethac|k is cur|
|00000ee0| 72 65 6e 74 6c 79 20 73 | 65 74 20 75 70 20 74 6f |rently s|et up to|
|00000ef0| 20 63 72 65 61 74 65 20 | 62 65 65 68 69 76 65 73 | create |beehives|
|00000f00| 20 77 68 65 74 68 65 72 | 20 6f 72 20 6e 6f 74 20 | whether| or not |
|00000f10| 6b 69 6c 6c 65 72 0a 58 | 62 65 65 73 20 68 61 76 |killer.X|bees hav|
|00000f20| 65 20 62 65 65 6e 20 67 | 65 6e 6f 63 69 64 65 64 |e been g|enocided|
|00000f30| 2e 20 20 54 68 69 73 20 | 73 65 65 6d 73 20 74 6f |. This |seems to|
|00000f40| 20 6d 61 6b 65 20 67 65 | 6e 6f 63 69 64 69 6e 67 | make ge|nociding|
|00000f50| 20 62 65 65 73 20 74 6f | 6f 20 6d 75 63 68 0a 58 | bees to|o much.X|
|00000f60| 6f 66 20 61 20 77 69 6e | 3b 20 79 6f 75 20 66 69 |of a win|; you fi|
|00000f70| 6e 64 20 68 69 76 65 73 | 20 66 75 6c 6c 20 6f 66 |nd hives| full of|
|00000f80| 20 6a 65 6c 6c 79 2c 20 | 62 75 74 20 6e 6f 20 62 | jelly, |but no b|
|00000f90| 65 65 73 2e 20 20 54 68 | 65 20 66 6f 6c 6c 6f 77 |ees. Th|e follow|
|00000fa0| 69 6e 67 20 66 69 78 0a | 58 74 6f 20 6d 6b 6c 65 |ing fix.|Xto mkle|
|00000fb0| 76 2e 63 20 74 61 6b 65 | 73 20 63 61 72 65 20 6f |v.c take|s care o|
|00000fc0| 66 20 74 68 69 73 2e 20 | 20 43 68 61 6e 67 65 20 |f this. | Change |
|00000fd0| 6c 69 6e 65 20 32 30 37 | 20 28 6e 65 74 68 61 63 |line 207| (nethac|
|00000fe0| 6b 20 32 2e 33 29 20 66 | 72 6f 6d 0a 58 0a 58 09 |k 2.3) f|rom.X.X.|
|00000ff0| 20 69 66 28 64 6c 65 76 | 65 6c 20 3e 20 39 20 26 | if(dlev|el > 9 &|
|00001000| 26 20 21 72 6e 32 28 35 | 29 29 20 6d 6b 72 6f 6f |& !rn2(5|)) mkroo|
|00001010| 6d 28 42 45 45 48 49 56 | 45 29 3b 0a 58 74 6f 0a |m(BEEHIV|E);.Xto.|
|00001020| 58 09 20 69 66 28 64 6c | 65 76 65 6c 20 3e 20 39 |X. if(dl|evel > 9|
|00001030| 20 26 26 20 21 72 6e 32 | 28 35 29 20 26 26 20 21 | && !rn2|(5) && !|
|00001040| 69 6e 64 65 78 28 66 75 | 74 5f 67 65 6e 6f 2c 27 |index(fu|t_geno,'|
|00001050| 6b 27 29 29 20 6d 6b 72 | 6f 6f 6d 28 42 45 45 48 |k')) mkr|oom(BEEH|
|00001060| 49 56 45 29 3b 0a 58 09 | 0a 58 09 09 09 09 09 2d |IVE);.X.|.X.....-|
|00001070| 20 47 69 6c 20 4e 65 69 | 67 65 72 0a 58 0a 58 0a | Gil Nei|ger.X.X.|
|00001080| 58 50 61 74 68 3a 20 74 | 65 6b 72 65 64 21 74 65 |XPath: t|ekred!te|
|00001090| 6b 67 65 6e 21 74 65 6b | 74 72 6f 6e 69 78 21 75 |kgen!tek|tronix!u|
|000010a0| 75 6e 65 74 21 6d 63 76 | 61 78 21 69 6e 72 69 61 |unet!mcv|ax!inria|
|000010b0| 21 61 78 69 73 21 6a 63 | 63 0a 58 46 72 6f 6d 3a |!axis!jc|c.XFrom:|
|000010c0| 20 6a 63 63 40 61 78 69 | 73 2e 66 72 20 28 4a 65 | jcc@axi|s.fr (Je|
|000010d0| 61 6e 2d 43 68 72 69 73 | 74 6f 70 68 65 20 43 6f |an-Chris|tophe Co|
|000010e0| 6c 6c 65 74 29 0a 58 4e | 65 77 73 67 72 6f 75 70 |llet).XN|ewsgroup|
|000010f0| 73 3a 20 72 65 63 2e 67 | 61 6d 65 73 2e 68 61 63 |s: rec.g|ames.hac|
|00001100| 6b 2c 63 6f 6d 70 2e 73 | 6f 75 72 63 65 73 2e 67 |k,comp.s|ources.g|
|00001110| 61 6d 65 73 2e 62 75 67 | 73 0a 58 53 75 62 6a 65 |ames.bug|s.XSubje|
|00001120| 63 74 3a 20 54 77 6f 20 | 4e 65 74 68 61 63 6b 20 |ct: Two |Nethack |
|00001130| 32 2e 33 20 6d 69 6e 6f | 72 20 62 75 67 73 20 66 |2.3 mino|r bugs f|
|00001140| 69 78 65 64 0a 58 4d 65 | 73 73 61 67 65 2d 49 44 |ixed.XMe|ssage-ID|
|00001150| 3a 20 3c 33 37 38 40 61 | 78 69 73 2e 66 72 3e 0a |: <378@a|xis.fr>.|
|00001160| 58 44 61 74 65 3a 20 32 | 30 20 4d 61 79 20 38 38 |XDate: 2|0 May 88|
|00001170| 20 31 35 3a 33 31 3a 35 | 37 20 47 4d 54 0a 58 4f | 15:31:5|7 GMT.XO|
|00001180| 72 67 61 6e 69 7a 61 74 | 69 6f 6e 3a 20 41 78 69 |rganizat|ion: Axi|
|00001190| 73 20 44 69 67 69 74 61 | 6c 2c 20 50 61 72 69 73 |s Digita|l, Paris|
|000011a0| 0a 58 4c 69 6e 65 73 3a | 20 36 38 0a 58 58 72 65 |.XLines:| 68.XXre|
|000011b0| 66 3a 20 74 65 6b 72 65 | 64 20 72 65 63 2e 67 61 |f: tekre|d rec.ga|
|000011c0| 6d 65 73 2e 68 61 63 6b | 3a 32 37 36 38 20 63 6f |mes.hack|:2768 co|
|000011d0| 6d 70 2e 73 6f 75 72 63 | 65 73 2e 67 61 6d 65 73 |mp.sourc|es.games|
|000011e0| 2e 62 75 67 73 3a 31 36 | 39 0a 58 0a 58 0a 58 48 |.bugs:16|9.X.X.XH|
|000011f0| 69 20 66 6f 6c 6b 73 2c | 0a 58 0a 58 4d 65 20 61 |i folks,|.X.XMe a|
|00001200| 67 61 69 6e 2c 20 77 69 | 74 68 20 74 77 6f 20 6d |gain, wi|th two m|
|00001210| 69 6e 6f 72 20 62 75 67 | 73 20 66 69 78 65 64 20 |inor bug|s fixed |
|00001220| 3a 0a 58 0a 58 09 31 29 | 20 49 20 73 75 63 63 65 |:.X.X.1)| I succe|
|00001230| 65 64 65 64 20 69 6e 20 | 67 65 74 74 69 6e 67 20 |eded in |getting |
|00001240| 74 68 65 20 66 6f 6c 6f | 77 69 6e 67 20 69 6e 76 |the folo|wing inv|
|00001250| 65 6e 74 6f 72 79 20 3a | 0a 58 0a 58 09 09 41 72 |entory :|.X.X..Ar|
|00001260| 6d 6f 72 73 0a 58 09 09 | 61 20 2d 20 61 20 2b 30 |mors.X..|a - a +0|
|00001270| 20 65 6c 76 65 6e 20 63 | 6c 6f 61 6b 20 28 62 65 | elven c|loak (be|
|00001280| 69 6e 67 20 77 6f 72 6e | 29 0a 58 09 09 78 20 2d |ing worn|).X..x -|
|00001290| 20 61 20 63 75 72 73 65 | 64 20 2b 30 20 65 6c 76 | a curse|d +0 elv|
|000012a0| 65 6e 20 63 6c 6f 61 6b | 20 28 62 65 69 6e 67 20 |en cloak| (being |
|000012b0| 77 6f 72 6e 29 0a 58 09 | 09 2e 2e 2e 0a 58 09 57 |worn).X.|.....X.W|
|000012c0| 68 65 6e 20 79 6f 75 20 | 6f 6e 6c 79 20 77 65 61 |hen you |only wea|
|000012d0| 72 20 61 6e 20 65 6c 76 | 65 6e 20 63 6c 6f 61 6b |r an elv|en cloak|
|000012e0| 2c 20 79 6f 75 20 63 61 | 6e 20 77 65 61 72 20 61 |, you ca|n wear a|
|000012f0| 6e 6f 74 68 65 72 20 6f | 6e 65 20 6f 6e 20 74 6f |nother o|ne on to|
|00001300| 70 0a 58 09 6f 66 20 74 | 68 65 20 66 69 72 73 74 |p.X.of t|he first|
|00001310| 20 28 20 4f 6e 65 20 66 | 6f 72 20 74 68 65 20 66 | ( One f|or the f|
|00001320| 72 6f 6e 74 20 26 20 6f | 6e 65 20 66 6f 72 20 74 |ront & o|ne for t|
|00001330| 68 65 20 62 61 63 6b 20 | 3a 2d 29 20 29 0a 58 09 |he back |:-) ).X.|
|00001340| 48 65 72 65 20 69 73 20 | 74 68 65 20 66 69 78 20 |Here is |the fix |
|00001350| 3a 0a 58 09 0a 58 09 09 | 0a 58 64 6f 5f 77 65 61 |:.X..X..|.Xdo_wea|
|00001360| 72 2e 63 20 3a 20 6c 69 | 6e 65 20 31 38 33 20 69 |r.c : li|ne 183 i|
|00001370| 6e 20 64 6f 77 65 61 72 | 61 72 6d 28 29 0a 58 77 |n dowear|arm().Xw|
|00001380| 61 73 20 3a 0a 58 09 09 | 69 66 28 75 61 72 6d 29 |as :.X..|if(uarm)|
|00001390| 20 7b 0a 58 09 09 09 69 | 66 28 6f 74 6d 70 2d 3e | {.X...i|f(otmp->|
|000013a0| 6f 74 79 70 20 21 3d 20 | 45 4c 56 45 4e 5f 43 4c |otyp != |ELVEN_CL|
|000013b0| 4f 41 4b 20 7c 7c 20 75 | 61 72 6d 32 29 20 7b 0a |OAK || u|arm2) {.|
|000013c0| 58 09 09 09 09 70 6c 69 | 6e 65 28 22 59 6f 75 20 |X....pli|ne("You |
|000013d0| 61 72 65 20 61 6c 72 65 | 61 64 79 20 77 65 61 72 |are alre|ady wear|
|000013e0| 69 6e 67 20 73 6f 6d 65 | 20 61 72 6d 6f 72 2e 22 |ing some| armor."|
|000013f0| 29 3b 0a 58 09 09 09 09 | 65 72 72 2b 2b 3b 0a 58 |);.X....|err++;.X|
|00001400| 09 09 09 7d 0a 58 09 09 | 7d 0a 58 6d 6f 64 69 66 |...}.X..|}.Xmodif|
|00001410| 79 20 69 74 20 74 6f 20 | 3a 0a 58 09 09 69 66 28 |y it to |:.X..if(|
|00001420| 75 61 72 6d 29 20 7b 0a | 58 21 09 09 09 69 66 28 |uarm) {.|X!...if(|
|00001430| 6f 74 6d 70 2d 3e 6f 74 | 79 70 20 21 3d 20 45 4c |otmp->ot|yp != EL|
|00001440| 56 45 4e 5f 43 4c 4f 41 | 4b 20 7c 7c 20 0a 58 2b |VEN_CLOA|K || .X+|
|00001450| 09 09 09 09 75 61 72 6d | 2d 3e 6f 74 79 70 20 3d |....uarm|->otyp =|
|00001460| 3d 20 45 4c 56 45 4e 5f | 43 4c 4f 41 4b 20 7c 7c |= ELVEN_|CLOAK |||
|00001470| 20 75 61 72 6d 32 29 20 | 7b 0a 58 09 09 09 09 70 | uarm2) |{.X....p|
|00001480| 6c 69 6e 65 28 22 59 6f | 75 20 61 72 65 20 61 6c |line("Yo|u are al|
|00001490| 72 65 61 64 79 20 77 65 | 61 72 69 6e 67 20 73 6f |ready we|aring so|
|000014a0| 6d 65 20 61 72 6d 6f 72 | 2e 22 29 3b 0a 58 09 09 |me armor|.");.X..|
|000014b0| 09 09 65 72 72 2b 2b 3b | 0a 58 09 09 09 7d 0a 58 |..err++;|.X...}.X|
|000014c0| 09 09 7d 0a 58 0a 58 09 | 32 29 20 53 6f 6d 65 74 |..}.X.X.|2) Somet|
|000014d0| 69 6d 65 73 2c 20 68 65 | 72 65 2c 20 6f 75 72 20 |imes, he|re, our |
|000014e0| 41 72 63 68 65 6f 6c 6f | 67 69 73 74 20 28 4e 69 |Archeolo|gist (Ni|
|000014f0| 6e 6a 61 2e 2e 2e 29 20 | 73 74 61 72 74 73 20 77 |nja...) |starts w|
|00001500| 69 74 68 20 33 20 70 69 | 63 6b 2d 61 78 65 73 0a |ith 3 pi|ck-axes.|
|00001510| 58 09 20 20 20 6f 72 20 | 32 20 6c 61 72 67 65 20 |X. or |2 large |
|00001520| 62 6f 78 65 73 20 28 33 | 20 62 6c 69 6e 64 66 6f |boxes (3| blindfo|
|00001530| 6c 64 73 29 20 65 74 63 | 2e 2e 2e 0a 58 09 20 20 |lds) etc|....X. |
|00001540| 20 49 74 20 63 6f 6d 65 | 73 20 66 72 6f 6d 20 74 | It come|s from t|
|00001550| 68 65 20 47 52 45 4e 41 | 44 45 53 20 63 6f 64 65 |he GRENA|DES code|
|00001560| 20 77 68 69 63 68 2c 20 | 69 6e 20 6d 6b 6f 62 6a | which, |in mkobj|
|00001570| 2e 63 2c 20 66 6f 72 63 | 65 73 20 74 68 65 0a 58 |.c, forc|es the.X|
|00001580| 09 20 20 20 71 75 61 6e | 74 69 74 79 20 74 6f 20 |. quan|tity to |
|00001590| 62 65 20 64 69 66 66 65 | 72 65 6e 74 20 66 72 6f |be diffe|rent fro|
|000015a0| 6d 20 31 20 61 6e 64 20 | 69 6e 20 69 6e 69 5f 69 |m 1 and |in ini_i|
|000015b0| 6e 76 20 28 66 72 6f 6d | 20 75 5f 69 6e 69 74 2e |nv (from| u_init.|
|000015c0| 63 29 0a 58 09 20 20 20 | 74 68 65 20 65 78 61 63 |c).X. |the exac|
|000015d0| 74 20 6e 61 74 75 72 65 | 20 28 6f 62 6a 2d 3e 6f |t nature| (obj->o|
|000015e0| 74 79 70 29 20 6f 66 20 | 74 68 65 20 67 65 6e 65 |typ) of |the gene|
|000015f0| 72 61 74 65 64 20 6f 62 | 6a 65 63 74 20 69 73 20 |rated ob|ject is |
|00001600| 73 65 74 20 61 66 74 65 | 72 0a 58 09 20 20 20 6d |set afte|r.X. m|
|00001610| 6b 6f 62 6a 20 68 61 73 | 20 62 65 65 6e 20 63 61 |kobj has| been ca|
|00001620| 6c 6c 65 64 2e 2e 2e 0a | 58 0a 58 09 20 20 20 73 |lled....|X.X. s|
|00001630| 6f 20 68 65 72 65 20 69 | 73 20 61 20 70 6f 73 73 |o here i|s a poss|
|00001640| 69 62 6c 65 20 66 69 78 | 20 3a 0a 58 0a 58 69 6e |ible fix| :.X.Xin|
|00001650| 20 75 5f 69 6e 69 74 2e | 63 2c 20 6c 69 6e 65 20 | u_init.|c, line |
|00001660| 35 34 39 20 28 68 65 72 | 65 2c 20 70 72 6f 62 61 |549 (her|e, proba|
|00001670| 62 6c 79 20 64 69 66 66 | 65 72 65 6e 74 20 61 6e |bly diff|erent an|
|00001680| 79 77 68 65 72 65 20 65 | 6c 73 65 29 20 69 6e 20 |ywhere e|lse) in |
|00001690| 69 6e 69 5f 69 6e 76 28 | 29 0a 58 77 61 73 20 3a |ini_inv(|).Xwas :|
|000016a0| 0a 58 09 09 69 66 28 6f | 62 6a 2d 3e 6f 6c 65 74 |.X..if(o|bj->olet|
|000016b0| 20 3d 3d 20 57 45 41 50 | 4f 4e 5f 53 59 4d 29 7b | == WEAP|ON_SYM){|
|000016c0| 0a 58 09 09 09 6f 62 6a | 2d 3e 71 75 61 6e 20 3d |.X...obj|->quan =|
|000016d0| 20 74 72 6f 70 2d 3e 74 | 72 71 75 61 6e 3b 0a 58 | trop->t|rquan;.X|
|000016e0| 09 09 09 74 72 6f 70 2d | 3e 74 72 71 75 61 6e 20 |...trop-|>trquan |
|000016f0| 3d 20 31 3b 0a 58 09 09 | 7d 0a 58 6d 6f 64 69 66 |= 1;.X..|}.Xmodif|
|00001700| 79 20 69 74 20 74 6f 20 | 3a 0a 58 09 09 69 66 28 |y it to |:.X..if(|
|00001710| 6f 62 6a 2d 3e 6f 6c 65 | 74 20 3d 3d 20 57 45 41 |obj->ole|t == WEA|
|00001720| 50 4f 4e 5f 53 59 4d 29 | 7b 0a 58 09 09 09 6f 62 |PON_SYM)|{.X...ob|
|00001730| 6a 2d 3e 71 75 61 6e 20 | 3d 20 74 72 6f 70 2d 3e |j->quan |= trop->|
|00001740| 74 72 71 75 61 6e 3b 0a | 58 09 09 09 74 72 6f 70 |trquan;.|X...trop|
|00001750| 2d 3e 74 72 71 75 61 6e | 20 3d 20 31 3b 0a 58 21 |->trquan| = 1;.X!|
|00001760| 09 09 7d 20 65 6c 73 65 | 0a 58 2b 09 09 09 6f 62 |..} else|.X+...ob|
|00001770| 6a 2d 3e 71 75 61 6e 20 | 20 3d 20 31 3b 0a 58 0a |j->quan | = 1;.X.|
|00001780| 58 48 61 70 70 79 20 68 | 61 63 6b 69 6e 67 0a 58 |XHappy h|acking.X|
|00001790| 6a 63 63 0a 58 0a 58 2d | 2d 2d 2d 2d 2d 2d 2d 2d |jcc.X.X-|--------|
|000017a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000017b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000017c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000017d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000017e0| 2d 2d 2d 2d 2d 2d 0a 58 | 6a 63 63 40 61 78 69 73 |------.X|jcc@axis|
|000017f0| 2e 66 72 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.fr | |
|00001800| 21 20 22 41 6e 20 61 72 | 74 69 66 69 63 69 61 6c |! "An ar|tificial|
|00001810| 20 69 6e 74 65 6c 6c 69 | 67 65 6e 63 65 20 69 73 | intelli|gence is|
|00001820| 20 62 65 74 74 65 72 20 | 74 68 61 6e 20 6e 6f 6e | better |than non|
|00001830| 65 20 21 22 0a 58 2e 2e | 21 6d 63 76 61 78 21 69 |e !".X..|!mcvax!i|
|00001840| 6e 72 69 61 21 61 78 69 | 73 21 6a 63 63 20 21 20 |nria!axi|s!jcc ! |
|00001850| 22 41 72 74 69 66 69 63 | 69 61 6c 20 69 6e 74 65 |"Artific|ial inte|
|00001860| 6c 6c 69 67 65 6e 63 65 | 20 6d 61 74 63 68 65 73 |lligence| matches|
|00001870| 20 6e 61 74 75 72 61 6c | 20 73 74 75 70 69 64 69 | natural| stupidi|
|00001880| 74 79 20 21 22 0a 58 43 | 6f 6c 6c 65 74 20 6a 65 |ty !".XC|ollet je|
|00001890| 61 6e 2d 63 68 72 69 73 | 74 6f 70 68 65 20 20 21 |an-chris|tophe !|
|000018a0| 20 22 4f 62 6a 65 74 73 | 20 69 6e 61 6e 69 6d 65 | "Objets| inanime|
|000018b0| 73 20 61 76 65 7a 20 76 | 6f 75 73 20 64 6f 6e 63 |s avez v|ous donc|
|000018c0| 20 75 6e 65 20 61 6d 65 | 20 3f 22 0a 58 2d 2d 2d | une ame| ?".X---|
|000018d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000018e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000018f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001900| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001910| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0a 58 09 41 |--------|----.X.A|
|00001920| 78 69 73 20 44 69 67 69 | 74 61 6c 20 20 20 20 20 |xis Digi|tal |
|00001930| 20 20 20 7c 0a 58 09 31 | 33 35 20 72 75 65 20 64 | |.X.1|35 rue d|
|00001940| 27 61 67 75 65 73 73 65 | 61 75 20 7c 20 20 20 20 |'aguesse|au | |
|00001950| 20 20 20 3c 74 68 69 73 | 20 73 70 61 63 65 20 6c | <this| space l|
|00001960| 65 66 74 20 69 6e 74 65 | 6e 74 69 6f 6e 61 6c 79 |eft inte|ntionaly|
|00001970| 20 62 6c 61 6e 6b 3e 0a | 58 09 39 32 31 30 30 20 | blank>.|X.92100 |
|00001980| 42 6f 75 6c 6f 67 6e 65 | 20 20 20 20 20 20 7c 0a |Boulogne| |.|
|00001990| 58 09 46 72 61 6e 63 65 | 20 20 20 20 20 20 20 20 |X.France| |
|000019a0| 20 20 20 20 20 20 7c 0a | 58 2d 2d 2d 2d 2d 2d 2d | |.|X-------|
|000019b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000019c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000019d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000019e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000019f0| 2d 2d 2d 2d 2d 2d 2d 2d | 0a 58 0a 58 0a 58 50 61 |--------|.X.X.XPa|
|00001a00| 74 68 3a 20 74 65 6b 72 | 65 64 21 74 65 6b 67 65 |th: tekr|ed!tekge|
|00001a10| 6e 21 74 65 6b 74 72 6f | 6e 69 78 21 75 75 6e 65 |n!tektro|nix!uune|
|00001a20| 74 21 68 75 73 63 36 21 | 62 6c 6f 6f 6d 2d 62 65 |t!husc6!|bloom-be|
|00001a30| 61 63 6f 6e 21 62 75 2d | 63 73 21 70 75 72 64 75 |acon!bu-|cs!purdu|
|00001a40| 65 21 64 65 63 77 72 6c | 21 68 70 6c 61 62 73 21 |e!decwrl|!hplabs!|
|00001a50| 73 64 63 72 64 63 66 21 | 74 72 77 72 62 21 75 63 |sdcrdcf!|trwrb!uc|
|00001a60| 6c 61 2d 61 6e 21 72 65 | 6d 73 69 74 21 73 74 62 |la-an!re|msit!stb|
|00001a70| 21 6d 69 63 68 61 65 6c | 0a 58 46 72 6f 6d 3a 20 |!michael|.XFrom: |
|00001a80| 6d 69 63 68 61 65 6c 40 | 73 74 62 2e 55 55 43 50 |michael@|stb.UUCP|
|00001a90| 20 28 4d 69 63 68 61 65 | 6c 29 0a 58 4e 65 77 73 | (Michae|l).XNews|
|00001aa0| 67 72 6f 75 70 73 3a 20 | 63 6f 6d 70 2e 73 6f 75 |groups: |comp.sou|
|00001ab0| 72 63 65 73 2e 67 61 6d | 65 73 2e 62 75 67 73 0a |rces.gam|es.bugs.|
|00001ac0| 58 53 75 62 6a 65 63 74 | 3a 20 6e 65 74 68 61 63 |XSubject|: nethac|
|00001ad0| 6b 20 23 69 66 64 65 66 | 3a 20 75 5f 69 6e 69 74 |k #ifdef|: u_init|
|00001ae0| 2e 63 2c 20 4d 41 52 4b | 45 52 0a 58 4d 65 73 73 |.c, MARK|ER.XMess|
|00001af0| 61 67 65 2d 49 44 3a 20 | 3c 31 30 33 31 30 40 73 |age-ID: |<10310@s|
|00001b00| 74 62 2e 55 55 43 50 3e | 0a 58 44 61 74 65 3a 20 |tb.UUCP>|.XDate: |
|00001b10| 31 39 20 4d 61 79 20 38 | 38 20 31 39 3a 35 37 3a |19 May 8|8 19:57:|
|00001b20| 30 38 20 47 4d 54 0a 58 | 52 65 70 6c 79 2d 54 6f |08 GMT.X|Reply-To|
|00001b30| 3a 20 6d 69 63 68 61 65 | 6c 40 73 74 62 2e 55 55 |: michae|l@stb.UU|
|00001b40| 43 50 20 28 4d 69 63 68 | 61 65 6c 29 0a 58 4f 72 |CP (Mich|ael).XOr|
|00001b50| 67 61 6e 69 7a 61 74 69 | 6f 6e 3a 20 53 54 42 20 |ganizati|on: STB |
|00001b60| 42 42 53 2c 20 4c 61 2c | 20 43 61 2c 20 55 73 61 |BBS, La,| Ca, Usa|
|00001b70| 2c 20 2b 31 20 32 31 33 | 20 34 35 39 20 37 32 33 |, +1 213| 459 723|
|00001b80| 31 0a 58 4c 69 6e 65 73 | 3a 20 39 0a 58 0a 58 46 |1.XLines|: 9.X.XF|
|00001b90| 69 6c 65 20 75 5f 69 6e | 69 74 2e 63 2c 20 6c 69 |ile u_in|it.c, li|
|00001ba0| 6e 65 20 34 35 31 20 68 | 61 73 20 61 6e 20 69 66 |ne 451 h|as an if|
|00001bb0| 0a 58 73 74 61 65 6d 65 | 6e 74 20 69 6e 73 69 64 |.Xstaeme|nt insid|
|00001bc0| 65 20 61 20 23 69 66 64 | 65 66 20 4d 41 52 4b 45 |e a #ifd|ef MARKE|
|00001bd0| 52 2c 20 77 69 74 68 20 | 69 74 73 20 22 65 6c 73 |R, with |its "els|
|00001be0| 65 22 20 61 66 74 65 72 | 20 74 68 65 20 23 65 6e |e" after| the #en|
|00001bf0| 64 69 66 0a 58 09 09 09 | 4d 69 63 68 61 65 6c 0a |dif.X...|Michael.|
|00001c00| 58 3a 20 2d 2d 2d 20 0a | 58 3a 20 4d 69 63 68 61 |X: --- .|X: Micha|
|00001c10| 65 6c 20 47 65 72 73 74 | 65 6e 09 09 09 20 75 75 |el Gerst|en... uu|
|00001c20| 6e 65 74 2e 75 75 2e 6e | 65 74 21 64 65 6e 77 61 |net.uu.n|et!denwa|
|00001c30| 21 73 74 62 21 6d 69 63 | 68 61 65 6c 0a 58 3a 09 |!stb!mic|hael.X:.|
|00001c40| 09 09 09 20 69 68 6e 70 | 34 21 68 65 72 6d 69 78 |... ihnp|4!hermix|
|00001c50| 21 75 63 6c 61 2d 61 6e | 21 64 65 6e 77 61 21 73 |!ucla-an|!denwa!s|
|00001c60| 74 62 21 6d 69 63 68 61 | 65 6c 0a 58 3a 09 09 09 |tb!micha|el.X:...|
|00001c70| 09 73 64 63 73 76 61 78 | 21 63 72 61 73 68 21 67 |.sdcsvax|!crash!g|
|00001c80| 72 79 70 68 6f 6e 21 64 | 65 6e 77 61 21 73 74 62 |ryphon!d|enwa!stb|
|00001c90| 21 6d 69 63 68 61 65 6c | 0a 58 3a 20 22 4d 61 63 |!michael|.X: "Mac|
|00001ca0| 68 69 6e 65 20 54 61 6b | 65 6f 76 65 72 3f 20 4a |hine Tak|eover? J|
|00001cb0| 75 73 74 20 73 61 79 20 | 6e 6f 2e 22 0a 58 3a 20 |ust say |no.".X: |
|00001cc0| 22 53 6f 63 6b 65 74 73 | 3f 20 4a 75 73 74 20 73 |"Sockets|? Just s|
|00001cd0| 61 79 20 6e 6f 2e 22 20 | 20 20 20 20 3c 2d 2d 20 |ay no." | <-- |
|00001ce0| 67 61 73 6f 6c 69 6e 65 | 0a 58 0a 58 0a 58 50 61 |gasoline|.X.X.XPa|
|00001cf0| 74 68 3a 20 74 65 6b 72 | 65 64 21 74 65 6b 67 65 |th: tekr|ed!tekge|
|00001d00| 6e 21 74 65 6b 74 72 6f | 6e 69 78 21 75 75 6e 65 |n!tektro|nix!uune|
|00001d10| 74 21 68 75 73 63 36 21 | 6d 61 69 6c 72 75 73 21 |t!husc6!|mailrus!|
|00001d20| 74 75 74 2e 63 69 73 2e | 6f 68 69 6f 2d 73 74 61 |tut.cis.|ohio-sta|
|00001d30| 74 65 2e 65 64 75 21 62 | 6c 6f 6f 6d 2d 62 65 61 |te.edu!b|loom-bea|
|00001d40| 63 6f 6e 21 62 75 2d 63 | 73 21 70 75 72 64 75 65 |con!bu-c|s!purdue|
|00001d50| 21 64 65 63 77 72 6c 21 | 68 70 6c 61 62 73 21 73 |!decwrl!|hplabs!s|
|00001d60| 64 63 72 64 63 66 21 74 | 72 77 72 62 21 75 63 6c |dcrdcf!t|rwrb!ucl|
|00001d70| 61 2d 61 6e 21 72 65 6d | 73 69 74 21 73 74 62 21 |a-an!rem|sit!stb!|
|00001d80| 6d 69 63 68 61 65 6c 0a | 58 46 72 6f 6d 3a 20 6d |michael.|XFrom: m|
|00001d90| 69 63 68 61 65 6c 40 73 | 74 62 2e 55 55 43 50 20 |ichael@s|tb.UUCP |
|00001da0| 28 4d 69 63 68 61 65 6c | 29 0a 58 4e 65 77 73 67 |(Michael|).XNewsg|
|00001db0| 72 6f 75 70 73 3a 20 63 | 6f 6d 70 2e 73 6f 75 72 |roups: c|omp.sour|
|00001dc0| 63 65 73 2e 67 61 6d 65 | 73 2e 62 75 67 73 0a 58 |ces.game|s.bugs.X|
|00001dd0| 53 75 62 6a 65 63 74 3a | 20 4e 65 74 68 61 63 6b |Subject:| Nethack|
|00001de0| 3a 20 64 6f 5f 77 65 61 | 72 2e 63 20 69 73 20 6d |: do_wea|r.c is m|
|00001df0| 69 73 73 69 6e 67 20 32 | 20 23 69 66 64 65 66 20 |issing 2| #ifdef |
|00001e00| 53 48 49 52 54 27 73 2e | 0a 58 4d 65 73 73 61 67 |SHIRT's.|.XMessag|
|00001e10| 65 2d 49 44 3a 20 3c 31 | 30 33 30 35 40 73 74 62 |e-ID: <1|0305@stb|
|00001e20| 2e 55 55 43 50 3e 0a 58 | 44 61 74 65 3a 20 31 39 |.UUCP>.X|Date: 19|
|00001e30| 20 4d 61 79 20 38 38 20 | 31 36 3a 33 37 3a 35 33 | May 88 |16:37:53|
|00001e40| 20 47 4d 54 0a 58 52 65 | 70 6c 79 2d 54 6f 3a 20 | GMT.XRe|ply-To: |
|00001e50| 6d 69 63 68 61 65 6c 40 | 73 74 62 2e 55 55 43 50 |michael@|stb.UUCP|
|00001e60| 20 28 4d 69 63 68 61 65 | 6c 29 0a 58 4f 72 67 61 | (Michae|l).XOrga|
|00001e70| 6e 69 7a 61 74 69 6f 6e | 3a 20 53 54 42 20 42 42 |nization|: STB BB|
|00001e80| 53 2c 20 4c 61 2c 20 43 | 61 2c 20 55 73 61 2c 20 |S, La, C|a, Usa, |
|00001e90| 2b 31 20 32 31 33 20 34 | 35 39 20 37 32 33 31 0a |+1 213 4|59 7231.|
|00001ea0| 58 4c 69 6e 65 73 3a 20 | 39 0a 58 0a 58 53 75 62 |XLines: |9.X.XSub|
|00001eb0| 6a 65 63 74 20 73 61 79 | 73 20 69 74 20 61 6c 6c |ject say|s it all|
|00001ec0| 2e 20 49 6e 20 74 77 6f | 20 70 6c 61 63 65 73 2c |. In two| places,|
|00001ed0| 20 75 61 72 6d 75 20 69 | 73 20 75 73 65 64 20 77 | uarmu i|s used w|
|00001ee0| 69 74 68 6f 75 74 20 61 | 6e 79 20 23 69 66 64 65 |ithout a|ny #ifde|
|00001ef0| 66 20 53 48 49 52 54 0a | 58 61 72 6f 75 6e 64 20 |f SHIRT.|Xaround |
|00001f00| 74 68 65 6d 2e 0a 58 09 | 09 09 4d 69 63 68 61 65 |them..X.|..Michae|
|00001f10| 6c 0a 58 3a 20 2d 2d 2d | 20 0a 58 3a 20 4d 69 63 |l.X: ---| .X: Mic|
|00001f20| 68 61 65 6c 20 47 65 72 | 73 74 65 6e 09 09 09 20 |hael Ger|sten... |
|00001f30| 75 75 6e 65 74 2e 75 75 | 2e 6e 65 74 21 64 65 6e |uunet.uu|.net!den|
|00001f40| 77 61 21 73 74 62 21 6d | 69 63 68 61 65 6c 0a 58 |wa!stb!m|ichael.X|
|00001f50| 3a 09 09 09 09 20 69 68 | 6e 70 34 21 68 65 72 6d |:.... ih|np4!herm|
|00001f60| 69 78 21 75 63 6c 61 2d | 61 6e 21 64 65 6e 77 61 |ix!ucla-|an!denwa|
|00001f70| 21 73 74 62 21 6d 69 63 | 68 61 65 6c 0a 58 3a 09 |!stb!mic|hael.X:.|
|00001f80| 09 09 09 73 64 63 73 76 | 61 78 21 63 72 61 73 68 |...sdcsv|ax!crash|
|00001f90| 21 67 72 79 70 68 6f 6e | 21 64 65 6e 77 61 21 73 |!gryphon|!denwa!s|
|00001fa0| 74 62 21 6d 69 63 68 61 | 65 6c 0a 58 3a 20 22 4d |tb!micha|el.X: "M|
|00001fb0| 61 63 68 69 6e 65 20 54 | 61 6b 65 6f 76 65 72 3f |achine T|akeover?|
|00001fc0| 20 4a 75 73 74 20 73 61 | 79 20 6e 6f 2e 22 0a 58 | Just sa|y no.".X|
|00001fd0| 3a 20 22 53 6f 63 6b 65 | 74 73 3f 20 4a 75 73 74 |: "Socke|ts? Just|
|00001fe0| 20 73 61 79 20 6e 6f 2e | 22 20 20 20 20 20 3c 2d | say no.|" <-|
|00001ff0| 2d 20 67 61 73 6f 6c 69 | 6e 65 0a 58 0a 58 0a 58 |- gasoli|ne.X.X.X|
|00002000| 50 61 74 68 3a 20 74 65 | 6b 72 65 64 21 74 65 6b |Path: te|kred!tek|
|00002010| 67 65 6e 21 74 65 6b 74 | 72 6f 6e 69 78 21 75 75 |gen!tekt|ronix!uu|
|00002020| 6e 65 74 21 68 75 73 63 | 36 21 62 6c 6f 6f 6d 2d |net!husc|6!bloom-|
|00002030| 62 65 61 63 6f 6e 21 6d | 69 74 2d 65 64 64 69 65 |beacon!m|it-eddie|
|00002040| 21 62 75 2d 63 73 21 70 | 75 72 64 75 65 21 64 65 |!bu-cs!p|urdue!de|
|00002050| 63 77 72 6c 21 68 70 6c | 61 62 73 21 75 63 62 76 |cwrl!hpl|abs!ucbv|
|00002060| 61 78 21 74 75 6c 6c 79 | 2e 42 65 72 6b 65 6c 65 |ax!tully|.Berkele|
|00002070| 79 2e 45 44 55 21 6d 63 | 67 72 61 74 68 0a 58 46 |y.EDU!mc|grath.XF|
|00002080| 72 6f 6d 3a 20 6d 63 67 | 72 61 74 68 40 74 75 6c |rom: mcg|rath@tul|
|00002090| 6c 79 2e 42 65 72 6b 65 | 6c 65 79 2e 45 44 55 2e |ly.Berke|ley.EDU.|
|000020a0| 62 65 72 6b 65 6c 65 79 | 2e 65 64 75 20 28 52 6f |berkeley|.edu (Ro|
|000020b0| 6c 61 6e 64 20 4d 63 47 | 72 61 74 68 29 0a 58 4e |land McG|rath).XN|
|000020c0| 65 77 73 67 72 6f 75 70 | 73 3a 20 72 65 63 2e 67 |ewsgroup|s: rec.g|
|000020d0| 61 6d 65 73 2e 68 61 63 | 6b 2c 63 6f 6d 70 2e 73 |ames.hac|k,comp.s|
|000020e0| 6f 75 72 63 65 73 2e 67 | 61 6d 65 73 2e 62 75 67 |ources.g|ames.bug|
|000020f0| 73 0a 58 53 75 62 6a 65 | 63 74 3a 20 52 65 3a 20 |s.XSubje|ct: Re: |
|00002100| 54 77 6f 20 4e 65 74 68 | 61 63 6b 20 32 2e 33 20 |Two Neth|ack 2.3 |
|00002110| 6d 69 6e 6f 72 20 62 75 | 67 73 20 66 69 78 65 64 |minor bu|gs fixed|
|00002120| 0a 58 4d 65 73 73 61 67 | 65 2d 49 44 3a 20 3c 32 |.XMessag|e-ID: <2|
|00002130| 34 31 39 31 40 75 63 62 | 76 61 78 2e 42 45 52 4b |4191@ucb|vax.BERK|
|00002140| 45 4c 45 59 2e 45 44 55 | 3e 0a 58 44 61 74 65 3a |ELEY.EDU|>.XDate:|
|00002150| 20 32 31 20 4d 61 79 20 | 38 38 20 30 36 3a 30 34 | 21 May |88 06:04|
|00002160| 3a 35 39 20 47 4d 54 0a | 58 52 65 66 65 72 65 6e |:59 GMT.|XReferen|
|00002170| 63 65 73 3a 20 3c 33 37 | 38 40 61 78 69 73 2e 66 |ces: <37|8@axis.f|
|00002180| 72 3e 0a 58 53 65 6e 64 | 65 72 3a 20 75 73 65 6e |r>.XSend|er: usen|
|00002190| 65 74 40 75 63 62 76 61 | 78 2e 42 45 52 4b 45 4c |et@ucbva|x.BERKEL|
|000021a0| 45 59 2e 45 44 55 0a 58 | 52 65 70 6c 79 2d 54 6f |EY.EDU.X|Reply-To|
|000021b0| 3a 20 72 6f 6c 61 6e 64 | 40 77 68 65 61 74 69 65 |: roland|@wheatie|
|000021c0| 73 2e 61 69 2e 6d 69 74 | 2e 65 64 75 20 28 52 6f |s.ai.mit|.edu (Ro|
|000021d0| 6c 61 6e 64 20 4d 63 47 | 72 61 74 68 29 0a 58 4f |land McG|rath).XO|
|000021e0| 72 67 61 6e 69 7a 61 74 | 69 6f 6e 3a 20 48 61 63 |rganizat|ion: Hac|
|000021f0| 6b 65 72 73 20 41 6e 6f | 6e 79 6d 6f 75 73 20 49 |kers Ano|nymous I|
|00002200| 6e 74 65 72 6e 61 74 69 | 6f 6e 61 6c 2c 20 4c 74 |nternati|onal, Lt|
|00002210| 64 2e 2c 20 49 6e 63 2e | 20 28 41 70 70 6c 69 63 |d., Inc.| (Applic|
|00002220| 61 74 69 6f 6e 73 20 77 | 65 6c 63 6f 6d 65 29 0a |ations w|elcome).|
|00002230| 58 4c 69 6e 65 73 3a 20 | 31 0a 58 58 72 65 66 3a |XLines: |1.XXref:|
|00002240| 20 74 65 6b 72 65 64 20 | 72 65 63 2e 67 61 6d 65 | tekred |rec.game|
|00002250| 73 2e 68 61 63 6b 3a 32 | 37 37 35 20 63 6f 6d 70 |s.hack:2|775 comp|
|00002260| 2e 73 6f 75 72 63 65 73 | 2e 67 61 6d 65 73 2e 62 |.sources|.games.b|
|00002270| 75 67 73 3a 31 37 32 0a | 58 0a 58 54 68 65 20 66 |ugs:172.|X.XThe f|
|00002280| 69 72 73 74 20 6f 66 20 | 74 68 65 73 65 20 69 73 |irst of |these is|
|00002290| 20 6e 6f 74 20 61 20 62 | 75 67 2e 20 20 4c 65 61 | not a b|ug. Lea|
|000022a0| 76 65 20 69 74 20 61 6c | 6f 6e 65 2e 0a 58 0a 58 |ve it al|one..X.X|
|000022b0| 0a 58 50 61 74 68 3a 20 | 74 65 6b 72 65 64 21 74 |.XPath: |tekred!t|
|000022c0| 65 6b 67 65 6e 21 74 65 | 6b 74 72 6f 6e 69 78 21 |ekgen!te|ktronix!|
|000022d0| 75 75 6e 65 74 21 68 75 | 73 63 36 21 62 6c 6f 6f |uunet!hu|sc6!bloo|
|000022e0| 6d 2d 62 65 61 63 6f 6e | 21 6d 69 74 2d 65 64 64 |m-beacon|!mit-edd|
|000022f0| 69 65 21 62 75 2d 63 73 | 21 70 75 72 64 75 65 21 |ie!bu-cs|!purdue!|
|00002300| 64 65 63 77 72 6c 21 68 | 70 6c 61 62 73 21 73 64 |decwrl!h|plabs!sd|
|00002310| 63 72 64 63 66 21 74 72 | 77 72 62 21 75 63 6c 61 |crdcf!tr|wrb!ucla|
|00002320| 2d 61 6e 21 72 65 6d 73 | 69 74 21 73 74 62 21 6d |-an!rems|it!stb!m|
|00002330| 69 63 68 61 65 6c 0a 58 | 46 72 6f 6d 3a 20 6d 69 |ichael.X|From: mi|
|00002340| 63 68 61 65 6c 40 73 74 | 62 2e 55 55 43 50 20 28 |chael@st|b.UUCP (|
|00002350| 4d 69 63 68 61 65 6c 29 | 0a 58 4e 65 77 73 67 72 |Michael)|.XNewsgr|
|00002360| 6f 75 70 73 3a 20 63 6f | 6d 70 2e 73 6f 75 72 63 |oups: co|mp.sourc|
|00002370| 65 73 2e 67 61 6d 65 73 | 2e 62 75 67 73 0a 58 53 |es.games|.bugs.XS|
|00002380| 75 62 6a 65 63 74 3a 20 | 59 41 4e 48 4d 44 20 28 |ubject: |YANHMD (|
|00002390| 79 65 74 20 61 6e 6f 74 | 68 65 72 20 4e 65 74 48 |yet anot|her NetH|
|000023a0| 61 63 6b 20 4d 69 73 2d | 44 65 66 69 6e 65 29 0a |ack Mis-|Define).|
|000023b0| 58 4d 65 73 73 61 67 65 | 2d 49 44 3a 20 3c 31 30 |XMessage|-ID: <10|
|000023c0| 33 31 36 40 73 74 62 2e | 55 55 43 50 3e 0a 58 44 |316@stb.|UUCP>.XD|
|000023d0| 61 74 65 3a 20 32 30 20 | 4d 61 79 20 38 38 20 31 |ate: 20 |May 88 1|
|000023e0| 37 3a 30 38 3a 30 35 20 | 47 4d 54 0a 58 52 65 70 |7:08:05 |GMT.XRep|
|000023f0| 6c 79 2d 54 6f 3a 20 6d | 69 63 68 61 65 6c 40 73 |ly-To: m|ichael@s|
|00002400| 74 62 2e 55 55 43 50 20 | 28 4d 69 63 68 61 65 6c |tb.UUCP |(Michael|
|00002410| 29 0a 58 4f 72 67 61 6e | 69 7a 61 74 69 6f 6e 3a |).XOrgan|ization:|
|00002420| 20 53 54 42 20 42 42 53 | 2c 20 4c 61 2c 20 43 61 | STB BBS|, La, Ca|
|00002430| 2c 20 55 73 61 2c 20 2b | 31 20 32 31 33 20 34 35 |, Usa, +|1 213 45|
|00002440| 39 20 37 32 33 31 0a 58 | 4c 69 6e 65 73 3a 20 31 |9 7231.X|Lines: 1|
|00002450| 37 0a 58 0a 58 77 6f 72 | 6e 2e 63 2c 20 6c 69 6e |7.X.Xwor|n.c, lin|
|00002460| 65 20 31 35 2c 20 75 61 | 72 6d 75 20 69 73 20 75 |e 15, ua|rmu is u|
|00002470| 73 65 64 20 77 69 74 68 | 6f 75 74 20 61 6e 79 20 |sed with|out any |
|00002480| 23 69 66 64 65 66 20 53 | 48 49 52 54 20 69 6e 20 |#ifdef S|HIRT in |
|00002490| 73 69 67 68 74 2e 0a 58 | 0a 58 75 5f 69 6e 69 74 |sight..X|.Xu_init|
|000024a0| 2e 63 2c 20 49 53 5f 4d | 41 47 49 43 20 6d 61 63 |.c, IS_M|AGIC mac|
|000024b0| 72 6f 20 75 73 65 73 20 | 53 50 42 4f 4f 4b 5f 53 |ro uses |SPBOOK_S|
|000024c0| 59 4d 20 77 69 74 68 6f | 75 74 20 63 68 65 63 6b |YM witho|ut check|
|000024d0| 69 6e 67 20 66 6f 72 20 | 73 70 65 6c 6c 73 0a 58 |ing for |spells.X|
|000024e0| 0a 58 52 6f 75 74 69 6e | 65 73 20 64 6f 63 61 73 |.XRoutin|es docas|
|000024f0| 74 28 29 2c 20 64 6f 76 | 73 70 65 6c 6c 28 29 2c |t(), dov|spell(),|
|00002500| 20 64 6f 78 63 72 69 62 | 65 28 29 2c 20 64 72 79 | doxcrib|e(), dry|
|00002510| 75 70 28 29 2c 20 6c 65 | 74 5f 74 6f 5f 6e 61 6d |up(), le|t_to_nam|
|00002520| 65 28 29 20 61 72 65 0a | 58 72 65 66 65 72 65 6e |e() are.|Xreferen|
|00002530| 63 65 64 20 77 69 74 68 | 6f 75 74 20 63 68 65 63 |ced with|out chec|
|00002540| 6b 69 6e 67 20 66 6f 72 | 20 73 70 65 6c 6c 73 2c |king for| spells,|
|00002550| 20 66 6f 75 6e 74 61 69 | 6e 73 2c 20 6f 72 20 53 | fountai|ns, or S|
|00002560| 4f 52 54 49 4e 47 20 61 | 73 20 6e 65 65 64 65 64 |ORTING a|s needed|
|00002570| 2e 0a 58 28 66 69 6c 65 | 73 3a 20 6d 6f 6e 2e 63 |..X(file|s: mon.c|
|00002580| 2c 20 69 6e 76 65 6e 74 | 2e 63 2c 20 6f 5f 69 6e |, invent|.c, o_in|
|00002590| 69 74 2e 63 29 0a 58 0a | 58 41 6c 73 6f 2c 20 69 |it.c).X.|XAlso, i|
|000025a0| 73 20 6c 65 74 5f 74 6f | 5f 6e 61 6d 65 20 73 75 |s let_to|_name su|
|000025b0| 70 70 6f 73 65 64 20 74 | 6f 20 62 65 20 64 65 70 |pposed t|o be dep|
|000025c0| 65 6e 64 65 6e 74 20 6f | 6e 20 44 47 4b 4d 4f 44 |endent o|n DGKMOD|
|000025d0| 20 6f 72 20 6f 6e 20 53 | 4f 52 54 49 4e 47 3f 0a | or on S|ORTING?.|
|000025e0| 58 28 62 6f 74 68 20 61 | 72 65 20 75 73 65 64 2c |X(both a|re used,|
|000025f0| 20 69 6e 20 6f 5f 69 6e | 69 74 2e 63 20 61 6e 64 | in o_in|it.c and|
|00002600| 20 69 6e 20 69 6e 76 65 | 6e 74 2e 63 29 0a 58 28 | in inve|nt.c).X(|
|00002610| 49 20 61 73 73 75 6d 65 | 20 53 4f 52 54 49 4e 47 |I assume| SORTING|
|00002620| 29 0a 58 3a 20 2d 2d 2d | 20 0a 58 3a 20 4d 69 63 |).X: ---| .X: Mic|
|00002630| 68 61 65 6c 20 47 65 72 | 73 74 65 6e 09 09 09 20 |hael Ger|sten... |
|00002640| 75 75 6e 65 74 2e 75 75 | 2e 6e 65 74 21 64 65 6e |uunet.uu|.net!den|
|00002650| 77 61 21 73 74 62 21 6d | 69 63 68 61 65 6c 0a 58 |wa!stb!m|ichael.X|
|00002660| 3a 09 09 09 09 20 69 68 | 6e 70 34 21 68 65 72 6d |:.... ih|np4!herm|
|00002670| 69 78 21 75 63 6c 61 2d | 61 6e 21 64 65 6e 77 61 |ix!ucla-|an!denwa|
|00002680| 21 73 74 62 21 6d 69 63 | 68 61 65 6c 0a 58 3a 09 |!stb!mic|hael.X:.|
|00002690| 09 09 09 73 64 63 73 76 | 61 78 21 63 72 61 73 68 |...sdcsv|ax!crash|
|000026a0| 21 67 72 79 70 68 6f 6e | 21 64 65 6e 77 61 21 73 |!gryphon|!denwa!s|
|000026b0| 74 62 21 6d 69 63 68 61 | 65 6c 0a 58 3a 20 22 4d |tb!micha|el.X: "M|
|000026c0| 61 63 68 69 6e 65 20 54 | 61 6b 65 6f 76 65 72 3f |achine T|akeover?|
|000026d0| 20 4a 75 73 74 20 73 61 | 79 20 6e 6f 2e 22 0a 58 | Just sa|y no.".X|
|000026e0| 3a 20 22 53 6f 63 6b 65 | 74 73 3f 20 4a 75 73 74 |: "Socke|ts? Just|
|000026f0| 20 73 61 79 20 6e 6f 2e | 22 20 20 20 20 20 3c 2d | say no.|" <-|
|00002700| 2d 20 67 61 73 6f 6c 69 | 6e 65 0a 58 0a 58 0a 58 |- gasoli|ne.X.X.X|
|00002710| 50 61 74 68 3a 20 74 65 | 6b 72 65 64 21 74 65 6b |Path: te|kred!tek|
|00002720| 67 65 6e 21 74 65 6b 74 | 72 6f 6e 69 78 21 75 75 |gen!tekt|ronix!uu|
|00002730| 6e 65 74 21 6d 75 6e 6e | 61 72 69 21 6d 75 6c 67 |net!munn|ari!mulg|
|00002740| 61 21 6d 77 70 0a 58 46 | 72 6f 6d 3a 20 6d 77 70 |a!mwp.XF|rom: mwp|
|00002750| 40 6d 75 6c 67 61 2e 6f | 7a 20 28 4d 69 63 68 61 |@mulga.o|z (Micha|
|00002760| 65 6c 20 50 61 64 64 6f | 6e 29 0a 58 4e 65 77 73 |el Paddo|n).XNews|
|00002770| 67 72 6f 75 70 73 3a 20 | 63 6f 6d 70 2e 73 6f 75 |groups: |comp.sou|
|00002780| 72 63 65 73 2e 67 61 6d | 65 73 2e 62 75 67 73 0a |rces.gam|es.bugs.|
|00002790| 58 53 75 62 6a 65 63 74 | 3a 20 4e 65 74 48 61 63 |XSubject|: NetHac|
|000027a0| 6b 32 2e 33 20 62 75 67 | 73 20 2b 20 70 61 74 63 |k2.3 bug|s + patc|
|000027b0| 68 65 73 0a 58 4b 65 79 | 77 6f 72 64 73 3a 20 6e |hes.XKey|words: n|
|000027c0| 65 74 68 61 63 6b 2c 20 | 62 75 67 73 2c 20 70 61 |ethack, |bugs, pa|
|000027d0| 74 63 68 65 73 0a 58 4d | 65 73 73 61 67 65 2d 49 |tches.XM|essage-I|
|000027e0| 44 3a 20 3c 32 37 38 36 | 40 6d 75 6c 67 61 2e 6f |D: <2786|@mulga.o|
|000027f0| 7a 3e 0a 58 44 61 74 65 | 3a 20 32 34 20 4d 61 79 |z>.XDate|: 24 May|
|00002800| 20 38 38 20 30 36 3a 33 | 35 3a 35 34 20 47 4d 54 | 88 06:3|5:54 GMT|
|00002810| 0a 58 4f 72 67 61 6e 69 | 7a 61 74 69 6f 6e 3a 20 |.XOrgani|zation: |
|00002820| 43 6f 6d 70 20 53 63 69 | 2c 20 4d 65 6c 62 6f 75 |Comp Sci|, Melbou|
|00002830| 72 6e 65 20 55 6e 69 2c | 20 41 75 73 74 72 61 6c |rne Uni,| Austral|
|00002840| 69 61 0a 58 4c 69 6e 65 | 73 3a 20 39 30 0a 58 0a |ia.XLine|s: 90.X.|
|00002850| 58 0a 58 50 61 74 63 68 | 20 23 31 0a 58 3d 3d 3d |X.XPatch| #1.X===|
|00002860| 3d 3d 3d 3d 3d 0a 58 0a | 58 54 68 65 72 65 20 69 |=====.X.|XThere i|
|00002870| 73 20 61 20 73 65 72 69 | 6f 75 73 20 62 75 67 20 |s a seri|ous bug |
|00002880| 69 6e 20 4e 65 74 48 61 | 63 6b 20 77 68 69 63 68 |in NetHa|ck which|
|00002890| 20 61 6c 6c 6f 77 73 20 | 70 6c 61 79 65 72 73 20 | allows |players |
|000028a0| 74 6f 20 67 65 74 20 61 | 6c 6d 6f 73 74 0a 58 69 |to get a|lmost.Xi|
|000028b0| 6e 66 69 6e 69 74 65 20 | 73 63 6f 72 65 73 20 28 |nfinite |scores (|
|000028c0| 62 69 6c 6c 69 6f 6e 73 | 20 6f 66 20 70 6f 69 6e |billions| of poin|
|000028d0| 74 73 29 20 77 69 74 68 | 20 65 61 73 65 2e 20 43 |ts) with| ease. C|
|000028e0| 72 65 64 69 74 20 66 6f | 72 20 66 69 6e 64 69 6e |redit fo|r findin|
|000028f0| 67 0a 58 74 68 69 73 20 | 67 6f 65 73 20 74 6f 20 |g.Xthis |goes to |
|00002900| 6f 6e 65 20 6f 66 20 6f | 75 72 20 6c 6f 63 61 6c |one of o|ur local|
|00002910| 20 4e 65 74 48 61 63 6b | 20 64 65 76 6f 74 65 65 | NetHack| devotee|
|00002920| 73 20 2d 2d 20 53 74 75 | 61 72 74 20 4d 63 43 6f |s -- Stu|art McCo|
|00002930| 72 6d 61 63 6b 2e 0a 58 | 0a 58 49 74 20 73 65 65 |rmack..X|.XIt see|
|00002940| 6d 73 20 74 68 61 74 20 | 77 68 65 6e 20 64 65 6d |ms that |when dem|
|00002950| 6f 6e 73 20 74 72 79 20 | 74 6f 20 62 6c 61 63 6b |ons try |to black|
|00002960| 6d 61 69 6c 20 79 6f 75 | 2c 20 61 20 6e 65 67 61 |mail you|, a nega|
|00002970| 74 69 76 65 20 61 6d 6f | 75 6e 74 20 6f 66 0a 58 |tive amo|unt of.X|
|00002980| 67 6f 6c 64 20 63 61 6e | 20 62 65 20 73 70 65 63 |gold can| be spec|
|00002990| 69 66 69 65 64 20 61 73 | 20 61 20 70 65 61 63 65 |ified as| a peace|
|000029a0| 20 6f 66 66 65 72 69 6e | 67 2e 20 54 68 65 20 64 | offerin|g. The d|
|000029b0| 65 6d 6f 6e 20 67 65 74 | 73 20 6d 61 64 20 61 6e |emon get|s mad an|
|000029c0| 64 0a 58 74 68 65 20 70 | 6c 61 79 65 72 20 67 65 |d.Xthe p|layer ge|
|000029d0| 74 73 20 72 69 63 68 2e | 20 54 6f 20 64 6f 20 74 |ts rich.| To do t|
|000029e0| 68 69 73 20 70 72 6f 70 | 65 72 6c 79 2c 20 6f 6e |his prop|erly, on|
|000029f0| 65 20 6d 75 73 74 20 74 | 68 65 6e 20 74 65 6c 65 |e must t|hen tele|
|00002a00| 70 6f 72 74 20 74 6f 0a | 58 6c 65 76 65 6c 20 30 |port to.|Xlevel 0|
|00002a10| 20 2d 2d 20 62 69 6c 6c | 69 6f 6e 73 20 6f 66 20 | -- bill|ions of |
|00002a20| 67 6f 6c 64 20 70 69 65 | 63 65 73 20 77 69 6c 6c |gold pie|ces will|
|00002a30| 20 63 61 75 73 65 20 65 | 76 65 6e 20 74 68 65 20 | cause e|ven the |
|00002a40| 73 74 72 6f 6e 67 65 73 | 74 0a 58 70 6c 61 79 65 |stronges|t.Xplaye|
|00002a50| 72 20 74 6f 20 63 6f 6c | 6c 61 70 73 65 2e 0a 58 |r to col|lapse..X|
|00002a60| 0a 58 54 68 69 73 20 66 | 69 78 20 28 74 6f 20 6d |.XThis f|ix (to m|
|00002a70| 68 69 74 75 2e 63 29 20 | 77 69 6c 6c 20 6d 61 6b |hitu.c) |will mak|
|00002a80| 65 20 74 68 69 73 20 74 | 61 74 69 63 20 6f 62 73 |e this t|atic obs|
|00002a90| 6f 6c 65 74 65 2e 0a 58 | 0a 58 0a 58 50 61 74 63 |olete..X|.X.XPatc|
|00002aa0| 68 20 23 32 0a 58 3d 3d | 3d 3d 3d 3d 3d 3d 0a 58 |h #2.X==|======.X|
|00002ab0| 0a 58 54 68 65 20 73 65 | 63 6f 6e 64 20 66 69 78 |.XThe se|cond fix|
|00002ac0| 20 69 6e 20 74 68 69 73 | 20 70 6f 73 74 69 6e 67 | in this| posting|
|00002ad0| 20 28 74 6f 20 7a 61 70 | 2e 63 29 20 61 64 64 72 | (to zap|.c) addr|
|00002ae0| 65 73 73 65 73 20 61 20 | 22 66 65 61 74 75 72 65 |esses a |"feature|
|00002af0| 22 0a 58 77 68 69 63 68 | 20 6d 61 6e 79 20 70 65 |".Xwhich| many pe|
|00002b00| 6f 70 6c 65 20 68 65 72 | 65 20 66 6f 75 6e 64 20 |ople her|e found |
|00002b10| 61 6e 6e 6f 79 69 6e 67 | 2e 20 44 72 61 67 6f 6e |annoying|. Dragon|
|00002b20| 73 20 77 68 69 63 68 20 | 62 72 65 61 74 68 65 20 |s which |breathe |
|00002b30| 64 65 61 74 68 0a 58 72 | 61 79 73 20 63 61 6e 20 |death.Xr|ays can |
|00002b40| 61 70 70 65 61 72 20 61 | 72 6f 75 6e 64 20 6c 65 |appear a|round le|
|00002b50| 76 65 6c 20 38 20 75 70 | 77 61 72 64 73 2c 20 61 |vel 8 up|wards, a|
|00002b60| 6e 64 20 61 72 65 20 69 | 6e 65 76 69 74 61 62 6c |nd are i|nevitabl|
|00002b70| 79 20 64 65 61 64 6c 79 | 20 61 74 0a 58 74 68 61 |y deadly| at.Xtha|
|00002b80| 74 20 73 74 61 67 65 2e | 20 49 6e 20 74 68 65 20 |t stage.| In the |
|00002b90| 69 6e 74 65 72 65 73 74 | 73 20 6f 66 20 67 61 6d |interest|s of gam|
|00002ba0| 65 20 70 6c 61 79 61 62 | 69 6c 69 74 79 20 74 68 |e playab|ility th|
|00002bb0| 69 73 20 66 69 78 20 69 | 6d 70 6c 65 6d 65 6e 74 |is fix i|mplement|
|00002bc0| 73 0a 58 61 20 73 61 76 | 69 6e 67 20 74 68 72 6f |s.Xa sav|ing thro|
|00002bd0| 77 20 76 65 72 73 75 73 | 20 65 78 70 65 72 69 65 |w versus| experie|
|00002be0| 6e 63 65 20 6c 65 76 65 | 6c 20 61 6e 64 20 6c 75 |nce leve|l and lu|
|00002bf0| 63 6b 20 77 68 65 6e 20 | 74 68 65 20 70 6c 61 79 |ck when |the play|
|00002c00| 65 72 0a 58 69 73 20 68 | 69 74 20 62 79 20 61 20 |er.Xis h|it by a |
|00002c10| 64 65 61 74 68 20 72 61 | 79 20 28 61 6e 79 20 64 |death ra|y (any d|
|00002c20| 65 61 74 68 20 72 61 79 | 20 64 75 65 20 74 68 65 |eath ray| due the|
|00002c30| 20 74 68 65 20 6d 65 74 | 68 6f 64 20 6f 66 20 69 | the met|hod of i|
|00002c40| 6d 70 6c 65 6d 65 6e 74 | 69 6e 67 0a 58 62 72 65 |mplement|ing.Xbre|
|00002c50| 61 74 68 20 77 65 61 70 | 6f 6e 73 29 2e 0a 58 0a |ath weap|ons)..X.|
|00002c60| 58 0a 58 52 65 71 75 65 | 73 74 0a 58 3d 3d 3d 3d |X.XReque|st.X====|
|00002c70| 3d 3d 3d 0a 58 0a 58 49 | 74 20 69 73 20 65 78 74 |===.X.XI|t is ext|
|00002c80| 72 65 6d 65 6c 79 20 61 | 6e 6e 6f 79 69 6e 67 20 |remely a|nnoying |
|00002c90| 74 6f 20 64 69 65 20 77 | 68 69 6c 77 20 72 65 61 |to die w|hilw rea|
|00002ca0| 64 69 6e 67 20 61 20 73 | 70 65 6c 6c 20 62 6f 6f |ding a s|pell boo|
|00002cb0| 6b 2e 0a 58 57 6f 75 6c | 64 20 69 74 20 6e 6f 74 |k..XWoul|d it not|
|00002cc0| 20 62 65 20 62 65 74 74 | 65 72 20 74 6f 20 61 6c | be bett|er to al|
|00002cd0| 6c 6f 77 20 74 68 65 20 | 70 6c 61 79 65 72 20 74 |low the |player t|
|00002ce0| 6f 20 72 65 61 63 74 20 | 61 6e 64 20 68 61 76 65 |o react |and have|
|00002cf0| 0a 58 74 68 65 20 74 72 | 61 6e 73 63 72 69 62 65 |.Xthe tr|anscribe|
|00002d00| 20 66 61 69 6c 3f 20 48 | 61 73 20 61 6e 79 6f 6e | fail? H|as anyon|
|00002d10| 65 20 69 6d 70 6c 65 6d | 65 6e 74 65 64 20 74 68 |e implem|ented th|
|00002d20| 69 73 3f 0a 58 0a 58 0a | 58 09 09 09 09 09 4d 69 |is?.X.X.|X.....Mi|
|00002d30| 63 68 61 65 6c 20 50 61 | 64 64 6f 6e 0a 58 09 09 |chael Pa|ddon.X..|
|00002d40| 09 09 09 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |...=====|========|
|00002d50| 3d 0a 58 0a 58 0a 58 2a | 2a 2a 20 6d 68 69 74 75 |=.X.X.X*|** mhitu|
|00002d60| 2e 63 2e 6f 72 69 67 09 | 4d 6f 6e 20 4d 61 79 20 |.c.orig.|Mon May |
|00002d70| 32 33 20 31 39 3a 33 30 | 3a 35 37 20 31 39 38 38 |23 19:30|:57 1988|
|00002d80| 0a 58 2d 2d 2d 20 6d 68 | 69 74 75 2e 63 09 54 75 |.X--- mh|itu.c.Tu|
|00002d90| 65 20 4d 61 79 20 32 34 | 20 31 31 3a 35 35 3a 31 |e May 24| 11:55:1|
|00002da0| 36 20 31 39 38 38 0a 58 | 2a 2a 2a 2a 2a 2a 2a 2a |6 1988.X|********|
|00002db0| 2a 2a 2a 2a 2a 2a 2a 0a | 58 2a 2a 2a 20 35 35 32 |*******.|X*** 552|
|00002dc0| 2c 35 35 38 0a 58 20 20 | 09 20 20 20 20 67 65 74 |,558.X |. get|
|00002dd0| 6c 69 6e 28 62 75 66 29 | 3b 0a 58 20 20 09 20 20 |lin(buf)|;.X . |
|00002de0| 20 20 73 73 63 61 6e 66 | 28 62 75 66 2c 20 22 25 | sscanf|(buf, "%|
|00002df0| 64 22 2c 20 26 6f 66 66 | 65 72 29 3b 0a 58 20 20 |d", &off|er);.X |
|00002e00| 0a 58 21 20 09 20 20 20 | 20 69 66 28 6f 66 66 65 |.X! . | if(offe|
|00002e10| 72 20 3e 3d 20 75 2e 75 | 67 6f 6c 64 29 20 7b 0a |r >= u.u|gold) {.|
|00002e20| 58 20 20 09 09 70 6c 69 | 6e 65 28 22 59 6f 75 20 |X ..pli|ne("You |
|00002e30| 67 69 76 65 20 25 73 20 | 61 6c 6c 20 79 6f 75 72 |give %s |all your|
|00002e40| 20 67 6f 6c 64 2e 22 2c | 20 78 6d 6f 6e 6e 61 6d | gold.",| xmonnam|
|00002e50| 28 6d 74 6d 70 2c 20 30 | 29 29 3b 0a 58 20 20 09 |(mtmp, 0|));.X .|
|00002e60| 09 6f 66 66 65 72 20 3d | 20 75 2e 75 67 6f 6c 64 |.offer =| u.ugold|
|00002e70| 3b 0a 58 20 20 09 20 20 | 20 20 7d 20 65 6c 73 65 |;.X . | } else|
|00002e80| 20 70 6c 69 6e 65 28 22 | 59 6f 75 20 67 69 76 65 | pline("|You give|
|00002e90| 20 25 73 20 25 64 20 5a | 6f 72 6b 6d 69 64 73 2e | %s %d Z|orkmids.|
|00002ea0| 22 2c 20 78 6d 6f 6e 6e | 61 6d 28 6d 74 6d 70 2c |", xmonn|am(mtmp,|
|00002eb0| 20 30 29 2c 20 6f 66 66 | 65 72 29 3b 0a 58 0a 58 | 0), off|er);.X.X|
|00002ec0| 2d 2d 2d 20 35 35 32 2c | 35 36 32 20 2d 2d 2d 2d |--- 552,|562 ----|
|00002ed0| 2d 0a 58 20 20 09 20 20 | 20 20 67 65 74 6c 69 6e |-.X . | getlin|
|00002ee0| 28 62 75 66 29 3b 0a 58 | 20 20 09 20 20 20 20 73 |(buf);.X| . s|
|00002ef0| 73 63 61 6e 66 28 62 75 | 66 2c 20 22 25 64 22 2c |scanf(bu|f, "%d",|
|00002f00| 20 26 6f 66 66 65 72 29 | 3b 0a 58 20 20 0a 58 21 | &offer)|;.X .X!|
|00002f10| 20 09 20 20 20 20 69 66 | 28 6f 66 66 65 72 20 3c | . if|(offer <|
|00002f20| 20 30 29 20 7b 0a 58 21 | 20 09 09 70 6c 69 6e 65 | 0) {.X!| ..pline|
|00002f30| 28 22 59 6f 75 20 74 72 | 79 20 74 6f 20 73 68 6f |("You tr|y to sho|
|00002f40| 72 74 20 63 68 61 6e 67 | 65 20 25 73 2c 20 62 75 |rt chang|e %s, bu|
|00002f50| 74 20 66 75 6d 62 6c 65 | 2e 22 2c 20 78 6d 6f 6e |t fumble|.", xmon|
|00002f60| 6e 61 6d 28 6d 74 6d 70 | 2c 20 30 29 29 3b 0a 58 |nam(mtmp|, 0));.X|
|00002f70| 21 20 09 09 6f 66 66 65 | 72 20 3d 20 30 3b 0a 58 |! ..offe|r = 0;.X|
|00002f80| 21 20 09 20 20 20 20 7d | 0a 58 21 20 09 20 20 20 |! . }|.X! . |
|00002f90| 20 65 6c 73 65 20 69 66 | 28 6f 66 66 65 72 20 3e | else if|(offer >|
|00002fa0| 3d 20 75 2e 75 67 6f 6c | 64 29 20 7b 0a 58 20 20 |= u.ugol|d) {.X |
|00002fb0| 09 09 70 6c 69 6e 65 28 | 22 59 6f 75 20 67 69 76 |..pline(|"You giv|
|00002fc0| 65 20 25 73 20 61 6c 6c | 20 79 6f 75 72 20 67 6f |e %s all| your go|
|00002fd0| 6c 64 2e 22 2c 20 78 6d | 6f 6e 6e 61 6d 28 6d 74 |ld.", xm|onnam(mt|
|00002fe0| 6d 70 2c 20 30 29 29 3b | 0a 58 20 20 09 09 6f 66 |mp, 0));|.X ..of|
|00002ff0| 66 65 72 20 3d 20 75 2e | 75 67 6f 6c 64 3b 0a 58 |fer = u.|ugold;.X|
|00003000| 20 20 09 20 20 20 20 7d | 20 65 6c 73 65 20 70 6c | . }| else pl|
|00003010| 69 6e 65 28 22 59 6f 75 | 20 67 69 76 65 20 25 73 |ine("You| give %s|
|00003020| 20 25 64 20 5a 6f 72 6b | 6d 69 64 73 2e 22 2c 20 | %d Zork|mids.", |
|00003030| 78 6d 6f 6e 6e 61 6d 28 | 6d 74 6d 70 2c 20 30 29 |xmonnam(|mtmp, 0)|
|00003040| 2c 20 6f 66 66 65 72 29 | 3b 0a 58 0a 58 0a 58 2a |, offer)|;.X.X.X*|
|00003050| 2a 2a 20 7a 61 70 2e 63 | 2e 6f 72 69 67 09 54 75 |** zap.c|.orig.Tu|
|00003060| 65 20 4d 61 79 20 32 34 | 20 31 31 3a 35 36 3a 34 |e May 24| 11:56:4|
|00003070| 32 20 31 39 38 38 0a 58 | 2d 2d 2d 20 7a 61 70 2e |2 1988.X|--- zap.|
|00003080| 63 09 54 75 65 20 4d 61 | 79 20 32 34 20 31 31 3a |c.Tue Ma|y 24 11:|
|00003090| 35 36 3a 35 35 20 31 39 | 38 38 0a 58 2a 2a 2a 2a |56:55 19|88.X****|
|000030a0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 0a 58 2a 2a 2a |********|***.X***|
|000030b0| 20 38 36 32 2c 38 36 38 | 0a 58 20 20 09 09 09 09 | 862,868|.X ....|
|000030c0| 09 09 66 72 65 65 7a 65 | 5f 70 6f 74 69 6f 6e 73 |..freeze|_potions|
|000030d0| 28 29 3b 0a 58 20 20 09 | 09 09 09 09 62 72 65 61 |();.X .|....brea|
|000030e0| 6b 3b 0a 58 20 20 09 09 | 09 09 63 61 73 65 20 34 |k;.X ..|..case 4|
|000030f0| 3a 09 09 2f 2a 20 64 65 | 61 74 68 20 2a 2f 0a 58 |:../* de|ath */.X|
|00003100| 21 20 09 09 09 09 09 75 | 2e 75 68 70 20 3d 20 2d |! .....u|.uhp = -|
|00003110| 31 3b 0a 58 20 20 09 09 | 09 09 09 62 72 65 61 6b |1;.X ..|...break|
|00003120| 3b 0a 58 20 20 09 09 09 | 09 63 61 73 65 20 35 3a |;.X ...|.case 5:|
|00003130| 09 09 2f 2a 20 6c 69 67 | 68 74 6e 69 6e 67 20 2a |../* lig|htning *|
|00003140| 2f 0a 58 20 20 09 09 09 | 09 09 69 66 28 53 68 6f |/.X ...|..if(Sho|
|00003150| 63 6b 5f 72 65 73 69 73 | 74 61 6e 63 65 29 0a 58 |ck_resis|tance).X|
|00003160| 0a 58 2d 2d 2d 20 38 36 | 32 2c 38 37 31 20 2d 2d |.X--- 86|2,871 --|
|00003170| 2d 2d 2d 0a 58 20 20 09 | 09 09 09 09 09 66 72 65 |---.X .|.....fre|
|00003180| 65 7a 65 5f 70 6f 74 69 | 6f 6e 73 28 29 3b 0a 58 |eze_poti|ons();.X|
|00003190| 20 20 09 09 09 09 09 62 | 72 65 61 6b 3b 0a 58 20 | .....b|reak;.X |
|000031a0| 20 09 09 09 09 63 61 73 | 65 20 34 3a 09 09 2f 2a | ....cas|e 4:../*|
|000031b0| 20 64 65 61 74 68 20 2a | 2f 0a 58 21 20 09 09 09 | death *|/.X! ...|
|000031c0| 09 09 69 66 20 28 75 2e | 75 6c 65 76 65 6c 2b 75 |..if (u.|ulevel+u|
|000031d0| 2e 75 6c 75 63 6b 20 3e | 20 72 6e 32 28 32 2a 4c |.uluck >| rn2(2*L|
|000031e0| 55 43 4b 4d 41 58 29 29 | 0a 58 21 20 09 09 09 09 |UCKMAX))|.X! ....|
|000031f0| 09 09 64 61 6d 20 3d 20 | 28 75 2e 75 68 70 2a 32 |..dam = |(u.uhp*2|
|00003200| 29 2f 33 3b 0a 58 21 20 | 09 09 09 09 09 65 6c 73 |)/3;.X! |.....els|
|00003210| 65 0a 58 21 20 09 09 09 | 09 09 09 75 2e 75 68 70 |e.X! ...|...u.uhp|
|00003220| 20 3d 20 2d 31 3b 0a 58 | 20 20 09 09 09 09 09 62 | = -1;.X| .....b|
|00003230| 72 65 61 6b 3b 0a 58 20 | 20 09 09 09 09 63 61 73 |reak;.X | ....cas|
|00003240| 65 20 35 3a 09 09 2f 2a | 20 6c 69 67 68 74 6e 69 |e 5:../*| lightni|
|00003250| 6e 67 20 2a 2f 0a 58 20 | 20 09 09 09 09 09 69 66 |ng */.X | .....if|
|00003260| 28 53 68 6f 63 6b 5f 72 | 65 73 69 73 74 61 6e 63 |(Shock_r|esistanc|
|00003270| 65 29 0a 58 0a 58 0a 45 | 4e 44 5f 4f 46 5f 4e 65 |e).X.X.E|ND_OF_Ne|
|00003280| 77 73 74 75 66 66 2f 62 | 75 67 66 69 78 33 0a 69 |wstuff/b|ugfix3.i|
|00003290| 66 20 74 65 73 74 20 31 | 31 37 31 30 20 2d 6e 65 |f test 1|1710 -ne|
|000032a0| 20 60 77 63 20 2d 63 20 | 3c 4e 65 77 73 74 75 66 | `wc -c |<Newstuf|
|000032b0| 66 2f 62 75 67 66 69 78 | 33 60 3b 20 74 68 65 6e |f/bugfix|3`; then|
|000032c0| 0a 20 20 20 20 65 63 68 | 6f 20 73 68 61 72 3a 20 |. ech|o shar: |
|000032d0| 5c 22 4e 65 77 73 74 75 | 66 66 2f 62 75 67 66 69 |\"Newstu|ff/bugfi|
|000032e0| 78 33 5c 22 20 75 6e 70 | 61 63 6b 65 64 20 77 69 |x3\" unp|acked wi|
|000032f0| 74 68 20 77 72 6f 6e 67 | 20 73 69 7a 65 21 0a 66 |th wrong| size!.f|
|00003300| 69 0a 23 20 65 6e 64 20 | 6f 66 20 6f 76 65 72 77 |i.# end |of overw|
|00003310| 72 69 74 69 6e 67 20 63 | 68 65 63 6b 0a 66 69 0a |riting c|heck.fi.|
|00003320| 69 66 20 74 65 73 74 20 | 2d 66 20 64 6f 2e 63 20 |if test |-f do.c |
|00003330| 2d 61 20 22 24 7b 31 7d | 22 20 21 3d 20 22 2d 63 |-a "${1}|" != "-c|
|00003340| 22 20 3b 20 74 68 65 6e | 20 0a 20 20 65 63 68 6f |" ; then| . echo|
|00003350| 20 73 68 61 72 3a 20 57 | 69 6c 6c 20 6e 6f 74 20 | shar: W|ill not |
|00003360| 6f 76 65 72 2d 77 72 69 | 74 65 20 65 78 69 73 74 |over-wri|te exist|
|00003370| 69 6e 67 20 66 69 6c 65 | 20 5c 22 64 6f 2e 63 5c |ing file| \"do.c\|
|00003380| 22 0a 65 6c 73 65 0a 65 | 63 68 6f 20 73 68 61 72 |".else.e|cho shar|
|00003390| 3a 20 45 78 74 72 61 63 | 74 69 6e 67 20 5c 22 64 |: Extrac|ting \"d|
|000033a0| 6f 2e 63 5c 22 20 5c 28 | 31 31 34 39 31 20 63 68 |o.c\" \(|11491 ch|
|000033b0| 61 72 61 63 74 65 72 73 | 5c 29 0a 73 65 64 20 22 |aracters|\).sed "|
|000033c0| 73 2f 5e 58 2f 2f 22 20 | 3e 64 6f 2e 63 20 3c 3c |s/^X//" |>do.c <<|
|000033d0| 27 45 4e 44 5f 4f 46 5f | 64 6f 2e 63 27 0a 58 2f |'END_OF_|do.c'.X/|
|000033e0| 2a 09 53 43 43 53 20 49 | 64 3a 20 40 28 23 29 64 |*.SCCS I|d: @(#)d|
|000033f0| 6f 2e 63 09 32 2e 33 09 | 38 38 2f 30 32 2f 31 31 |o.c.2.3.|88/02/11|
|00003400| 0a 58 2f 2a 20 43 6f 70 | 79 72 69 67 68 74 20 28 |.X/* Cop|yright (|
|00003410| 63 29 20 53 74 69 63 68 | 74 69 6e 67 20 4d 61 74 |c) Stich|ting Mat|
|00003420| 68 65 6d 61 74 69 73 63 | 68 20 43 65 6e 74 72 75 |hematisc|h Centru|
|00003430| 6d 2c 20 41 6d 73 74 65 | 72 64 61 6d 2c 20 31 39 |m, Amste|rdam, 19|
|00003440| 38 35 2e 20 2a 2f 0a 58 | 0a 58 2f 2a 20 43 6f 6e |85. */.X|.X/* Con|
|00003450| 74 61 69 6e 73 20 63 6f | 64 65 20 66 6f 72 20 27 |tains co|de for '|
|00003460| 64 27 2c 20 27 44 27 20 | 28 64 72 6f 70 29 2c 20 |d', 'D' |(drop), |
|00003470| 27 3e 27 2c 20 27 3c 27 | 20 28 75 70 2c 20 64 6f |'>', '<'| (up, do|
|00003480| 77 6e 29 20 61 6e 64 20 | 27 74 27 20 28 74 68 72 |wn) and |'t' (thr|
|00003490| 6f 77 29 20 2a 2f 0a 58 | 0a 58 23 69 6e 63 6c 75 |ow) */.X|.X#inclu|
|000034a0| 64 65 20 22 68 61 63 6b | 2e 68 22 0a 58 0a 58 65 |de "hack|.h".X.Xe|
|000034b0| 78 74 65 72 6e 20 73 74 | 72 75 63 74 20 6f 62 6a |xtern st|ruct obj|
|000034c0| 20 2a 73 70 6c 69 74 6f | 62 6a 28 29 2c 20 2a 61 | *splito|bj(), *a|
|000034d0| 64 64 69 6e 76 28 29 3b | 0a 58 65 78 74 65 72 6e |ddinv();|.Xextern|
|000034e0| 20 62 6f 6f 6c 65 61 6e | 20 68 6d 6f 6e 28 29 3b | boolean| hmon();|
|000034f0| 0a 58 65 78 74 65 72 6e | 20 62 6f 6f 6c 65 61 6e |.Xextern| boolean|
|00003500| 20 6c 65 76 65 6c 5f 65 | 78 69 73 74 73 5b 5d 3b | level_e|xists[];|
|00003510| 0a 58 65 78 74 65 72 6e | 20 73 74 72 75 63 74 20 |.Xextern| struct |
|00003520| 6d 6f 6e 73 74 20 79 6f | 75 6d 6f 6e 73 74 3b 0a |monst yo|umonst;.|
|00003530| 58 65 78 74 65 72 6e 20 | 63 68 61 72 20 2a 44 6f |Xextern |char *Do|
|00003540| 6e 61 6d 65 28 29 3b 0a | 58 65 78 74 65 72 6e 20 |name();.|Xextern |
|00003550| 63 68 61 72 20 2a 6e 6f | 6d 6f 76 65 6d 73 67 3b |char *no|movemsg;|
|00003560| 0a 58 69 6e 74 09 69 64 | 65 6e 74 69 66 79 28 29 |.Xint.id|entify()|
|00003570| 3b 0a 58 23 69 66 64 65 | 66 20 4b 41 41 0a 58 65 |;.X#ifde|f KAA.Xe|
|00003580| 78 74 65 72 6e 20 63 68 | 61 72 20 2a 78 6e 61 6d |xtern ch|ar *xnam|
|00003590| 65 28 29 3b 0a 58 23 65 | 6e 64 69 66 0a 58 0a 58 |e();.X#e|ndif.X.X|
|000035a0| 64 6f 64 72 6f 70 28 29 | 20 7b 0a 58 09 69 66 28 |dodrop()| {.X.if(|
|000035b0| 75 2e 75 67 6f 6c 64 29 | 09 72 65 74 75 72 6e 28 |u.ugold)|.return(|
|000035c0| 64 72 6f 70 28 67 65 74 | 6f 62 6a 28 22 30 24 23 |drop(get|obj("0$#|
|000035d0| 22 2c 20 22 64 72 6f 70 | 22 29 29 29 3b 0a 58 09 |", "drop|")));.X.|
|000035e0| 65 6c 73 65 09 09 72 65 | 74 75 72 6e 28 64 72 6f |else..re|turn(dro|
|000035f0| 70 28 67 65 74 6f 62 6a | 28 22 30 23 22 2c 20 22 |p(getobj|("0#", "|
|00003600| 64 72 6f 70 22 29 29 29 | 3b 0a 58 7d 0a 58 0a 58 |drop")))|;.X}.X.X|
|00003610| 73 74 61 74 69 63 0a 58 | 64 72 6f 70 28 6f 62 6a |static.X|drop(obj|
|00003620| 29 20 72 65 67 69 73 74 | 65 72 20 73 74 72 75 63 |) regist|er struc|
|00003630| 74 20 6f 62 6a 20 2a 6f | 62 6a 3b 20 7b 0a 58 09 |t obj *o|bj; {.X.|
|00003640| 69 66 28 21 6f 62 6a 29 | 20 72 65 74 75 72 6e 28 |if(!obj)| return(|
|00003650| 30 29 3b 0a 58 09 69 66 | 28 6f 62 6a 2d 3e 6f 6c |0);.X.if|(obj->ol|
|00003660| 65 74 20 3d 3d 20 47 4f | 4c 44 5f 53 59 4d 29 20 |et == GO|LD_SYM) |
|00003670| 7b 09 09 2f 2a 20 70 73 | 65 75 64 6f 20 6f 62 6a |{../* ps|eudo obj|
|00003680| 65 63 74 20 2a 2f 0a 58 | 09 09 72 65 67 69 73 74 |ect */.X|..regist|
|00003690| 65 72 20 6c 6f 6e 67 20 | 61 6d 6f 75 6e 74 20 3d |er long |amount =|
|000036a0| 20 4f 47 4f 4c 44 28 6f | 62 6a 29 3b 0a 58 0a 58 | OGOLD(o|bj);.X.X|
|000036b0| 09 09 69 66 28 61 6d 6f | 75 6e 74 20 3d 3d 20 30 |..if(amo|unt == 0|
|000036c0| 29 0a 58 09 09 09 70 6c | 69 6e 65 28 22 59 6f 75 |).X...pl|ine("You|
|000036d0| 20 64 69 64 6e 27 74 20 | 64 72 6f 70 20 61 6e 79 | didn't |drop any|
|000036e0| 20 67 6f 6c 64 20 70 69 | 65 63 65 73 2e 22 29 3b | gold pi|eces.");|
|000036f0| 0a 58 2f 2a 20 46 69 78 | 20 62 75 67 20 77 69 74 |.X/* Fix| bug wit|
|00003700| 68 20 64 72 6f 70 70 69 | 6e 67 20 68 75 67 65 20 |h droppi|ng huge |
|00003710| 61 6d 6f 75 6e 74 73 20 | 6f 66 20 67 6f 6c 64 20 |amounts |of gold |
|00003720| 72 65 61 64 20 61 73 20 | 6e 65 67 61 74 69 76 65 |read as |negative|
|00003730| 20 20 20 20 4b 41 41 20 | 2a 2f 0a 58 09 09 65 6c | KAA |*/.X..el|
|00003740| 73 65 20 69 66 28 61 6d | 6f 75 6e 74 20 3c 20 30 |se if(am|ount < 0|
|00003750| 29 20 7b 0a 58 09 09 09 | 75 2e 75 67 6f 6c 64 20 |) {.X...|u.ugold |
|00003760| 2b 3d 20 61 6d 6f 75 6e | 74 3b 0a 58 09 70 6c 69 |+= amoun|t;.X.pli|
|00003770| 6e 65 28 22 54 68 65 20 | 4c 52 53 20 77 6f 75 6c |ne("The |LRS woul|
|00003780| 64 20 62 65 20 76 65 72 | 79 20 69 6e 74 65 72 65 |d be ver|y intere|
|00003790| 73 74 65 64 20 74 6f 20 | 6b 6e 6f 77 20 79 6f 75 |sted to |know you|
|000037a0| 20 68 61 76 65 20 74 68 | 61 74 20 6d 75 63 68 2e | have th|at much.|
|000037b0| 22 29 3b 0a 58 09 09 7d | 20 65 6c 73 65 20 7b 0a |");.X..}| else {.|
|000037c0| 58 09 09 09 2f 2a 20 75 | 73 77 61 6c 6c 6f 77 20 |X.../* u|swallow |
|000037d0| 74 65 73 74 20 61 64 64 | 65 64 20 62 79 20 47 41 |test add|ed by GA|
|000037e0| 4e 20 30 31 2f 32 39 2f | 38 37 20 2a 2f 0a 58 09 |N 01/29/|87 */.X.|
|000037f0| 09 09 70 6c 69 6e 65 28 | 22 59 6f 75 20 64 72 6f |..pline(|"You dro|
|00003800| 70 70 65 64 20 25 6c 64 | 20 67 6f 6c 64 20 70 69 |pped %ld| gold pi|
|00003810| 65 63 65 25 73 2e 22 2c | 0a 58 09 09 09 09 20 61 |ece%s.",|.X.... a|
|00003820| 6d 6f 75 6e 74 2c 20 70 | 6c 75 72 28 61 6d 6f 75 |mount, p|lur(amou|
|00003830| 6e 74 29 29 3b 0a 58 09 | 09 09 69 66 28 75 2e 75 |nt));.X.|..if(u.u|
|00003840| 73 77 61 6c 6c 6f 77 29 | 0a 58 09 09 09 09 28 75 |swallow)|.X....(u|
|00003850| 2e 75 73 74 75 63 6b 29 | 2d 3e 6d 67 6f 6c 64 20 |.ustuck)|->mgold |
|00003860| 2b 3d 20 61 6d 6f 75 6e | 74 3b 0a 58 09 09 09 65 |+= amoun|t;.X...e|
|00003870| 6c 73 65 20 7b 0a 58 09 | 09 09 09 6d 6b 67 6f 6c |lse {.X.|...mkgol|
|00003880| 64 28 61 6d 6f 75 6e 74 | 2c 20 75 2e 75 78 2c 20 |d(amount|, u.ux, |
|00003890| 75 2e 75 79 29 3b 0a 58 | 09 09 09 09 69 66 28 49 |u.uy);.X|....if(I|
|000038a0| 6e 76 69 73 69 62 6c 65 | 29 20 6e 65 77 73 79 6d |nvisible|) newsym|
|000038b0| 28 75 2e 75 78 2c 20 75 | 2e 75 79 29 3b 0a 58 09 |(u.ux, u|.uy);.X.|
|000038c0| 09 09 7d 0a 58 09 09 7d | 0a 58 09 09 66 72 65 65 |..}.X..}|.X..free|
|000038d0| 28 28 63 68 61 72 20 2a | 29 20 6f 62 6a 29 3b 0a |((char *|) obj);.|
|000038e0| 58 09 09 72 65 74 75 72 | 6e 28 31 29 3b 0a 58 09 |X..retur|n(1);.X.|
|000038f0| 7d 0a 58 09 69 66 28 6f | 62 6a 2d 3e 6f 77 6f 72 |}.X.if(o|bj->owor|
|00003900| 6e 6d 61 73 6b 20 26 20 | 28 57 5f 41 52 4d 4f 52 |nmask & |(W_ARMOR|
|00003910| 20 7c 20 57 5f 52 49 4e | 47 20 7c 20 57 5f 54 4f | | W_RIN|G | W_TO|
|00003920| 4f 4c 29 29 7b 0a 58 09 | 09 70 6c 69 6e 65 28 22 |OL)){.X.|.pline("|
|00003930| 59 6f 75 20 63 61 6e 6e | 6f 74 20 64 72 6f 70 20 |You cann|ot drop |
|00003940| 73 6f 6d 65 74 68 69 6e | 67 20 79 6f 75 20 61 72 |somethin|g you ar|
|00003950| 65 20 77 65 61 72 69 6e | 67 2e 22 29 3b 0a 58 09 |e wearin|g.");.X.|
|00003960| 09 72 65 74 75 72 6e 28 | 30 29 3b 0a 58 09 7d 0a |.return(|0);.X.}.|
|00003970| 58 09 69 66 28 6f 62 6a | 20 3d 3d 20 75 77 65 70 |X.if(obj| == uwep|
|00003980| 29 20 7b 0a 58 09 09 69 | 66 28 75 77 65 70 2d 3e |) {.X..i|f(uwep->|
|00003990| 63 75 72 73 65 64 29 20 | 7b 0a 58 09 09 09 70 6c |cursed) |{.X...pl|
|000039a0| 69 6e 65 28 22 59 6f 75 | 72 20 77 65 61 70 6f 6e |ine("You|r weapon|
|000039b0| 20 69 73 20 77 65 6c 64 | 65 64 20 74 6f 20 79 6f | is weld|ed to yo|
|000039c0| 75 72 20 68 61 6e 64 21 | 22 29 3b 0a 58 09 09 09 |ur hand!|");.X...|
|000039d0| 72 65 74 75 72 6e 28 30 | 29 3b 0a 58 09 09 7d 0a |return(0|);.X..}.|
|000039e0| 58 09 09 73 65 74 75 77 | 65 70 28 28 73 74 72 75 |X..setuw|ep((stru|
|000039f0| 63 74 20 6f 62 6a 20 2a | 29 20 30 29 3b 0a 58 09 |ct obj *|) 0);.X.|
|00003a00| 7d 0a 58 23 69 66 64 65 | 66 20 57 41 4c 4b 49 45 |}.X#ifde|f WALKIE|
|00003a10| 53 0a 58 20 20 20 20 20 | 20 20 20 69 66 20 28 6f |S.X | if (o|
|00003a20| 62 6a 2d 3e 6f 74 79 70 | 20 3d 3d 20 4c 45 41 53 |bj->otyp| == LEAS|
|00003a30| 48 29 20 7b 0a 58 20 20 | 20 20 20 20 20 20 20 20 |H) {.X | |
|00003a40| 20 20 72 65 67 69 73 74 | 65 72 20 73 74 72 75 63 | regist|er struc|
|00003a50| 74 20 6d 6f 6e 73 74 20 | 2a 6d 74 6d 70 20 3d 20 |t monst |*mtmp = |
|00003a60| 66 6d 6f 6e 3b 0a 58 20 | 20 20 20 20 20 20 20 20 |fmon;.X | |
|00003a70| 20 20 20 77 68 69 6c 65 | 20 28 6d 74 6d 70 20 26 | while| (mtmp &|
|00003a80| 26 20 21 6d 74 6d 70 2d | 3e 6d 6c 65 61 73 68 65 |& !mtmp-|>mleashe|
|00003a90| 64 29 20 6d 74 6d 70 20 | 3d 20 6d 74 6d 70 2d 3e |d) mtmp |= mtmp->|
|00003aa0| 6e 6d 6f 6e 3b 0a 58 20 | 20 20 20 20 20 20 20 20 |nmon;.X | |
|00003ab0| 20 20 20 69 66 20 28 6d | 74 6d 70 29 20 7b 0a 58 | if (m|tmp) {.X|
|00003ac0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003ad0| 70 6c 69 6e 65 20 28 22 | 59 6f 75 72 20 6c 65 61 |pline ("|Your lea|
|00003ae0| 73 68 20 69 73 20 74 69 | 65 64 20 61 72 6f 75 6e |sh is ti|ed aroun|
|00003af0| 64 20 79 6f 75 72 20 68 | 61 6e 64 2e 22 29 3b 0a |d your h|and.");.|
|00003b00| 58 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |X | |
|00003b10| 20 72 65 74 75 72 6e 20 | 28 30 29 3b 0a 58 20 20 | return |(0);.X |
|00003b20| 20 20 20 20 20 20 20 20 | 20 20 7d 0a 58 20 20 20 | | }.X |
|00003b30| 20 20 20 20 20 7d 0a 58 | 23 65 6e 64 69 66 0a 58 | }.X|#endif.X|
|00003b40| 23 69 66 64 65 66 20 53 | 49 4e 4b 53 0a 58 09 69 |#ifdef S|INKS.X.i|
|00003b50| 66 28 28 6f 62 6a 2d 3e | 6f 6c 65 74 20 3d 3d 20 |f((obj->|olet == |
|00003b60| 52 49 4e 47 5f 53 59 4d | 29 20 26 26 20 49 53 5f |RING_SYM|) && IS_|
|00003b70| 53 49 4e 4b 28 6c 65 76 | 6c 5b 75 2e 75 78 5d 5b |SINK(lev|l[u.ux][|
|00003b80| 75 2e 75 79 5d 2e 74 79 | 70 29 29 0a 58 09 20 20 |u.uy].ty|p)).X. |
|00003b90| 20 20 69 66 20 28 75 2e | 75 73 77 61 6c 6c 6f 77 | if (u.|uswallow|
|00003ba0| 29 20 7b 0a 58 09 09 66 | 72 65 65 69 6e 76 28 6f |) {.X..f|reeinv(o|
|00003bb0| 62 6a 29 3b 0a 58 09 09 | 6d 70 69 63 6b 6f 62 6a |bj);.X..|mpickobj|
|00003bc0| 28 75 2e 75 73 74 75 63 | 6b 2c 6f 62 6a 29 3b 0a |(u.ustuc|k,obj);.|
|00003bd0| 58 09 09 72 65 74 75 72 | 6e 28 31 29 3b 0a 58 09 |X..retur|n(1);.X.|
|00003be0| 20 20 20 20 7d 0a 58 09 | 20 20 20 20 65 6c 73 65 | }.X.| else|
|00003bf0| 20 7b 0a 58 09 09 64 6f | 73 69 6e 6b 72 69 6e 67 | {.X..do|sinkring|
|00003c00| 28 6f 62 6a 29 3b 0a 58 | 09 09 72 65 74 75 72 6e |(obj);.X|..return|
|00003c10| 28 31 29 3b 0a 58 09 20 | 20 20 20 7d 0a 58 23 65 |(1);.X. | }.X#e|
|00003c20| 6e 64 69 66 0a 58 09 70 | 6c 69 6e 65 28 22 59 6f |ndif.X.p|line("Yo|
|00003c30| 75 20 64 72 6f 70 70 65 | 64 20 25 73 2e 22 2c 20 |u droppe|d %s.", |
|00003c40| 64 6f 6e 61 6d 65 28 6f | 62 6a 29 29 3b 0a 58 09 |doname(o|bj));.X.|
|00003c50| 64 72 6f 70 78 28 6f 62 | 6a 29 3b 0a 58 09 72 65 |dropx(ob|j);.X.re|
|00003c60| 74 75 72 6e 28 31 29 3b | 0a 58 7d 0a 58 0a 58 2f |turn(1);|.X}.X.X/|
|00003c70| 2a 20 43 61 6c 6c 65 64 | 20 69 6e 20 73 65 76 65 |* Called| in seve|
|00003c80| 72 61 6c 20 70 6c 61 63 | 65 73 20 2d 20 73 68 6f |ral plac|es - sho|
|00003c90| 75 6c 64 20 6e 6f 74 20 | 70 72 6f 64 75 63 65 20 |uld not |produce |
|00003ca0| 74 65 78 74 73 20 2a 2f | 0a 58 64 72 6f 70 78 28 |texts */|.Xdropx(|
|00003cb0| 6f 62 6a 29 0a 58 72 65 | 67 69 73 74 65 72 20 73 |obj).Xre|gister s|
|00003cc0| 74 72 75 63 74 20 6f 62 | 6a 20 2a 6f 62 6a 3b 0a |truct ob|j *obj;.|
|00003cd0| 58 7b 0a 58 09 66 72 65 | 65 69 6e 76 28 6f 62 6a |X{.X.fre|einv(obj|
|00003ce0| 29 3b 0a 58 09 64 72 6f | 70 79 28 6f 62 6a 29 3b |);.X.dro|py(obj);|
|00003cf0| 0a 58 7d 0a 58 0a 58 64 | 72 6f 70 79 28 6f 62 6a |.X}.X.Xd|ropy(obj|
|00003d00| 29 0a 58 72 65 67 69 73 | 74 65 72 20 73 74 72 75 |).Xregis|ter stru|
|00003d10| 63 74 20 6f 62 6a 20 2a | 6f 62 6a 3b 0a 58 7b 0a |ct obj *|obj;.X{.|
|00003d20| 58 09 69 66 28 6f 62 6a | 2d 3e 6f 74 79 70 20 3d |X.if(obj|->otyp =|
|00003d30| 3d 20 43 52 59 53 4b 4e | 49 46 45 29 0a 58 09 09 |= CRYSKN|IFE).X..|
|00003d40| 6f 62 6a 2d 3e 6f 74 79 | 70 20 3d 20 57 4f 52 4d |obj->oty|p = WORM|
|00003d50| 5f 54 4f 4f 54 48 3b 0a | 58 09 2f 2a 20 75 73 77 |_TOOTH;.|X./* usw|
|00003d60| 61 6c 6c 6f 77 20 63 68 | 65 63 6b 20 64 6f 6e 65 |allow ch|eck done|
|00003d70| 20 62 79 20 47 41 4e 20 | 30 31 2f 32 39 2f 38 37 | by GAN |01/29/87|
|00003d80| 20 2a 2f 0a 58 09 69 66 | 28 75 2e 75 73 77 61 6c | */.X.if|(u.uswal|
|00003d90| 6c 6f 77 29 0a 58 09 09 | 6d 70 69 63 6b 6f 62 6a |low).X..|mpickobj|
|00003da0| 28 75 2e 75 73 74 75 63 | 6b 2c 6f 62 6a 29 3b 0a |(u.ustuc|k,obj);.|
|00003db0| 58 09 65 6c 73 65 20 20 | 7b 0a 58 09 09 6f 62 6a |X.else |{.X..obj|
|00003dc0| 2d 3e 6f 78 20 3d 20 75 | 2e 75 78 3b 0a 58 09 09 |->ox = u|.ux;.X..|
|00003dd0| 6f 62 6a 2d 3e 6f 79 20 | 3d 20 75 2e 75 79 3b 0a |obj->oy |= u.uy;.|
|00003de0| 58 09 09 2f 2a 20 42 6c | 69 6e 64 20 63 68 65 63 |X../* Bl|ind chec|
|00003df0| 6b 20 61 64 64 65 64 20 | 62 79 20 47 41 4e 20 30 |k added |by GAN 0|
|00003e00| 32 2f 31 38 2f 38 37 20 | 2a 2f 0a 58 09 09 69 66 |2/18/87 |*/.X..if|
|00003e10| 28 42 6c 69 6e 64 29 20 | 20 7b 0a 58 23 69 66 64 |(Blind) | {.X#ifd|
|00003e20| 65 66 20 4b 41 41 0a 58 | 09 09 09 69 66 28 6f 62 |ef KAA.X|...if(ob|
|00003e30| 6a 2d 3e 6f 6c 65 74 20 | 21 3d 20 27 29 27 29 0a |j->olet |!= ')').|
|00003e40| 58 23 65 6e 64 69 66 0a | 58 09 09 09 20 20 20 20 |X#endif.|X... |
|00003e50| 6f 62 6a 2d 3e 64 6b 6e | 6f 77 6e 20 3d 20 69 6e |obj->dkn|own = in|
|00003e60| 64 65 78 28 22 2f 3d 21 | 3f 2a 22 2c 6f 62 6a 2d |dex("/=!|?*",obj-|
|00003e70| 3e 6f 6c 65 74 29 20 3f | 20 30 20 3a 20 31 3b 0a |>olet) ?| 0 : 1;.|
|00003e80| 58 09 09 09 6f 62 6a 2d | 3e 6b 6e 6f 77 6e 20 3d |X...obj-|>known =|
|00003e90| 20 30 3b 0a 58 09 09 7d | 0a 58 09 09 6f 62 6a 2d | 0;.X..}|.X..obj-|
|00003ea0| 3e 6e 6f 62 6a 20 3d 20 | 66 6f 62 6a 3b 0a 58 09 |>nobj = |fobj;.X.|
|00003eb0| 09 66 6f 62 6a 20 3d 20 | 6f 62 6a 3b 0a 58 09 09 |.fobj = |obj;.X..|
|00003ec0| 69 66 28 49 6e 76 69 73 | 69 62 6c 65 29 20 6e 65 |if(Invis|ible) ne|
|00003ed0| 77 73 79 6d 28 75 2e 75 | 78 2c 75 2e 75 79 29 3b |wsym(u.u|x,u.uy);|
|00003ee0| 0a 58 09 09 73 75 62 66 | 72 6f 6d 62 69 6c 6c 28 |.X..subf|rombill(|
|00003ef0| 6f 62 6a 29 3b 0a 58 09 | 09 73 74 61 63 6b 6f 62 |obj);.X.|.stackob|
|00003f00| 6a 28 6f 62 6a 29 3b 0a | 58 09 7d 0a 58 7d 0a 58 |j(obj);.|X.}.X}.X|
|00003f10| 0a 58 2f 2a 20 64 72 6f | 70 20 73 65 76 65 72 61 |.X/* dro|p severa|
|00003f20| 6c 20 74 68 69 6e 67 73 | 20 2a 2f 0a 58 64 6f 64 |l things| */.Xdod|
|00003f30| 64 72 6f 70 28 29 20 7b | 0a 58 09 72 65 74 75 72 |drop() {|.X.retur|
|00003f40| 6e 28 67 67 65 74 6f 62 | 6a 28 22 64 72 6f 70 22 |n(ggetob|j("drop"|
|00003f50| 2c 20 64 72 6f 70 2c 20 | 30 29 29 3b 0a 58 7d 0a |, drop, |0));.X}.|
|00003f60| 58 0a 58 64 6f 64 6f 77 | 6e 28 29 0a 58 7b 0a 58 |X.Xdodow|n().X{.X|
|00003f70| 09 69 66 28 75 2e 75 78 | 20 21 3d 20 78 64 6e 73 |.if(u.ux| != xdns|
|00003f80| 74 61 69 72 20 7c 7c 20 | 75 2e 75 79 20 21 3d 20 |tair || |u.uy != |
|00003f90| 79 64 6e 73 74 61 69 72 | 29 20 7b 0a 58 09 09 70 |ydnstair|) {.X..p|
|00003fa0| 6c 69 6e 65 28 22 59 6f | 75 20 63 61 6e 27 74 20 |line("Yo|u can't |
|00003fb0| 67 6f 20 64 6f 77 6e 20 | 68 65 72 65 2e 22 29 3b |go down |here.");|
|00003fc0| 0a 58 09 09 72 65 74 75 | 72 6e 28 30 29 3b 0a 58 |.X..retu|rn(0);.X|
|00003fd0| 09 7d 0a 58 09 69 66 28 | 75 2e 75 73 74 75 63 6b |.}.X.if(|u.ustuck|
|00003fe0| 29 20 7b 0a 58 09 09 70 | 6c 69 6e 65 28 22 59 6f |) {.X..p|line("Yo|
|00003ff0| 75 20 61 72 65 20 62 65 | 69 6e 67 20 68 65 6c 64 |u are be|ing held|
|00004000| 2c 20 61 6e 64 20 63 61 | 6e 6e 6f 74 20 67 6f 20 |, and ca|nnot go |
|00004010| 64 6f 77 6e 2e 22 29 3b | 0a 58 09 09 72 65 74 75 |down.");|.X..retu|
|00004020| 72 6e 28 31 29 3b 0a 58 | 09 7d 0a 58 09 69 66 28 |rn(1);.X|.}.X.if(|
|00004030| 4c 65 76 69 74 61 74 69 | 6f 6e 29 20 7b 0a 58 09 |Levitati|on) {.X.|
|00004040| 09 70 6c 69 6e 65 28 22 | 59 6f 75 72 20 66 6c 6f |.pline("|Your flo|
|00004050| 61 74 69 6e 67 20 68 69 | 67 68 20 61 62 6f 76 65 |ating hi|gh above|
|00004060| 20 74 68 65 20 73 74 61 | 69 72 73 2e 22 29 3b 0a | the sta|irs.");.|
|00004070| 58 09 09 72 65 74 75 72 | 6e 28 30 29 3b 0a 58 09 |X..retur|n(0);.X.|
|00004080| 7d 0a 58 0a 58 09 67 6f | 74 6f 5f 6c 65 76 65 6c |}.X.X.go|to_level|
|00004090| 28 64 6c 65 76 65 6c 2b | 31 2c 20 54 52 55 45 29 |(dlevel+|1, TRUE)|
|000040a0| 3b 0a 58 09 72 65 74 75 | 72 6e 28 31 29 3b 0a 58 |;.X.retu|rn(1);.X|
|000040b0| 7d 0a 58 0a 58 64 6f 75 | 70 28 29 0a 58 7b 0a 58 |}.X.Xdou|p().X{.X|
|000040c0| 09 69 66 28 75 2e 75 78 | 20 21 3d 20 78 75 70 73 |.if(u.ux| != xups|
|000040d0| 74 61 69 72 20 7c 7c 20 | 75 2e 75 79 20 21 3d 20 |tair || |u.uy != |
|000040e0| 79 75 70 73 74 61 69 72 | 29 20 7b 0a 58 09 09 70 |yupstair|) {.X..p|
|000040f0| 6c 69 6e 65 28 22 59 6f | 75 20 63 61 6e 27 74 20 |line("Yo|u can't |
|00004100| 67 6f 20 75 70 20 68 65 | 72 65 2e 22 29 3b 0a 58 |go up he|re.");.X|
|00004110| 09 09 72 65 74 75 72 6e | 28 30 29 3b 0a 58 09 7d |..return|(0);.X.}|
|00004120| 0a 58 09 69 66 28 75 2e | 75 73 74 75 63 6b 29 20 |.X.if(u.|ustuck) |
|00004130| 7b 0a 58 09 09 70 6c 69 | 6e 65 28 22 59 6f 75 20 |{.X..pli|ne("You |
|00004140| 61 72 65 20 62 65 69 6e | 67 20 68 65 6c 64 2c 20 |are bein|g held, |
|00004150| 61 6e 64 20 63 61 6e 6e | 6f 74 20 67 6f 20 75 70 |and cann|ot go up|
|00004160| 2e 22 29 3b 0a 58 09 09 | 72 65 74 75 72 6e 28 31 |.");.X..|return(1|
|00004170| 29 3b 0a 58 09 7d 0a 58 | 09 69 66 28 21 4c 65 76 |);.X.}.X|.if(!Lev|
|00004180| 69 74 61 74 69 6f 6e 20 | 26 26 20 69 6e 76 5f 77 |itation |&& inv_w|
|00004190| 65 69 67 68 74 28 29 20 | 2b 20 35 20 3e 20 30 29 |eight() |+ 5 > 0)|
|000041a0| 20 7b 0a 58 09 09 70 6c | 69 6e 65 28 22 59 6f 75 | {.X..pl|ine("You|
|000041b0| 72 20 6c 6f 61 64 20 69 | 73 20 74 6f 6f 20 68 65 |r load i|s too he|
|000041c0| 61 76 79 20 74 6f 20 63 | 6c 69 6d 62 20 74 68 65 |avy to c|limb the|
|000041d0| 20 73 74 61 69 72 73 2e | 22 29 3b 0a 58 09 09 72 | stairs.|");.X..r|
|000041e0| 65 74 75 72 6e 28 31 29 | 3b 0a 58 09 7d 0a 58 0a |eturn(1)|;.X.}.X.|
|000041f0| 58 09 67 6f 74 6f 5f 6c | 65 76 65 6c 28 64 6c 65 |X.goto_l|evel(dle|
|00004200| 76 65 6c 2d 31 2c 20 54 | 52 55 45 29 3b 0a 58 09 |vel-1, T|RUE);.X.|
|00004210| 72 65 74 75 72 6e 28 31 | 29 3b 0a 58 7d 0a 58 0a |return(1|);.X}.X.|
|00004220| 58 67 6f 74 6f 5f 6c 65 | 76 65 6c 28 6e 65 77 6c |Xgoto_le|vel(newl|
|00004230| 65 76 65 6c 2c 20 61 74 | 5f 73 74 61 69 72 73 29 |evel, at|_stairs)|
|00004240| 0a 58 72 65 67 69 73 74 | 65 72 20 69 6e 74 20 6e |.Xregist|er int n|
|00004250| 65 77 6c 65 76 65 6c 3b | 0a 58 72 65 67 69 73 74 |ewlevel;|.Xregist|
|00004260| 65 72 20 62 6f 6f 6c 65 | 61 6e 20 61 74 5f 73 74 |er boole|an at_st|
|00004270| 61 69 72 73 3b 0a 58 7b | 0a 58 09 72 65 67 69 73 |airs;.X{|.X.regis|
|00004280| 74 65 72 20 66 64 3b 0a | 58 09 72 65 67 69 73 74 |ter fd;.|X.regist|
|00004290| 65 72 20 62 6f 6f 6c 65 | 61 6e 20 75 70 20 3d 20 |er boole|an up = |
|000042a0| 28 6e 65 77 6c 65 76 65 | 6c 20 3c 20 64 6c 65 76 |(newleve|l < dlev|
|000042b0| 65 6c 29 3b 0a 58 0a 58 | 09 69 66 28 6e 65 77 6c |el);.X.X|.if(newl|
|000042c0| 65 76 65 6c 20 3c 3d 20 | 30 29 20 64 6f 6e 65 28 |evel <= |0) done(|
|000042d0| 22 65 73 63 61 70 65 64 | 22 29 3b 20 20 20 20 2f |"escaped|"); /|
|000042e0| 2a 20 69 6e 20 66 61 63 | 74 20 3c 20 30 20 69 73 |* in fac|t < 0 is|
|000042f0| 20 69 6d 70 6f 73 73 69 | 62 6c 65 20 2a 2f 0a 58 | impossi|ble */.X|
|00004300| 09 69 66 28 6e 65 77 6c | 65 76 65 6c 20 3e 20 4d |.if(newl|evel > M|
|00004310| 41 58 4c 45 56 45 4c 29 | 20 6e 65 77 6c 65 76 65 |AXLEVEL)| newleve|
|00004320| 6c 20 3d 20 4d 41 58 4c | 45 56 45 4c 3b 09 2f 2a |l = MAXL|EVEL;./*|
|00004330| 20 73 74 72 61 6e 67 65 | 20 2e 2e 2e 20 2a 2f 0a | strange| ... */.|
|00004340| 58 09 69 66 28 6e 65 77 | 6c 65 76 65 6c 20 3d 3d |X.if(new|level ==|
|00004350| 20 64 6c 65 76 65 6c 29 | 20 72 65 74 75 72 6e 3b | dlevel)| return;|
|00004360| 09 20 20 20 20 20 20 2f | 2a 20 74 68 69 73 20 63 |. /|* this c|
|00004370| 61 6e 20 68 61 70 70 65 | 6e 20 2a 2f 0a 58 0a 58 |an happe|n */.X.X|
|00004380| 09 67 6c 6f 28 64 6c 65 | 76 65 6c 29 3b 0a 58 23 |.glo(dle|vel);.X#|
|00004390| 69 66 64 65 66 20 44 47 | 4b 0a 58 09 2f 2a 20 55 |ifdef DG|K.X./* U|
|000043a0| 73 65 20 4f 5f 54 52 55 | 4e 43 20 74 6f 20 66 6f |se O_TRU|NC to fo|
|000043b0| 72 63 65 20 74 68 65 20 | 66 69 6c 65 20 74 6f 20 |rce the |file to |
|000043c0| 62 65 20 73 68 6f 72 74 | 65 6e 65 64 20 69 66 20 |be short|ened if |
|000043d0| 69 74 20 61 6c 72 65 61 | 64 79 0a 58 09 20 2a 20 |it alrea|dy.X. * |
|000043e0| 65 78 69 73 74 73 20 61 | 6e 64 20 69 73 20 63 75 |exists a|nd is cu|
|000043f0| 72 72 65 6e 74 6c 79 20 | 6c 6f 6e 67 65 72 2e 0a |rrently |longer..|
|00004400| 58 09 20 2a 2f 0a 58 09 | 66 64 20 3d 20 6f 70 65 |X. */.X.|fd = ope|
|00004410| 6e 28 6c 6f 63 6b 2c 20 | 4f 5f 57 52 4f 4e 4c 59 |n(lock, |O_WRONLY|
|00004420| 20 7c 20 4f 5f 42 49 4e | 41 52 59 20 7c 20 4f 5f | | O_BIN|ARY | O_|
|00004430| 43 52 45 41 54 20 7c 20 | 4f 5f 54 52 55 4e 43 2c |CREAT | |O_TRUNC,|
|00004440| 20 46 4d 41 53 4b 29 3b | 0a 58 23 65 6c 73 65 0a | FMASK);|.X#else.|
|00004450| 58 09 66 64 20 3d 20 63 | 72 65 61 74 28 6c 6f 63 |X.fd = c|reat(loc|
|00004460| 6b 2c 20 46 4d 41 53 4b | 29 3b 0a 58 23 65 6e 64 |k, FMASK|);.X#end|
|00004470| 69 66 0a 58 09 69 66 28 | 66 64 20 3c 20 30 29 20 |if.X.if(|fd < 0) |
|00004480| 7b 0a 58 09 09 2f 2a 0a | 58 09 09 20 2a 20 54 68 |{.X../*.|X.. * Th|
|00004490| 69 73 20 69 73 20 6e 6f | 74 20 71 75 69 74 65 20 |is is no|t quite |
|000044a0| 69 6d 70 6f 73 73 69 62 | 6c 65 3a 20 65 2e 67 2e |impossib|le: e.g.|
|000044b0| 2c 20 77 65 20 6d 61 79 | 20 68 61 76 65 0a 58 09 |, we may| have.X.|
|000044c0| 09 20 2a 20 65 78 63 65 | 65 64 65 64 20 6f 75 72 |. * exce|eded our|
|000044d0| 20 71 75 6f 74 61 2e 20 | 49 66 20 74 68 61 74 20 | quota. |If that |
|000044e0| 69 73 20 74 68 65 20 63 | 61 73 65 20 74 68 65 6e |is the c|ase then|
|000044f0| 20 77 65 0a 58 09 09 20 | 2a 20 63 61 6e 6e 6f 74 | we.X.. |* cannot|
|00004500| 20 6c 65 61 76 65 20 74 | 68 69 73 20 6c 65 76 65 | leave t|his leve|
|00004510| 6c 2c 20 61 6e 64 20 63 | 61 6e 6e 6f 74 20 73 61 |l, and c|annot sa|
|00004520| 76 65 20 65 69 74 68 65 | 72 2e 0a 58 09 09 20 2a |ve eithe|r..X.. *|
|00004530| 20 41 6e 6f 74 68 65 72 | 20 70 6f 73 73 69 62 69 | Another| possibi|
|00004540| 6c 69 74 79 20 69 73 20 | 74 68 61 74 20 74 68 65 |lity is |that the|
|00004550| 20 64 69 72 65 63 74 6f | 72 79 20 77 61 73 20 6e | directo|ry was n|
|00004560| 6f 74 0a 58 09 09 20 2a | 20 77 72 69 74 61 62 6c |ot.X.. *| writabl|
|00004570| 65 2e 0a 58 09 09 20 2a | 2f 0a 58 23 69 66 64 65 |e..X.. *|/.X#ifde|
|00004580| 66 20 44 47 4b 0a 58 09 | 09 70 6c 69 6e 65 28 22 |f DGK.X.|.pline("|
|00004590| 43 61 6e 6e 6f 74 20 63 | 72 65 61 74 65 20 6c 65 |Cannot c|reate le|
|000045a0| 76 65 6c 20 66 69 6c 65 | 20 27 25 73 27 2e 22 2c |vel file| '%s'.",|
|000045b0| 20 6c 6f 63 6b 29 3b 0a | 58 23 65 6c 73 65 0a 58 | lock);.|X#else.X|
|000045c0| 09 09 70 6c 69 6e 65 28 | 22 41 20 6d 79 73 74 65 |..pline(|"A myste|
|000045d0| 72 69 6f 75 73 20 66 6f | 72 63 65 20 70 72 65 76 |rious fo|rce prev|
|000045e0| 65 6e 74 73 20 79 6f 75 | 20 66 72 6f 6d 20 67 6f |ents you| from go|
|000045f0| 69 6e 67 20 25 73 2e 22 | 2c 0a 58 09 09 09 75 70 |ing %s."|,.X...up|
|00004600| 20 3f 20 22 75 70 22 20 | 3a 20 22 64 6f 77 6e 22 | ? "up" |: "down"|
|00004610| 29 3b 0a 58 23 65 6e 64 | 69 66 0a 58 09 09 72 65 |);.X#end|if.X..re|
|00004620| 74 75 72 6e 3b 0a 58 09 | 7d 0a 58 0a 58 23 69 66 |turn;.X.|}.X.X#if|
|00004630| 64 65 66 20 44 47 4b 0a | 58 09 69 66 20 28 21 73 |def DGK.|X.if (!s|
|00004640| 61 76 65 6c 65 76 28 66 | 64 2c 20 64 6c 65 76 65 |avelev(f|d, dleve|
|00004650| 6c 2c 20 43 4f 55 4e 54 | 29 29 20 7b 0a 58 09 09 |l, COUNT|)) {.X..|
|00004660| 28 76 6f 69 64 29 20 63 | 6c 6f 73 65 28 66 64 29 |(void) c|lose(fd)|
|00004670| 3b 0a 58 09 09 28 76 6f | 69 64 29 20 75 6e 6c 69 |;.X..(vo|id) unli|
|00004680| 6e 6b 28 6c 6f 63 6b 29 | 3b 0a 58 09 09 70 6c 69 |nk(lock)|;.X..pli|
|00004690| 6e 65 28 22 48 41 43 4b | 20 69 73 20 6f 75 74 20 |ne("HACK| is out |
|000046a0| 6f 66 20 64 69 73 6b 20 | 73 70 61 63 65 20 66 6f |of disk |space fo|
|000046b0| 72 20 6d 61 6b 69 6e 67 | 20 6c 65 76 65 6c 73 21 |r making| levels!|
|000046c0| 22 29 3b 0a 58 09 09 70 | 6c 69 6e 65 28 22 59 6f |");.X..p|line("Yo|
|000046d0| 75 20 63 61 6e 20 73 61 | 76 65 2c 20 71 75 69 74 |u can sa|ve, quit|
|000046e0| 2c 20 6f 72 20 63 6f 6e | 74 69 6e 75 65 20 70 6c |, or con|tinue pl|
|000046f0| 61 79 69 6e 67 2e 22 29 | 3b 0a 58 09 09 72 65 74 |aying.")|;.X..ret|
|00004700| 75 72 6e 3b 0a 58 09 7d | 0a 58 23 65 6e 64 69 66 |urn;.X.}|.X#endif|
|00004710| 0a 58 09 69 66 28 50 75 | 6e 69 73 68 65 64 29 20 |.X.if(Pu|nished) |
|00004720| 75 6e 70 6c 61 63 65 62 | 63 28 29 3b 0a 58 09 75 |unplaceb|c();.X.u|
|00004730| 2e 75 74 72 61 70 20 3d | 20 30 3b 09 09 09 09 2f |.utrap =| 0;..../|
|00004740| 2a 20 6e 65 65 64 65 64 | 20 69 6e 20 6c 65 76 65 |* needed| in leve|
|00004750| 6c 5f 74 65 6c 65 20 2a | 2f 0a 58 09 75 2e 75 73 |l_tele *|/.X.u.us|
|00004760| 74 75 63 6b 20 3d 20 30 | 3b 09 09 09 09 2f 2a 20 |tuck = 0|;..../* |
|00004770| 69 64 65 6d 20 2a 2f 0a | 58 09 6b 65 65 70 64 6f |idem */.|X.keepdo|
|00004780| 67 73 28 29 3b 0a 58 09 | 73 65 65 6f 66 66 28 31 |gs();.X.|seeoff(1|
|00004790| 29 3b 0a 58 09 69 66 28 | 75 2e 75 73 77 61 6c 6c |);.X.if(|u.uswall|
|000047a0| 6f 77 29 09 09 09 09 2f | 2a 20 69 64 65 6d 20 2a |ow)..../|* idem *|
|000047b0| 2f 0a 58 09 09 75 2e 75 | 73 77 6c 64 74 69 6d 20 |/.X..u.u|swldtim |
|000047c0| 3d 20 75 2e 75 73 77 61 | 6c 6c 6f 77 20 3d 20 30 |= u.uswa|llow = 0|
|000047d0| 3b 0a 58 09 66 6c 61 67 | 73 2e 6e 73 63 72 69 6e |;.X.flag|s.nscrin|
|000047e0| 68 20 3d 20 31 3b 0a 58 | 09 75 2e 75 78 20 3d 20 |h = 1;.X|.u.ux = |
|000047f0| 46 41 52 3b 09 09 09 09 | 2f 2a 20 68 61 63 6b 20 |FAR;....|/* hack |
|00004800| 2a 2f 0a 58 09 28 76 6f | 69 64 29 20 69 6e 73 68 |*/.X.(vo|id) insh|
|00004810| 6f 70 28 29 3b 09 09 09 | 2f 2a 20 70 72 6f 62 61 |op();...|/* proba|
|00004820| 62 6c 79 20 77 61 73 20 | 61 20 74 72 61 70 64 6f |bly was |a trapdo|
|00004830| 6f 72 20 2a 2f 0a 58 0a | 58 23 69 66 64 65 66 20 |or */.X.|X#ifdef |
|00004840| 44 47 4b 0a 58 09 73 61 | 76 65 6c 65 76 28 66 64 |DGK.X.sa|velev(fd|
|00004850| 2c 64 6c 65 76 65 6c 2c | 20 57 52 49 54 45 29 3b |,dlevel,| WRITE);|
|00004860| 0a 58 23 65 6c 73 65 0a | 58 09 73 61 76 65 6c 65 |.X#else.|X.savele|
|00004870| 76 28 66 64 2c 64 6c 65 | 76 65 6c 29 3b 0a 58 23 |v(fd,dle|vel);.X#|
|00004880| 65 6e 64 69 66 0a 58 09 | 28 76 6f 69 64 29 20 63 |endif.X.|(void) c|
|00004890| 6c 6f 73 65 28 66 64 29 | 3b 0a 58 0a 58 09 64 6c |lose(fd)|;.X.X.dl|
|000048a0| 65 76 65 6c 20 3d 20 6e | 65 77 6c 65 76 65 6c 3b |evel = n|ewlevel;|
|000048b0| 0a 58 09 69 66 28 6d 61 | 78 64 6c 65 76 65 6c 20 |.X.if(ma|xdlevel |
|000048c0| 3c 20 64 6c 65 76 65 6c | 29 0a 58 09 09 6d 61 78 |< dlevel|).X..max|
|000048d0| 64 6c 65 76 65 6c 20 3d | 20 64 6c 65 76 65 6c 3b |dlevel =| dlevel;|
|000048e0| 0a 58 09 67 6c 6f 28 64 | 6c 65 76 65 6c 29 3b 0a |.X.glo(d|level);.|
|000048f0| 58 23 69 66 64 65 66 20 | 4d 53 44 4f 53 0a 58 09 |X#ifdef |MSDOS.X.|
|00004900| 2f 2a 20 49 66 20 74 68 | 65 20 6c 65 76 65 6c 20 |/* If th|e level |
|00004910| 68 61 73 20 6e 6f 20 77 | 68 65 72 65 20 79 65 74 |has no w|here yet|
|00004920| 2c 20 69 74 20 68 61 73 | 6e 27 74 20 62 65 65 6e |, it has|n't been|
|00004930| 20 6d 61 64 65 0a 58 09 | 20 2a 2f 0a 58 09 69 66 | made.X.| */.X.if|
|00004940| 28 21 66 69 6c 65 69 6e | 66 6f 5b 64 6c 65 76 65 |(!filein|fo[dleve|
|00004950| 6c 5d 2e 77 68 65 72 65 | 29 0a 58 23 65 6c 73 65 |l].where|).X#else|
|00004960| 0a 58 09 69 66 28 21 6c | 65 76 65 6c 5f 65 78 69 |.X.if(!l|evel_exi|
|00004970| 73 74 73 5b 64 6c 65 76 | 65 6c 5d 29 0a 58 23 65 |sts[dlev|el]).X#e|
|00004980| 6e 64 69 66 0a 58 09 09 | 6d 6b 6c 65 76 28 29 3b |ndif.X..|mklev();|
|00004990| 0a 58 09 65 6c 73 65 20 | 7b 0a 58 09 09 65 78 74 |.X.else |{.X..ext|
|000049a0| 65 72 6e 20 69 6e 74 20 | 68 61 63 6b 70 69 64 3b |ern int |hackpid;|
|000049b0| 0a 58 23 69 66 64 65 66 | 20 44 47 4b 0a 58 09 09 |.X#ifdef| DGK.X..|
|000049c0| 2f 2a 20 49 66 20 6e 6f | 74 20 63 75 72 72 65 6e |/* If no|t curren|
|000049d0| 74 6c 79 20 61 63 63 65 | 73 73 69 62 6c 65 2c 20 |tly acce|ssible, |
|000049e0| 73 77 61 70 20 69 74 20 | 69 6e 2e 0a 58 09 09 20 |swap it |in..X.. |
|000049f0| 2a 2f 0a 58 09 09 69 66 | 20 28 66 69 6c 65 69 6e |*/.X..if| (filein|
|00004a00| 66 6f 5b 64 6c 65 76 65 | 6c 5d 2e 77 68 65 72 65 |fo[dleve|l].where|
|00004a10| 20 21 3d 20 41 43 54 49 | 56 45 29 0a 58 09 09 09 | != ACTI|VE).X...|
|00004a20| 73 77 61 70 69 6e 5f 66 | 69 6c 65 28 64 6c 65 76 |swapin_f|ile(dlev|
|00004a30| 65 6c 29 3b 0a 58 0a 58 | 09 09 69 66 28 28 66 64 |el);.X.X|..if((fd|
|00004a40| 20 3d 20 6f 70 65 6e 28 | 6c 6f 63 6b 2c 20 4f 5f | = open(|lock, O_|
|00004a50| 52 44 4f 4e 4c 59 20 7c | 20 4f 5f 42 49 4e 41 52 |RDONLY || O_BINAR|
|00004a60| 59 29 29 20 3c 20 30 29 | 20 7b 0a 58 23 65 6c 73 |Y)) < 0)| {.X#els|
|00004a70| 65 0a 58 09 09 69 66 28 | 28 66 64 20 3d 20 6f 70 |e.X..if(|(fd = op|
|00004a80| 65 6e 28 6c 6f 63 6b 2c | 30 29 29 20 3c 20 30 29 |en(lock,|0)) < 0)|
|00004a90| 20 7b 0a 58 23 65 6e 64 | 69 66 0a 58 09 09 09 70 | {.X#end|if.X...p|
|00004aa0| 6c 69 6e 65 28 22 43 61 | 6e 6e 6f 74 20 6f 70 65 |line("Ca|nnot ope|
|00004ab0| 6e 20 25 73 20 2e 22 2c | 20 6c 6f 63 6b 29 3b 0a |n %s .",| lock);.|
|00004ac0| 58 09 09 09 70 6c 69 6e | 65 28 22 50 72 6f 62 61 |X...plin|e("Proba|
|00004ad0| 62 6c 79 20 73 6f 6d 65 | 6f 6e 65 20 72 65 6d 6f |bly some|one remo|
|00004ae0| 76 65 64 20 69 74 2e 22 | 29 3b 0a 58 09 09 09 64 |ved it."|);.X...d|
|00004af0| 6f 6e 65 28 22 74 72 69 | 63 6b 65 64 22 29 3b 0a |one("tri|cked");.|
|00004b00| 58 09 09 7d 0a 58 09 09 | 67 65 74 6c 65 76 28 66 |X..}.X..|getlev(f|
|00004b10| 64 2c 20 68 61 63 6b 70 | 69 64 2c 20 64 6c 65 76 |d, hackp|id, dlev|
|00004b20| 65 6c 29 3b 0a 58 09 09 | 28 76 6f 69 64 29 20 63 |el);.X..|(void) c|
|00004b30| 6c 6f 73 65 28 66 64 29 | 3b 0a 58 09 7d 0a 58 0a |lose(fd)|;.X.}.X.|
|00004b40| 58 09 69 66 28 61 74 5f | 73 74 61 69 72 73 29 20 |X.if(at_|stairs) |
|00004b50| 7b 0a 58 09 20 20 20 20 | 69 66 28 75 70 29 20 7b |{.X. |if(up) {|
|00004b60| 0a 58 09 09 75 2e 75 78 | 20 3d 20 78 64 6e 73 74 |.X..u.ux| = xdnst|
|00004b70| 61 69 72 3b 0a 58 09 09 | 75 2e 75 79 20 3d 20 79 |air;.X..|u.uy = y|
|00004b80| 64 6e 73 74 61 69 72 3b | 0a 58 09 09 69 66 28 21 |dnstair;|.X..if(!|
|00004b90| 75 2e 75 78 29 20 7b 09 | 09 2f 2a 20 65 6e 74 65 |u.ux) {.|./* ente|
|00004ba0| 72 69 6e 67 20 61 20 6d | 61 7a 65 20 66 72 6f 6d |ring a m|aze from|
|00004bb0| 20 62 65 6c 6f 77 3f 20 | 2a 2f 0a 58 09 09 20 20 | below? |*/.X.. |
|00004bc0| 20 20 75 2e 75 78 20 3d | 20 78 75 70 73 74 61 69 | u.ux =| xupstai|
|00004bd0| 72 3b 09 2f 2a 20 74 68 | 69 73 20 77 69 6c 6c 20 |r;./* th|is will |
|00004be0| 63 6f 6e 66 75 73 65 20 | 74 68 65 20 70 6c 61 79 |confuse |the play|
|00004bf0| 65 72 21 20 2a 2f 0a 58 | 09 09 20 20 20 20 75 2e |er! */.X|.. u.|
|00004c00| 75 79 20 3d 20 79 75 70 | 73 74 61 69 72 3b 0a 58 |uy = yup|stair;.X|
|00004c10| 09 09 7d 0a 58 2f 2a 20 | 52 65 6d 6f 76 65 20 62 |..}.X/* |Remove b|
|00004c20| 75 67 20 77 68 69 63 68 | 20 63 72 61 73 68 65 73 |ug which| crashes|
|00004c30| 20 77 69 74 68 20 6c 65 | 76 69 74 61 74 69 6f 6e | with le|vitation|
|00004c40| 2f 70 75 6e 69 73 68 6d | 65 6e 74 20 20 4b 41 41 |/punishm|ent KAA|
|00004c50| 20 2a 2f 0a 58 09 09 69 | 66 28 50 75 6e 69 73 68 | */.X..i|f(Punish|
|00004c60| 65 64 29 20 7b 0a 58 09 | 09 20 20 20 20 69 66 28 |ed) {.X.|. if(|
|00004c70| 21 4c 65 76 69 74 61 74 | 69 6f 6e 29 20 0a 58 09 |!Levitat|ion) .X.|
|00004c80| 09 09 70 6c 69 6e 65 28 | 22 57 69 74 68 20 67 72 |..pline(|"With gr|
|00004c90| 65 61 74 20 65 66 66 6f | 72 74 20 79 6f 75 20 63 |eat effo|rt you c|
|00004ca0| 6c 69 6d 62 20 74 68 65 | 20 73 74 61 69 72 73 2e |limb the| stairs.|
|00004cb0| 22 29 3b 0a 58 09 09 20 | 20 20 20 70 6c 61 63 65 |");.X.. | place|
|00004cc0| 62 63 28 31 29 3b 0a 58 | 09 09 7d 0a 58 09 20 20 |bc(1);.X|..}.X. |
|00004cd0| 20 20 7d 20 65 6c 73 65 | 20 7b 0a 58 09 09 75 2e | } else| {.X..u.|
|00004ce0| 75 78 20 3d 20 78 75 70 | 73 74 61 69 72 3b 0a 58 |ux = xup|stair;.X|
|00004cf0| 09 09 75 2e 75 79 20 3d | 20 79 75 70 73 74 61 69 |..u.uy =| yupstai|
|00004d00| 72 3b 0a 58 09 09 69 66 | 28 69 6e 76 5f 77 65 69 |r;.X..if|(inv_wei|
|00004d10| 67 68 74 28 29 20 2b 20 | 35 20 3e 20 30 20 7c 7c |ght() + |5 > 0 |||
|00004d20| 20 50 75 6e 69 73 68 65 | 64 29 7b 0a 58 09 09 09 | Punishe|d){.X...|
|00004d30| 70 6c 69 6e 65 28 22 59 | 6f 75 20 66 61 6c 6c 20 |pline("Y|ou fall |
|00004d40| 64 6f 77 6e 20 74 68 65 | 20 73 74 61 69 72 73 2e |down the| stairs.|
|00004d50| 22 29 3b 09 2f 2a 20 25 | 25 20 2a 2f 0a 58 09 09 |");./* %|% */.X..|
|00004d60| 09 6c 6f 73 65 68 70 28 | 72 6e 64 28 33 29 2c 20 |.losehp(|rnd(3), |
|00004d70| 22 66 61 6c 6c 22 29 3b | 0a 58 09 09 09 69 66 28 |"fall");|.X...if(|
|00004d80| 50 75 6e 69 73 68 65 64 | 29 20 7b 0a 58 09 09 09 |Punished|) {.X...|
|00004d90| 20 20 20 20 69 66 28 75 | 77 65 70 20 21 3d 20 75 | if(u|wep != u|
|00004da0| 62 61 6c 6c 20 26 26 20 | 72 6e 32 28 33 29 29 7b |ball && |rn2(3)){|
|00004db0| 0a 58 09 09 09 09 70 6c | 69 6e 65 28 22 2e 2e 2e |.X....pl|ine("...|
|00004dc0| 20 61 6e 64 20 61 72 65 | 20 68 69 74 20 62 79 20 | and are| hit by |
|00004dd0| 74 68 65 20 69 72 6f 6e | 20 62 61 6c 6c 2e 22 29 |the iron| ball.")|
|00004de0| 3b 0a 58 09 09 09 09 6c | 6f 73 65 68 70 28 72 6e |;.X....l|osehp(rn|
|00004df0| 64 28 32 30 29 2c 20 22 | 69 72 6f 6e 20 62 61 6c |d(20), "|iron bal|
|00004e00| 6c 22 29 3b 0a 58 09 09 | 09 20 20 20 20 7d 0a 58 |l");.X..|. }.X|
|00004e10| 09 09 09 20 20 20 20 70 | 6c 61 63 65 62 63 28 31 |... p|lacebc(1|
|00004e20| 29 3b 0a 58 09 09 09 7d | 0a 58 09 09 09 73 65 6c |);.X...}|.X...sel|
|00004e30| 66 74 6f 75 63 68 28 22 | 46 61 6c 6c 69 6e 67 2c |ftouch("|Falling,|
|00004e40| 20 79 6f 75 22 29 3b 0a | 58 09 09 7d 0a 58 09 20 | you");.|X..}.X. |
|00004e50| 20 20 20 7d 0a 58 09 20 | 20 20 20 7b 20 72 65 67 | }.X. | { reg|
|00004e60| 69 73 74 65 72 20 73 74 | 72 75 63 74 20 6d 6f 6e |ister st|ruct mon|
|00004e70| 73 74 20 2a 6d 74 6d 70 | 20 3d 20 6d 5f 61 74 28 |st *mtmp| = m_at(|
|00004e80| 75 2e 75 78 2c 20 75 2e | 75 79 29 3b 0a 58 09 20 |u.ux, u.|uy);.X. |
|00004e90| 20 20 20 20 20 69 66 28 | 6d 74 6d 70 29 0a 58 09 | if(|mtmp).X.|
|00004ea0| 09 6d 6e 65 78 74 6f 28 | 6d 74 6d 70 29 3b 0a 58 |.mnexto(|mtmp);.X|
|00004eb0| 09 20 20 20 20 7d 0a 58 | 09 7d 20 65 6c 73 65 20 |. }.X|.} else |
|00004ec0| 7b 09 2f 2a 20 74 72 61 | 70 64 6f 6f 72 20 6f 72 |{./* tra|pdoor or|
|00004ed0| 20 6c 65 76 65 6c 5f 74 | 65 6c 65 20 2a 2f 0a 58 | level_t|ele */.X|
|00004ee0| 09 20 20 20 20 64 6f 20 | 7b 0a 58 09 09 75 2e 75 |. do |{.X..u.u|
|00004ef0| 78 20 3d 20 72 6e 64 28 | 43 4f 4c 4e 4f 2d 31 29 |x = rnd(|COLNO-1)|
|00004f00| 3b 0a 58 09 09 75 2e 75 | 79 20 3d 20 72 6e 32 28 |;.X..u.u|y = rn2(|
|00004f10| 52 4f 57 4e 4f 29 3b 0a | 58 09 20 20 20 20 7d 20 |ROWNO);.|X. } |
|00004f20| 77 68 69 6c 65 28 6c 65 | 76 6c 5b 75 2e 75 78 5d |while(le|vl[u.ux]|
|00004f30| 5b 75 2e 75 79 5d 2e 74 | 79 70 20 21 3d 20 52 4f |[u.uy].t|yp != RO|
|00004f40| 4f 4d 20 7c 7c 0a 58 09 | 09 09 6d 5f 61 74 28 75 |OM ||.X.|..m_at(u|
|00004f50| 2e 75 78 2c 75 2e 75 79 | 29 29 3b 0a 58 09 20 20 |.ux,u.uy|));.X. |
|00004f60| 20 20 69 66 28 50 75 6e | 69 73 68 65 64 29 7b 0a | if(Pun|ished){.|
|00004f70| 58 09 09 69 66 28 75 77 | 65 70 20 21 3d 20 75 62 |X..if(uw|ep != ub|
|00004f80| 61 6c 6c 20 26 26 20 21 | 75 70 20 2f 2a 20 25 25 |all && !|up /* %%|
|00004f90| 20 2a 2f 20 26 26 20 72 | 6e 32 28 35 29 29 7b 0a | */ && r|n2(5)){.|
|00004fa0| 58 09 09 09 70 6c 69 6e | 65 28 22 54 68 65 20 69 |X...plin|e("The i|
|00004fb0| 72 6f 6e 20 62 61 6c 6c | 20 66 61 6c 6c 73 20 6f |ron ball| falls o|
|00004fc0| 6e 20 79 6f 75 72 20 68 | 65 61 64 2e 22 29 3b 0a |n your h|ead.");.|
|00004fd0| 58 09 09 09 6c 6f 73 65 | 68 70 28 72 6e 64 28 32 |X...lose|hp(rnd(2|
|00004fe0| 35 29 2c 20 22 69 72 6f | 6e 20 62 61 6c 6c 22 29 |5), "iro|n ball")|
|00004ff0| 3b 0a 58 09 09 7d 0a 58 | 09 09 70 6c 61 63 65 62 |;.X..}.X|..placeb|
|00005000| 63 28 31 29 3b 0a 58 09 | 20 20 20 20 7d 0a 58 09 |c(1);.X.| }.X.|
|00005010| 20 20 20 20 73 65 6c 66 | 74 6f 75 63 68 28 22 46 | self|touch("F|
|00005020| 61 6c 6c 69 6e 67 2c 20 | 79 6f 75 22 29 3b 0a 58 |alling, |you");.X|
|00005030| 09 7d 0a 58 09 28 76 6f | 69 64 29 20 69 6e 73 68 |.}.X.(vo|id) insh|
|00005040| 6f 70 28 29 3b 0a 58 09 | 69 6e 69 74 72 61 63 6b |op();.X.|initrack|
|00005050| 28 29 3b 0a 58 0a 58 09 | 6c 6f 73 65 64 6f 67 73 |();.X.X.|losedogs|
|00005060| 28 29 3b 0a 58 09 7b 20 | 72 65 67 69 73 74 65 72 |();.X.{ |register|
|00005070| 20 73 74 72 75 63 74 20 | 6d 6f 6e 73 74 20 2a 6d | struct |monst *m|
|00005080| 74 6d 70 3b 0a 58 09 20 | 20 69 66 28 6d 74 6d 70 |tmp;.X. | if(mtmp|
|00005090| 20 3d 20 6d 5f 61 74 28 | 75 2e 75 78 2c 20 75 2e | = m_at(|u.ux, u.|
|000050a0| 75 79 29 29 20 6d 6e 65 | 78 74 6f 28 6d 74 6d 70 |uy)) mne|xto(mtmp|
|000050b0| 29 3b 09 2f 2a 20 72 69 | 76 30 35 21 61 33 20 2a |);./* ri|v05!a3 *|
|000050c0| 2f 0a 58 09 7d 0a 58 09 | 66 6c 61 67 73 2e 6e 73 |/.X.}.X.|flags.ns|
|000050d0| 63 72 69 6e 68 20 3d 20 | 30 3b 0a 58 09 73 65 74 |crinh = |0;.X.set|
|000050e0| 73 65 65 28 29 3b 0a 58 | 09 73 65 65 6f 62 6a 73 |see();.X|.seeobjs|
|000050f0| 28 29 3b 09 2f 2a 20 6d | 61 6b 65 20 6f 6c 64 20 |();./* m|ake old |
|00005100| 63 61 64 61 76 65 72 73 | 20 64 69 73 61 70 70 65 |cadavers| disappe|
|00005110| 61 72 20 2d 20 72 69 76 | 30 35 21 61 33 20 2a 2f |ar - riv|05!a3 */|
|00005120| 0a 58 09 64 6f 63 72 74 | 28 29 3b 0a 58 09 70 69 |.X.docrt|();.X.pi|
|00005130| 63 6b 75 70 28 31 29 3b | 0a 58 09 72 65 61 64 5f |ckup(1);|.X.read_|
|00005140| 65 6e 67 72 5f 61 74 28 | 75 2e 75 78 2c 75 2e 75 |engr_at(|u.ux,u.u|
|00005150| 79 29 3b 0a 58 7d 0a 58 | 0a 58 64 6f 6e 75 6c 6c |y);.X}.X|.Xdonull|
|00005160| 28 29 20 7b 0a 58 09 72 | 65 74 75 72 6e 28 31 29 |() {.X.r|eturn(1)|
|00005170| 3b 09 2f 2a 20 44 6f 20 | 6e 6f 74 68 69 6e 67 2c |;./* Do |nothing,|
|00005180| 20 62 75 74 20 6c 65 74 | 20 6f 74 68 65 72 20 74 | but let| other t|
|00005190| 68 69 6e 67 73 20 68 61 | 70 70 65 6e 20 2a 2f 0a |hings ha|ppen */.|
|000051a0| 58 7d 0a 58 0a 58 23 69 | 66 20 64 65 66 69 6e 65 |X}.X.X#i|f define|
|000051b0| 64 28 4b 41 41 29 20 26 | 26 20 64 65 66 69 6e 65 |d(KAA) &|& define|
|000051c0| 64 28 4b 4f 50 53 29 0a | 58 77 69 70 65 6f 66 66 |d(KOPS).|Xwipeoff|
|000051d0| 28 29 0a 58 7b 0a 58 09 | 69 66 28 75 2e 75 63 72 |().X{.X.|if(u.ucr|
|000051e0| 65 61 6d 65 64 20 3c 20 | 34 29 09 75 2e 75 63 72 |eamed < |4).u.ucr|
|000051f0| 65 61 6d 65 64 20 3d 20 | 30 3b 0a 58 09 65 6c 73 |eamed = |0;.X.els|
|00005200| 65 09 09 09 75 2e 75 63 | 72 65 61 6d 65 64 20 2d |e...u.uc|reamed -|
|00005210| 3d 20 34 3b 0a 58 09 69 | 66 28 75 2e 75 63 72 65 |= 4;.X.i|f(u.ucre|
|00005220| 61 6d 65 64 20 3e 20 30 | 29 20 20 7b 0a 58 09 09 |amed > 0|) {.X..|
|00005230| 42 6c 69 6e 64 65 64 20 | 2d 3d 20 34 3b 0a 58 09 |Blinded |-= 4;.X.|
|00005240| 09 69 66 28 42 6c 69 6e | 64 20 3c 3d 20 31 29 20 |.if(Blin|d <= 1) |
|00005250| 7b 0a 58 09 09 09 70 6c | 69 6e 65 28 22 59 6f 75 |{.X...pl|ine("You|
|00005260| 27 76 65 20 67 6f 74 20 | 74 68 65 20 67 6c 6f 70 |'ve got |the glop|
|00005270| 20 6f 66 66 2e 22 29 3b | 0a 58 09 09 09 75 2e 75 | off.");|.X...u.u|
|00005280| 63 72 65 61 6d 65 64 20 | 3d 20 30 3b 0a 58 09 09 |creamed |= 0;.X..|
|00005290| 09 42 6c 69 6e 64 65 64 | 20 3d 20 31 3b 0a 58 09 |.Blinded| = 1;.X.|
|000052a0| 09 09 72 65 74 75 72 6e | 28 30 29 3b 0a 58 09 09 |..return|(0);.X..|
|000052b0| 7d 0a 58 09 09 72 65 74 | 75 72 6e 28 31 29 3b 09 |}.X..ret|urn(1);.|
|000052c0| 09 2f 2a 20 73 74 69 6c | 6c 20 62 75 73 79 20 2a |./* stil|l busy *|
|000052d0| 2f 0a 58 09 7d 0a 58 09 | 70 6c 69 6e 65 28 22 59 |/.X.}.X.|pline("Y|
|000052e0| 6f 75 72 20 66 61 63 65 | 20 66 65 65 6c 73 20 63 |our face| feels c|
|000052f0| 6c 65 61 6e 20 6e 6f 77 | 2e 22 29 3b 0a 58 09 75 |lean now|.");.X.u|
|00005300| 2e 75 63 72 65 61 6d 65 | 64 20 3d 20 30 3b 0a 58 |.ucreame|d = 0;.X|
|00005310| 09 72 65 74 75 72 6e 28 | 30 29 3b 0a 58 7d 0a 58 |.return(|0);.X}.X|
|00005320| 09 0a 58 64 6f 77 69 70 | 65 28 29 0a 58 7b 0a 58 |..Xdowip|e().X{.X|
|00005330| 09 69 66 28 75 2e 75 63 | 72 65 61 6d 65 64 29 20 |.if(u.uc|reamed) |
|00005340| 20 7b 0a 58 23 69 66 64 | 65 66 20 44 47 4b 4d 4f | {.X#ifd|ef DGKMO|
|00005350| 44 0a 58 09 09 73 65 74 | 5f 6f 63 63 75 70 61 74 |D.X..set|_occupat|
|00005360| 69 6f 6e 28 77 69 70 65 | 6f 66 66 2c 20 22 77 69 |ion(wipe|off, "wi|
|00005370| 70 69 6e 67 20 6f 66 66 | 20 79 6f 75 72 20 66 61 |ping off| your fa|
|00005380| 63 65 22 2c 20 30 29 3b | 0a 58 23 65 6c 73 65 0a |ce", 0);|.X#else.|
|00005390| 58 09 09 6f 63 63 75 70 | 61 74 69 6f 6e 20 3d 20 |X..occup|ation = |
|000053a0| 77 69 70 65 6f 66 66 3b | 0a 58 09 09 6f 63 63 74 |wipeoff;|.X..occt|
|000053b0| 78 74 20 3d 20 22 77 69 | 70 69 6e 67 20 6f 66 66 |xt = "wi|ping off|
|000053c0| 20 79 6f 75 72 20 66 61 | 63 65 22 3b 0a 58 23 65 | your fa|ce";.X#e|
|000053d0| 6e 64 69 66 0a 58 09 09 | 72 65 74 75 72 6e 28 31 |ndif.X..|return(1|
|000053e0| 29 3b 0a 58 09 7d 0a 58 | 09 70 6c 69 6e 65 28 22 |);.X.}.X|.pline("|
|000053f0| 59 6f 75 72 20 66 61 63 | 65 20 69 73 20 61 6c 72 |Your fac|e is alr|
|00005400| 65 61 64 79 20 63 6c 65 | 61 6e 2e 22 29 3b 0a 58 |eady cle|an.");.X|
|00005410| 09 72 65 74 75 72 6e 28 | 31 29 3b 0a 58 7d 0a 58 |.return(|1);.X}.X|
|00005420| 23 65 6e 64 69 66 0a 58 | 0a 58 2f 2a 20 73 70 6c |#endif.X|.X/* spl|
|00005430| 69 74 20 6f 62 6a 20 73 | 6f 20 74 68 61 74 20 69 |it obj s|o that i|
|00005440| 74 20 67 65 74 73 20 73 | 69 7a 65 20 6e 75 6d 20 |t gets s|ize num |
|00005450| 2a 2f 0a 58 2f 2a 20 72 | 65 6d 61 69 6e 64 65 72 |*/.X/* r|emainder|
|00005460| 20 69 73 20 70 75 74 20 | 69 6e 20 74 68 65 20 6f | is put |in the o|
|00005470| 62 6a 65 63 74 20 73 74 | 72 75 63 74 75 72 65 20 |bject st|ructure |
|00005480| 64 65 6c 69 76 65 72 65 | 64 20 62 79 20 74 68 69 |delivere|d by thi|
|00005490| 73 20 63 61 6c 6c 20 2a | 2f 0a 58 73 74 72 75 63 |s call *|/.Xstruc|
|000054a0| 74 20 6f 62 6a 20 2a 0a | 58 73 70 6c 69 74 6f 62 |t obj *.|Xsplitob|
|000054b0| 6a 28 6f 62 6a 2c 20 6e | 75 6d 29 20 72 65 67 69 |j(obj, n|um) regi|
|000054c0| 73 74 65 72 20 73 74 72 | 75 63 74 20 6f 62 6a 20 |ster str|uct obj |
|000054d0| 2a 6f 62 6a 3b 20 72 65 | 67 69 73 74 65 72 20 69 |*obj; re|gister i|
|000054e0| 6e 74 20 6e 75 6d 3b 20 | 7b 0a 58 72 65 67 69 73 |nt num; |{.Xregis|
|000054f0| 74 65 72 20 73 74 72 75 | 63 74 20 6f 62 6a 20 2a |ter stru|ct obj *|
|00005500| 6f 74 6d 70 3b 0a 58 09 | 6f 74 6d 70 20 3d 20 6e |otmp;.X.|otmp = n|
|00005510| 65 77 6f 62 6a 28 30 29 | 3b 0a 58 09 2a 6f 74 6d |ewobj(0)|;.X.*otm|
|00005520| 70 20 3d 20 2a 6f 62 6a | 3b 09 09 2f 2a 20 63 6f |p = *obj|;../* co|
|00005530| 70 69 65 73 20 77 68 6f | 6c 65 20 73 74 72 75 63 |pies who|le struc|
|00005540| 74 75 72 65 20 2a 2f 0a | 58 09 6f 74 6d 70 2d 3e |ture */.|X.otmp->|
|00005550| 6f 5f 69 64 20 3d 20 66 | 6c 61 67 73 2e 69 64 65 |o_id = f|lags.ide|
|00005560| 6e 74 2b 2b 3b 0a 58 09 | 6f 74 6d 70 2d 3e 6f 6e |nt++;.X.|otmp->on|
|00005570| 61 6d 65 6c 74 68 20 3d | 20 30 3b 0a 58 09 6f 62 |amelth =| 0;.X.ob|
|00005580| 6a 2d 3e 71 75 61 6e 20 | 3d 20 6e 75 6d 3b 0a 58 |j->quan |= num;.X|
|00005590| 09 6f 62 6a 2d 3e 6f 77 | 74 20 3d 20 77 65 69 67 |.obj->ow|t = weig|
|000055a0| 68 74 28 6f 62 6a 29 3b | 0a 58 09 6f 74 6d 70 2d |ht(obj);|.X.otmp-|
|000055b0| 3e 71 75 61 6e 20 2d 3d | 20 6e 75 6d 3b 0a 58 09 |>quan -=| num;.X.|
|000055c0| 6f 74 6d 70 2d 3e 6f 77 | 74 20 3d 20 77 65 69 67 |otmp->ow|t = weig|
|000055d0| 68 74 28 6f 74 6d 70 29 | 3b 09 2f 2a 20 2d 3d 20 |ht(otmp)|;./* -= |
|000055e0| 6f 62 6a 2d 3e 6f 77 74 | 20 3f 20 2a 2f 0a 58 09 |obj->owt| ? */.X.|
|000055f0| 6f 62 6a 2d 3e 6e 6f 62 | 6a 20 3d 20 6f 74 6d 70 |obj->nob|j = otmp|
|00005600| 3b 0a 58 09 69 66 28 6f | 62 6a 2d 3e 75 6e 70 61 |;.X.if(o|bj->unpa|
|00005610| 69 64 29 20 73 70 6c 69 | 74 62 69 6c 6c 28 6f 62 |id) spli|tbill(ob|
|00005620| 6a 2c 6f 74 6d 70 29 3b | 0a 58 09 72 65 74 75 72 |j,otmp);|.X.retur|
|00005630| 6e 28 6f 74 6d 70 29 3b | 0a 58 7d 0a 58 0a 58 6d |n(otmp);|.X}.X.Xm|
|00005640| 6f 72 65 5f 65 78 70 65 | 72 69 65 6e 63 65 64 28 |ore_expe|rienced(|
|00005650| 65 78 70 2c 72 65 78 70 | 29 0a 58 72 65 67 69 73 |exp,rexp|).Xregis|
|00005660| 74 65 72 20 69 6e 74 20 | 65 78 70 2c 20 72 65 78 |ter int |exp, rex|
|00005670| 70 3b 0a 58 7b 0a 58 09 | 65 78 74 65 72 6e 20 63 |p;.X{.X.|extern c|
|00005680| 68 61 72 20 70 6c 5f 63 | 68 61 72 61 63 74 65 72 |har pl_c|haracter|
|00005690| 5b 5d 3b 0a 58 0a 58 09 | 75 2e 75 65 78 70 20 2b |[];.X.X.|u.uexp +|
|000056a0| 3d 20 65 78 70 3b 0a 58 | 09 75 2e 75 72 65 78 70 |= exp;.X|.u.urexp|
|000056b0| 20 2b 3d 20 34 2a 65 78 | 70 20 2b 20 72 65 78 70 | += 4*ex|p + rexp|
|000056c0| 3b 0a 58 09 69 66 28 65 | 78 70 29 20 66 6c 61 67 |;.X.if(e|xp) flag|
|000056d0| 73 2e 62 6f 74 6c 20 3d | 20 31 3b 0a 58 09 69 66 |s.botl =| 1;.X.if|
|000056e0| 28 75 2e 75 72 65 78 70 | 20 3e 3d 20 28 28 70 6c |(u.urexp| >= ((pl|
|000056f0| 5f 63 68 61 72 61 63 74 | 65 72 5b 30 5d 20 3d 3d |_charact|er[0] ==|
|00005700| 20 27 57 27 29 20 3f 20 | 31 30 30 30 20 3a 20 32 | 'W') ? |1000 : 2|
|00005710| 30 30 30 29 29 0a 58 09 | 09 66 6c 61 67 73 2e 62 |000)).X.|.flags.b|
|00005720| 65 67 69 6e 6e 65 72 20 | 3d 20 30 3b 0a 58 7d 0a |eginner |= 0;.X}.|
|00005730| 58 0a 58 73 65 74 5f 77 | 6f 75 6e 64 65 64 5f 6c |X.Xset_w|ounded_l|
|00005740| 65 67 73 28 73 69 64 65 | 2c 20 74 69 6d 65 78 29 |egs(side|, timex)|
|00005750| 0a 58 72 65 67 69 73 74 | 65 72 20 6c 6f 6e 67 20 |.Xregist|er long |
|00005760| 73 69 64 65 3b 0a 58 72 | 65 67 69 73 74 65 72 20 |side;.Xr|egister |
|00005770| 69 6e 74 20 74 69 6d 65 | 78 3b 0a 58 7b 0a 58 09 |int time|x;.X{.X.|
|00005780| 69 66 28 21 57 6f 75 6e | 64 65 64 5f 6c 65 67 73 |if(!Woun|ded_legs|
|00005790| 20 7c 7c 20 28 57 6f 75 | 6e 64 65 64 5f 6c 65 67 | || (Wou|nded_leg|
|000057a0| 73 20 26 20 54 49 4d 45 | 4f 55 54 29 29 0a 58 09 |s & TIME|OUT)).X.|
|000057b0| 09 57 6f 75 6e 64 65 64 | 5f 6c 65 67 73 20 7c 3d |.Wounded|_legs |=|
|000057c0| 20 73 69 64 65 20 2b 20 | 74 69 6d 65 78 3b 0a 58 | side + |timex;.X|
|000057d0| 09 65 6c 73 65 0a 58 09 | 09 57 6f 75 6e 64 65 64 |.else.X.|.Wounded|
|000057e0| 5f 6c 65 67 73 20 7c 3d | 20 73 69 64 65 3b 0a 58 |_legs |=| side;.X|
|000057f0| 7d 0a 58 0a 58 68 65 61 | 6c 5f 6c 65 67 73 28 29 |}.X.Xhea|l_legs()|
|00005800| 0a 58 7b 0a 58 09 69 66 | 28 57 6f 75 6e 64 65 64 |.X{.X.if|(Wounded|
|00005810| 5f 6c 65 67 73 29 20 7b | 0a 58 09 09 69 66 28 28 |_legs) {|.X..if((|
|00005820| 57 6f 75 6e 64 65 64 5f | 6c 65 67 73 20 26 20 42 |Wounded_|legs & B|
|00005830| 4f 54 48 5f 53 49 44 45 | 53 29 20 3d 3d 20 42 4f |OTH_SIDE|S) == BO|
|00005840| 54 48 5f 53 49 44 45 53 | 29 0a 58 09 09 09 70 6c |TH_SIDES|).X...pl|
|00005850| 69 6e 65 28 22 59 6f 75 | 72 20 6c 65 67 73 20 66 |ine("You|r legs f|
|00005860| 65 65 6c 20 73 6f 6d 65 | 77 68 61 74 20 62 65 74 |eel some|what bet|
|00005870| 74 65 72 2e 22 29 3b 0a | 58 09 09 65 6c 73 65 0a |ter.");.|X..else.|
|00005880| 58 09 09 09 70 6c 69 6e | 65 28 22 59 6f 75 72 20 |X...plin|e("Your |
|00005890| 6c 65 67 20 66 65 65 6c | 73 20 73 6f 6d 65 77 68 |leg feel|s somewh|
|000058a0| 61 74 20 62 65 74 74 65 | 72 2e 22 29 3b 0a 58 09 |at bette|r.");.X.|
|000058b0| 09 57 6f 75 6e 64 65 64 | 5f 6c 65 67 73 20 3d 20 |.Wounded|_legs = |
|000058c0| 30 3b 0a 58 09 7d 0a 58 | 7d 0a 58 0a 58 23 69 66 |0;.X.}.X|}.X.X#if|
|000058d0| 64 65 66 20 53 49 4e 4b | 53 0a 58 74 72 79 63 61 |def SINK|S.Xtryca|
|000058e0| 6c 6c 28 6f 62 6a 29 0a | 58 72 65 67 69 73 74 65 |ll(obj).|Xregiste|
|000058f0| 72 20 73 74 72 75 63 74 | 20 6f 62 6a 20 2a 6f 62 |r struct| obj *ob|
|00005900| 6a 3b 0a 58 7b 0a 58 09 | 69 66 28 21 6f 62 6a 65 |j;.X{.X.|if(!obje|
|00005910| 63 74 73 5b 6f 62 6a 2d | 3e 6f 74 79 70 5d 2e 6f |cts[obj-|>otyp].o|
|00005920| 63 5f 6e 61 6d 65 5f 6b | 6e 6f 77 6e 20 26 26 0a |c_name_k|nown &&.|
|00005930| 58 09 20 20 20 21 6f 62 | 6a 65 63 74 73 5b 6f 62 |X. !ob|jects[ob|
|00005940| 6a 2d 3e 6f 74 79 70 5d | 2e 6f 63 5f 75 6e 61 6d |j->otyp]|.oc_unam|
|00005950| 65 29 0a 58 09 20 20 20 | 64 6f 63 61 6c 6c 28 6f |e).X. |docall(o|
|00005960| 62 6a 29 3b 0a 58 7d 0a | 58 0a 58 64 6f 73 69 6e |bj);.X}.|X.Xdosin|
|00005970| 6b 72 69 6e 67 28 6f 62 | 6a 29 20 20 2f 2a 20 6f |kring(ob|j) /* o|
|00005980| 62 6a 20 69 73 20 61 20 | 72 69 6e 67 20 62 65 69 |bj is a |ring bei|
|00005990| 6e 67 20 64 72 6f 70 70 | 65 64 20 6f 76 65 72 20 |ng dropp|ed over |
|000059a0| 61 20 6b 69 74 63 68 65 | 6e 20 73 69 6e 6b 20 2a |a kitche|n sink *|
|000059b0| 2f 0a 58 72 65 67 69 73 | 74 65 72 20 73 74 72 75 |/.Xregis|ter stru|
|000059c0| 63 74 20 6f 62 6a 20 2a | 6f 62 6a 3b 0a 58 7b 0a |ct obj *|obj;.X{.|
|000059d0| 58 72 65 67 69 73 74 65 | 72 20 73 74 72 75 63 74 |Xregiste|r struct|
|000059e0| 20 6f 62 6a 20 2a 6f 74 | 6d 70 2c 2a 6f 74 6d 70 | obj *ot|mp,*otmp|
|000059f0| 32 3b 0a 58 72 65 67 69 | 73 74 65 72 20 73 68 6f |2;.Xregi|ster sho|
|00005a00| 72 74 20 65 61 74 65 6e | 3b 0a 58 09 70 6c 69 6e |rt eaten|;.X.plin|
|00005a10| 65 28 22 59 6f 75 20 64 | 72 6f 70 20 25 73 20 64 |e("You d|rop %s d|
|00005a20| 6f 77 6e 20 74 68 65 20 | 64 72 61 69 6e 2e 22 2c |own the |drain.",|
|00005a30| 20 64 6f 6e 61 6d 65 28 | 6f 62 6a 29 29 3b 0a 58 | doname(|obj));.X|
|00005a40| 09 73 77 69 74 63 68 28 | 6f 62 6a 2d 3e 6f 74 79 |.switch(|obj->oty|
|00005a50| 70 29 20 7b 0a 58 09 20 | 20 20 20 63 61 73 65 20 |p) {.X. | case |
|00005a60| 52 49 4e 5f 41 44 4f 52 | 4e 4d 45 4e 54 3a 20 20 |RIN_ADOR|NMENT: |
|00005a70| 7b 0a 58 09 09 70 6c 69 | 6e 65 28 22 54 68 65 20 |{.X..pli|ne("The |
|00005a80| 66 61 75 63 65 74 73 20 | 66 6c 61 73 68 20 62 72 |faucets |flash br|
|00005a90| 69 67 68 74 6c 79 20 66 | 6f 72 20 61 20 6d 6f 6d |ightly f|or a mom|
|00005aa0| 65 6e 74 2e 22 29 3b 0a | 58 09 09 74 72 79 63 61 |ent.");.|X..tryca|
|00005ab0| 6c 6c 28 6f 62 6a 29 3b | 0a 58 09 09 62 72 65 61 |ll(obj);|.X..brea|
|00005ac0| 6b 3b 0a 58 09 09 7d 0a | 58 09 20 20 20 20 63 61 |k;.X..}.|X. ca|
|00005ad0| 73 65 20 52 49 4e 5f 52 | 45 47 45 4e 45 52 41 54 |se RIN_R|EGENERAT|
|00005ae0| 49 4f 4e 3a 20 20 7b 0a | 58 09 09 70 6c 69 6e 65 |ION: {.|X..pline|
|00005af0| 28 22 54 68 65 20 73 69 | 6e 6b 20 6c 6f 6f 6b 73 |("The si|nk looks|
|00005b00| 20 61 73 20 67 6f 6f 64 | 20 61 73 20 6e 65 77 2e | as good| as new.|
|00005b10| 22 29 3b 0a 58 09 09 74 | 72 79 63 61 6c 6c 28 6f |");.X..t|rycall(o|
|00005b20| 62 6a 29 3b 0a 58 09 09 | 62 72 65 61 6b 3b 0a 58 |bj);.X..|break;.X|
|00005b30| 09 09 7d 0a 58 09 20 20 | 20 20 63 61 73 65 20 52 |..}.X. | case R|
|00005b40| 49 4e 5f 53 45 41 52 43 | 48 49 4e 47 3a 0a 58 09 |IN_SEARC|HING:.X.|
|00005b50| 09 62 72 65 61 6b 3b 0a | 58 09 20 20 20 20 63 61 |.break;.|X. ca|
|00005b60| 73 65 20 52 49 4e 5f 53 | 45 45 5f 49 4e 56 49 53 |se RIN_S|EE_INVIS|
|00005b70| 49 42 4c 45 3a 0a 58 09 | 09 62 72 65 61 6b 3b 0a |IBLE:.X.|.break;.|
|00005b80| 58 09 20 20 20 20 63 61 | 73 65 20 52 49 4e 5f 53 |X. ca|se RIN_S|
|00005b90| 54 45 41 4c 54 48 3a 20 | 20 7b 0a 58 09 09 70 6c |TEALTH: | {.X..pl|
|00005ba0| 69 6e 65 28 22 54 68 65 | 20 73 69 6e 6b 20 73 65 |ine("The| sink se|
|00005bb0| 65 6d 73 20 74 6f 20 62 | 6c 65 6e 64 20 69 6e 74 |ems to b|lend int|
|00005bc0| 6f 20 74 68 65 20 66 6c | 6f 6f 72 20 66 6f 72 20 |o the fl|oor for |
|00005bd0| 61 20 6d 6f 6d 65 6e 74 | 2e 22 29 3b 0a 58 09 09 |a moment|.");.X..|
|00005be0| 74 72 79 63 61 6c 6c 28 | 6f 62 6a 29 3b 0a 58 09 |trycall(|obj);.X.|
|00005bf0| 09 62 72 65 61 6b 3b 0a | 58 09 09 7d 0a 58 09 20 |.break;.|X..}.X. |
|00005c00| 20 20 20 63 61 73 65 20 | 52 49 4e 5f 4c 45 56 49 | case |RIN_LEVI|
|00005c10| 54 41 54 49 4f 4e 3a 20 | 20 7b 0a 58 09 09 70 6c |TATION: | {.X..pl|
|00005c20| 69 6e 65 28 22 54 68 65 | 20 73 69 6e 6b 20 71 75 |ine("The| sink qu|
|00005c30| 69 76 65 72 73 20 75 70 | 77 61 72 64 20 66 6f 72 |ivers up|ward for|
|00005c40| 20 61 20 6d 6f 6d 65 6e | 74 2e 22 29 3b 0a 58 09 | a momen|t.");.X.|
|00005c50| 09 74 72 79 63 61 6c 6c | 28 6f 62 6a 29 3b 0a 58 |.trycall|(obj);.X|
|00005c60| 09 09 62 72 65 61 6b 3b | 0a 58 09 09 7d 0a 58 09 |..break;|.X..}.X.|
|00005c70| 20 20 20 20 63 61 73 65 | 20 52 49 4e 5f 50 4f 49 | case| RIN_POI|
|00005c80| 53 4f 4e 5f 52 45 53 49 | 53 54 41 4e 43 45 3a 0a |SON_RESI|STANCE:.|
|00005c90| 58 09 09 62 72 65 61 6b | 3b 0a 58 09 20 20 20 20 |X..break|;.X. |
|00005ca0| 63 61 73 65 20 52 49 4e | 5f 41 47 47 52 41 56 41 |case RIN|_AGGRAVA|
|00005cb0| 54 45 5f 4d 4f 4e 53 54 | 45 52 3a 0a 58 09 09 62 |TE_MONST|ER:.X..b|
|00005cc0| 72 65 61 6b 3b 0a 58 09 | 20 20 20 20 63 61 73 65 |reak;.X.| case|
|00005cd0| 20 52 49 4e 5f 48 55 4e | 47 45 52 3a 20 20 7b 0a | RIN_HUN|GER: {.|
|00005ce0| 58 09 09 65 61 74 65 6e | 20 3d 20 30 3b 0a 58 09 |X..eaten| = 0;.X.|
|00005cf0| 09 66 6f 72 28 6f 74 6d | 70 3d 66 6f 62 6a 3b 20 |.for(otm|p=fobj; |
|00005d00| 6f 74 6d 70 3b 20 6f 74 | 6d 70 3d 6f 74 6d 70 32 |otmp; ot|mp=otmp2|
|00005d10| 29 20 7b 0a 58 09 09 20 | 20 20 20 6f 74 6d 70 32 |) {.X.. | otmp2|
|00005d20| 20 3d 20 6f 74 6d 70 2d | 3e 6e 6f 62 6a 3b 0a 58 | = otmp-|>nobj;.X|
|00005d30| 09 09 20 20 20 20 69 66 | 28 6f 74 6d 70 2d 3e 6f |.. if|(otmp->o|
|00005d40| 78 20 3d 3d 20 75 2e 75 | 78 20 26 26 20 6f 74 6d |x == u.u|x && otm|
|00005d50| 70 2d 3e 6f 79 20 3d 3d | 20 75 2e 75 79 29 0a 58 |p->oy ==| u.uy).X|
|00005d60| 09 09 09 69 66 28 21 50 | 75 6e 69 73 68 65 64 20 |...if(!P|unished |
|00005d70| 7c 7c 0a 58 09 09 09 20 | 20 20 20 28 6f 74 6d 70 |||.X... | (otmp|
|00005d80| 2d 3e 6f 74 79 70 20 21 | 3d 20 48 45 41 56 59 5f |->otyp !|= HEAVY_|
|00005d90| 49 52 4f 4e 5f 42 41 4c | 4c 20 26 26 20 6f 74 6d |IRON_BAL|L && otm|
|00005da0| 70 2d 3e 6f 74 79 70 20 | 21 3d 20 49 52 4f 4e 5f |p->otyp |!= IRON_|
|00005db0| 43 48 41 49 4e 29 29 20 | 7b 0a 58 09 09 09 20 20 |CHAIN)) |{.X... |
|00005dc0| 20 20 65 61 74 65 6e 2b | 2b 3b 0a 58 09 09 09 20 | eaten+|+;.X... |
|00005dd0| 20 20 20 70 6c 69 6e 65 | 28 22 53 75 64 64 65 6e | pline|("Sudden|
|00005de0| 6c 79 2c 20 25 73 20 76 | 61 6e 69 73 68 65 73 20 |ly, %s v|anishes |
|00005df0| 66 72 6f 6d 20 74 68 65 | 20 73 69 6e 6b 21 22 2c |from the| sink!",|
|00005e00| 64 6f 6e 61 6d 65 28 6f | 74 6d 70 29 29 3b 0a 58 |doname(o|tmp));.X|
|00005e10| 09 09 09 20 20 20 20 64 | 65 6c 6f 62 6a 28 6f 74 |... d|elobj(ot|
|00005e20| 6d 70 29 3b 0a 58 09 09 | 09 7d 0a 58 09 09 7d 0a |mp);.X..|.}.X..}.|
|00005e30| 58 09 09 69 66 28 65 61 | 74 65 6e 29 0a 58 09 09 |X..if(ea|ten).X..|
|00005e40| 20 20 20 20 74 72 79 63 | 61 6c 6c 28 6f 62 6a 29 | tryc|all(obj)|
|00005e50| 3b 0a 58 09 09 62 72 65 | 61 6b 3b 0a 58 09 09 7d |;.X..bre|ak;.X..}|
|00005e60| 0a 58 09 20 20 20 20 63 | 61 73 65 20 52 49 4e 5f |.X. c|ase RIN_|
|00005e70| 46 49 52 45 5f 52 45 53 | 49 53 54 41 4e 43 45 3a |FIRE_RES|ISTANCE:|
|00005e80| 20 20 7b 0a 58 09 09 70 | 6c 69 6e 65 28 22 54 68 | {.X..p|line("Th|
|00005e90| 65 20 68 6f 74 20 77 61 | 74 65 72 20 66 61 75 63 |e hot wa|ter fauc|
|00005ea0| 65 74 20 66 6c 61 73 68 | 65 73 20 62 72 69 67 68 |et flash|es brigh|
|00005eb0| 74 6c 79 20 66 6f 72 20 | 61 20 6d 6f 6d 65 6e 74 |tly for |a moment|
|00005ec0| 2e 22 29 3b 0a 58 09 09 | 74 72 79 63 61 6c 6c 28 |.");.X..|trycall(|
|00005ed0| 6f 62 6a 29 3b 0a 58 09 | 09 62 72 65 61 6b 3b 0a |obj);.X.|.break;.|
|00005ee0| 58 09 09 7d 0a 58 09 20 | 20 20 20 63 61 73 65 20 |X..}.X. | case |
|00005ef0| 52 49 4e 5f 43 4f 4c 44 | 5f 52 45 53 49 53 54 41 |RIN_COLD|_RESISTA|
|00005f00| 4e 43 45 3a 20 20 7b 0a | 58 09 09 70 6c 69 6e 65 |NCE: {.|X..pline|
|00005f10| 28 22 54 68 65 20 63 6f | 6c 64 20 77 61 74 65 72 |("The co|ld water|
|00005f20| 20 66 61 75 63 65 74 20 | 66 6c 61 73 68 65 73 20 | faucet |flashes |
|00005f30| 62 72 69 67 68 74 6c 79 | 20 66 6f 72 20 61 20 6d |brightly| for a m|
|00005f40| 6f 6d 65 6e 74 2e 22 29 | 3b 0a 58 09 09 74 72 79 |oment.")|;.X..try|
|00005f50| 63 61 6c 6c 28 6f 62 6a | 29 3b 0a 58 09 09 62 72 |call(obj|);.X..br|
|00005f60| 65 61 6b 3b 0a 58 09 09 | 7d 0a 58 09 20 20 20 20 |eak;.X..|}.X. |
|00005f70| 63 61 73 65 20 52 49 4e | 5f 50 52 4f 54 45 43 54 |case RIN|_PROTECT|
|00005f80| 49 4f 4e 5f 46 52 4f 4d | 5f 53 48 41 50 45 5f 43 |ION_FROM|_SHAPE_C|
|00005f90| 48 41 4e 3a 20 20 7b 0a | 58 09 09 70 6c 69 6e 65 |HAN: {.|X..pline|
|00005fa0| 28 22 54 68 65 20 73 69 | 6e 6b 20 6d 6f 6d 65 6e |("The si|nk momen|
|00005fb0| 74 61 72 69 6c 79 20 6c | 6f 6f 6b 73 20 6e 6f 74 |tarily l|ooks not|
|00005fc0| 68 69 6e 67 20 6c 69 6b | 65 20 61 20 66 6f 75 6e |hing lik|e a foun|
|00005fd0| 74 61 69 6e 2e 22 29 3b | 0a 58 09 09 74 72 79 63 |tain.");|.X..tryc|
|00005fe0| 61 6c 6c 28 6f 62 6a 29 | 3b 0a 58 09 09 62 72 65 |all(obj)|;.X..bre|
|00005ff0| 61 6b 3b 0a 58 09 09 7d | 0a 58 09 20 20 20 20 63 |ak;.X..}|.X. c|
|00006000| 61 73 65 20 52 49 4e 5f | 43 4f 4e 46 4c 49 43 54 |ase RIN_|CONFLICT|
|00006010| 3a 0a 58 09 09 62 72 65 | 61 6b 3b 0a 58 09 20 20 |:.X..bre|ak;.X. |
|00006020| 20 20 63 61 73 65 20 52 | 49 4e 5f 47 41 49 4e 5f | case R|IN_GAIN_|
|00006030| 53 54 52 45 4e 47 54 48 | 3a 0a 58 09 09 62 72 65 |STRENGTH|:.X..bre|
|00006040| 61 6b 3b 0a 58 09 20 20 | 20 20 63 61 73 65 20 52 |ak;.X. | case R|
|00006050| 49 4e 5f 49 4e 43 52 45 | 41 53 45 5f 44 41 4d 41 |IN_INCRE|ASE_DAMA|
|00006060| 47 45 3a 0a 58 09 09 62 | 72 65 61 6b 3b 0a 58 09 |GE:.X..b|reak;.X.|
|00006070| 20 20 20 20 63 61 73 65 | 20 52 49 4e 5f 50 52 4f | case| RIN_PRO|
|00006080| 54 45 43 54 49 4f 4e 3a | 0a 58 09 09 62 72 65 61 |TECTION:|.X..brea|
|00006090| 6b 3b 0a 58 09 20 20 20 | 20 63 61 73 65 20 52 49 |k;.X. | case RI|
|000060a0| 4e 5f 57 41 52 4e 49 4e | 47 3a 20 20 7b 0a 58 09 |N_WARNIN|G: {.X.|
|000060b0| 09 70 6c 69 6e 65 28 22 | 54 68 65 20 73 69 6e 6b |.pline("|The sink|
|000060c0| 20 67 6c 6f 77 73 20 77 | 68 69 74 65 20 66 6f 72 | glows w|hite for|
|000060d0| 20 61 20 6d 6f 6d 65 6e | 74 2e 22 29 3b 0a 58 09 | a momen|t.");.X.|
|000060e0| 09 74 72 79 63 61 6c 6c | 28 6f 62 6a 29 3b 0a 58 |.trycall|(obj);.X|
|000060f0| 09 09 62 72 65 61 6b 3b | 0a 58 09 09 7d 0a 58 09 |..break;|.X..}.X.|
|00006100| 20 20 20 20 63 61 73 65 | 20 52 49 4e 5f 54 45 4c | case| RIN_TEL|
|00006110| 45 50 4f 52 54 41 54 49 | 4f 4e 3a 09 2f 2a 20 66 |EPORTATI|ON:./* f|
|00006120| 61 6c 6c 20 74 68 72 6f | 75 67 68 20 2a 2f 0a 58 |all thro|ugh */.X|
|00006130| 09 20 20 20 20 63 61 73 | 65 20 52 49 4e 5f 54 45 |. cas|e RIN_TE|
|00006140| 4c 45 50 4f 52 54 5f 43 | 4f 4e 54 52 4f 4c 3a 20 |LEPORT_C|ONTROL: |
|00006150| 20 7b 0a 58 09 09 70 6c | 69 6e 65 28 22 54 68 65 | {.X..pl|ine("The|
|00006160| 20 73 69 6e 6b 20 6d 6f | 6d 65 6e 74 61 72 69 6c | sink mo|mentaril|
|00006170| 79 20 76 61 6e 69 73 68 | 65 73 2e 22 29 3b 0a 58 |y vanish|es.");.X|
|00006180| 09 09 74 72 79 63 61 6c | 6c 28 6f 62 6a 29 3b 0a |..trycal|l(obj);.|
|00006190| 58 09 09 62 72 65 61 6b | 3b 0a 58 09 09 7d 0a 58 |X..break|;.X..}.X|
|000061a0| 09 20 20 20 20 63 61 73 | 65 20 52 49 4e 5f 50 4f |. cas|e RIN_PO|
|000061b0| 4c 59 4d 4f 52 50 48 3a | 09 09 2f 2a 20 66 61 6c |LYMORPH:|../* fal|
|000061c0| 6c 20 74 68 72 6f 75 67 | 68 20 2a 2f 0a 58 09 20 |l throug|h */.X. |
|000061d0| 20 20 20 63 61 73 65 20 | 52 49 4e 5f 50 4f 4c 59 | case |RIN_POLY|
|000061e0| 4d 4f 52 50 48 5f 43 4f | 4e 54 52 4f 4c 3a 20 20 |MORPH_CO|NTROL: |
|000061f0| 7b 0a 58 09 09 70 6c 69 | 6e 65 28 22 54 68 65 20 |{.X..pli|ne("The |
|00006200| 73 69 6e 6b 20 6d 6f 6d | 65 6e 74 61 72 69 6c 79 |sink mom|entarily|
|00006210| 20 6c 6f 6f 6b 73 20 6c | 69 6b 65 20 61 20 66 6f | looks l|ike a fo|
|00006220| 75 6e 74 61 69 6e 2e 22 | 29 3b 0a 58 09 09 74 72 |untain."|);.X..tr|
|00006230| 79 63 61 6c 6c 28 6f 62 | 6a 29 3b 0a 58 09 09 62 |ycall(ob|j);.X..b|
|00006240| 72 65 61 6b 3b 0a 58 09 | 09 7d 0a 58 09 7d 0a 58 |reak;.X.|.}.X.}.X|
|00006250| 09 69 66 20 28 21 72 6e | 32 28 32 30 29 29 20 7b |.if (!rn|2(20)) {|
|00006260| 0a 58 09 09 70 6c 69 6e | 65 28 22 54 68 65 20 73 |.X..plin|e("The s|
|00006270| 69 6e 6b 20 62 61 63 6b | 73 20 75 70 2c 20 6c 65 |ink back|s up, le|
|00006280| 61 76 69 6e 67 20 25 73 | 2e 22 2c 20 64 6f 6e 61 |aving %s|.", dona|
|00006290| 6d 65 28 6f 62 6a 29 29 | 3b 0a 58 09 09 64 72 6f |me(obj))|;.X..dro|
|000062a0| 70 78 28 6f 62 6a 29 3b | 0a 58 09 7d 0a 58 09 65 |px(obj);|.X.}.X.e|
|000062b0| 6c 73 65 0a 58 09 09 75 | 73 65 75 70 28 6f 62 6a |lse.X..u|seup(obj|
|000062c0| 29 3b 0a 58 7d 0a 58 23 | 65 6e 64 69 66 0a 45 4e |);.X}.X#|endif.EN|
|000062d0| 44 5f 4f 46 5f 64 6f 2e | 63 0a 69 66 20 74 65 73 |D_OF_do.|c.if tes|
|000062e0| 74 20 31 31 34 39 31 20 | 2d 6e 65 20 60 77 63 20 |t 11491 |-ne `wc |
|000062f0| 2d 63 20 3c 64 6f 2e 63 | 60 3b 20 74 68 65 6e 0a |-c <do.c|`; then.|
|00006300| 20 20 20 20 65 63 68 6f | 20 73 68 61 72 3a 20 5c | echo| shar: \|
|00006310| 22 64 6f 2e 63 5c 22 20 | 75 6e 70 61 63 6b 65 64 |"do.c\" |unpacked|
|00006320| 20 77 69 74 68 20 77 72 | 6f 6e 67 20 73 69 7a 65 | with wr|ong size|
|00006330| 21 0a 66 69 0a 23 20 65 | 6e 64 20 6f 66 20 6f 76 |!.fi.# e|nd of ov|
|00006340| 65 72 77 72 69 74 69 6e | 67 20 63 68 65 63 6b 0a |erwritin|g check.|
|00006350| 66 69 0a 69 66 20 74 65 | 73 74 20 2d 66 20 64 6f |fi.if te|st -f do|
|00006360| 5f 77 65 61 72 2e 63 20 | 2d 61 20 22 24 7b 31 7d |_wear.c |-a "${1}|
|00006370| 22 20 21 3d 20 22 2d 63 | 22 20 3b 20 74 68 65 6e |" != "-c|" ; then|
|00006380| 20 0a 20 20 65 63 68 6f | 20 73 68 61 72 3a 20 57 | . echo| shar: W|
|00006390| 69 6c 6c 20 6e 6f 74 20 | 6f 76 65 72 2d 77 72 69 |ill not |over-wri|
|000063a0| 74 65 20 65 78 69 73 74 | 69 6e 67 20 66 69 6c 65 |te exist|ing file|
|000063b0| 20 5c 22 64 6f 5f 77 65 | 61 72 2e 63 5c 22 0a 65 | \"do_we|ar.c\".e|
|000063c0| 6c 73 65 0a 65 63 68 6f | 20 73 68 61 72 3a 20 45 |lse.echo| shar: E|
|000063d0| 78 74 72 61 63 74 69 6e | 67 20 5c 22 64 6f 5f 77 |xtractin|g \"do_w|
|000063e0| 65 61 72 2e 63 5c 22 20 | 5c 28 39 39 35 37 20 63 |ear.c\" |\(9957 c|
|000063f0| 68 61 72 61 63 74 65 72 | 73 5c 29 0a 73 65 64 20 |haracter|s\).sed |
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.