Misleading response about the shelters while in the jeep

[eriktorbjorn]

This is probably not worth doing anything about, but...

>LOOK
Jeep

Comfort was clearly not a consideration in the design of this jeep. The seat is
narrow and hard, and your shin is scrunched up against a radio bolted to the
floor.

Whoever was driving this jeep left it in an awful hurry. There's a wallet on the
floor at your feet.

>TOUCH SHELTERS
You couldn't do that from where you're standing.

Surely you're sitting, not standing?

But it may be tricky to fix that, because the message is not hard-coded in NBUNKERS-F:

	       (<OR <VERB? SMELL LISTEN>
		    <INTBL? ,PRSA ,TOUCHVERBS ,NTOUCHES>>
		<CANT-FROM-HERE>
		<RTRUE>)

<ROUTINE CANT-FROM-HERE ()
	 <TELL "You couldn't do that from " <PICK-NEXT ,COULDNTS> ,PERIOD>
	 <RTRUE>>

<GLOBAL COULDNTS:TABLE
	<LTABLE 2 "where you're standing" "here" "where you are" "here">>

"PICK-NEXT expects an LTABLE of strings, with an initial element of 2."

<ROUTINE PICK-NEXT (TBL "AUX" CNT STR)
	 <SET CNT <GET .TBL 1>>
	 <SET STR <GET .TBL .CNT>>
	 <INC CNT>
	 <COND (<G? .CNT <GET .TBL 0>>
		<SET CNT 2>)>
	 <PUT .TBL 1 .CNT>
	 <RETURN .STR>>

I guess it could add a special case for if the player's in the jeep... but it just seems like such an ugly hack for such a minuscule benefit.