!\---------------------------------------------------------------------------
	MILT.HUG
	Milt Walker's character
	for Guilty Bastards by Kent Tessman (c) 1998

	(Included by "gb1.hug")
---------------------------------------------------------------------------\!

character milt "Milt"
{
	inherits NPC
	nouns "walker", "milt"
	adjective "milt"
	parse_rank 1
	long_desc
		"Milt Walker looks like a serious person.  People take him
		seriously in exactly the way they don't you.  And it's not
		just that he looks like he could buy and sell anybody he
		wanted; it's that everything about him seems done right.  \
		His haircut.  The cut of his suit.  The fact that there's
		not even so much as a smudge on his glasses.  It's like the
		world just kind of bends to the way he wants it to be."
	graphic IMAGES1, "milt"
	short_desc
		"Milt Walker is here, standing outside the building."
	lying_about_billy true
	knows_about_photos false
	knows_about_screeningreport false
	has_seen_billy false
	before
	{
		object DoAsk, DoTell, DoShow
		{
			if billy in location and self.knows_about_photos and
				object = &DoAsk and 
				(xobject = photos, holly)
			{
				"Milt looks at Billy with poorly concealed
disgust.  \"Why don't you ask this cretin?  I'm sure he could tell you pretty
much everything you need to know.\""
				return true
			}

			! If the player is in mid-conversation/demonstration
			! with Milt, make sure Milt doesn't take off too
			! abruptly
			if milt_daemon.timer < 5
				milt_daemon.timer = 5
			return false
		}
	}
	after
	{

!------------------
! DoAsk responses:
!------------------

		object DoAsk
		{
			select xobject

			case cindy
				"\"It's such a goddamned tragedy,\" Milt 
says, pulling his glasses down and rubbing his eyes.  \"I've known her for 
years, since long before she came here, tried to break in.  Knew her father,
her parents are in Detroit.  She was just on the verge; she was making a
picture for us--Stuart Fina was the executive on it.\"  He points over
toward the side building."

			case murder
				 "\"I don't want everybody in town to know 
I hired a detective.  I'm giving you twelve hours--if you can find out 
anything, if you can come up with some idea who killed her, that's what I
want.  It's not like the police aren't working on this, but God knows what 
might get dug up that we'd rather keep quiet.  I mean, not that I think there 
\Iwould\i be, but I'm close enough to her--I was, I mean--and close enough to 
her family to want to spare them any embarrassment.  And hell, this is
Hollywood.\""

			case billy
			{
				if self.lying_about_billy
					"Milt shakes his head, frowning
slightly.  \"I may have heard of him--he's, what, in some kind of band?  \
I don't see what that has to do with Cindy's death.\""
				elseif billy in location
					"Milt looks at Billy, then back at
you.  \"You find out a little more about him, then make up your own mind.\""
				else
					"Milt sighs.  \"All right.  I
should have told you--I knew that Cindy was seeing this...this Billy Van
Earl.  But he's not capable of murder.  What he \Iis\i is a goddamned
deadbeat, and I just wanted to...show some respect for Cindy and not have
this kind of thing get out.  He's not capable of murder.\"  Milt pauses.  \
\"Or do you think he is?\""
			}

			case holly
			{
				if not self.knows_about_photos
					"\"She's a famous actress.  She's
been in some pictures for us.  A bit of a prima donna, too, for what
it's worth.  I don't know what else to tell you.\""
				else
					"Milt shakes his head.  \"Well,
apparently that sleazy little bastard Van Earl was leaving Cindy and sneaking 
out to Malibu to share the love with her.  I don't have to tell you that 
pictures like that could really do some damage to her career.\""
			}
			
			case stuart
			{
				if self.knows_about_screeningreport
					"\Well, I don't know what to say,\"
Milt begins, shaking his head.  \"By the sounds of it, Fina lied to me:  \
he'd told me \IHugs and Kisses\i was testing fantastically.  I'm going to 
have to find out exactly what the hell's going on.\""
				else
					"\"He's a pretty sharp kid,\" he
says.  \"Been with us about a year, worked on a couple of medium-sized
pictures.  This picture Cindy was doing--\IHugs and Kisses\i--was his
first as Executive in Charge of Production.  Sounds like he's done a good
job on it.\""
			}

			case chuck
				"\"He's been Cindy's agent since she came
out here,\" Milt says.  \"But he's what you'd call small time.  Cindy was
starting to break out.  We talked about if, after her movie opened, she should
be thinking about moving up to a bigger agent.\""

#ifset INCLUDE_OTHER_ACTORS
			case johnny
				"\"That's a tough one,\" Milt says.  \"I mean,
I like Johnny--he's a star and I think despite making some terribly shitty
movies he's a good actor--but he can be tough to handle, to say the least.  \
Especially where other people's wives are involved and such.\""
#endif

			case cindysmovie, screeningreport
			{
				if self.knows_about_screeningreport
					"\"Well, I had thought we had a 
winner,\" Milt says.  \"Fina said we had a hit, but damn if those
screening results don't pretty prove he was covering up...\""
				else
					"\"It's a little black comedy 
called \IHugs and Kisses\i,\" he tells you.  \"But Fina is talking about 
it like it's going to be a huge hit.  He told me the results from test 
screenings are just fantastic--we paid a bundle for the script, I know.  It's
about a woman who catches her lover cheating on her and comes up with all 
sorts of ways to kill him.  We were planning to release it this summer...\""
			}

			case photos, negatives
			{
				if not self.knows_about_photos
					"\"I have no idea what photos you're
					talking about.\""
				else
					"Milt shakes his head.  \"I knew that 
little bastard was a creep.  And here he is, proving it for the scrapbook.  \
Holly Golden wouldn't be happy to have pictures like those around.  And as for
Cindy--\"  Milt exhales.  \"--well, she could be a bit excitable.  Had quite a
temper.  Who knows what would've happened if she and Billy and those photos
had ended up in the same room together.\"  He pauses.  \"Actually, I do know.  \
She would've killed him.  Killed him, killed him.\""
			}
			
			case cindyskey
				"\"Never mind where I got that key,\" Milt
				says offhandedly.  \"Just use it.\""

			case policereport
				"\"What's in that report is all I know.  I 
				want you to find out what happened.\""

			case marijuana
				"Milt lowers his voice and his eyelids and
growls at you, \"I thought we agreed:  that never happened.  And if it did,
why the hell would I want to talk about it?\""

			case note, studiopass, envelope
				"\"I had someone run that over to your hotel
				early this morning.\""
				
			case miltsassistant
				"\"She's working, I hope.\""
				
			case anne
				"\"That girl who works over in the other
				building?  She's the niece of one of our
				shareholders.\""

			case studiogate		! i.e., "Rocket Pictures"
				"\"Of course I'd like to say that I'd built
it all from scratch or some bullshit like that, but truth is, I took the 
reins when we forced the guys who built it from scratch out back in the 
early eighties.\""

			case takeover
				"\"Oh, that was nothing but rumors, not to
mention almost a year ago.  Certainly doesn't concern us now.\""

			case torncard
			{
				"\"Might be Chuck Bixby's card...\""
				chuck is known
			}

			case else
				return false
		}

!-------------------
! DoTell responses:
!-------------------

		object DoTell
		{
			select xobject
			
			! Objects where telling is the same as asking:
			case photos, negatives
				Perform(&DoAsk, self, xobject)
				
			case screeningreport
			{
				if self.knows_about_screeningreport
					"\"I know.  You told me...\""
				else
					"Milt looks at you in disbelief.  \
\"What?  Are you crazy?  No, no...that's not right.  Stuart Fina told me 
something completely different.  I don't know where you're getting your 
information, but you're wrong.\""
			}
			
			case stuart
			{
				if screeningreport is known
					Perform(&DoTell, self, screeningreport)
				else
					"Milt shrugs.  \"I'm not sure what
					you're getting at.\""
			}
			
			case billy, holly, chuck
			{
				"Milt listens with interest to what you have
				to say about ";
				print The(xobject); ".  \"But where does that
				lead you?\""
			}
				
			case else
				return false
		}

!-------------------
! DoShow responses:
!-------------------

		xobject DoShow
		{
			select object
			case torncard
			{
				"Milt looks at the card for a second.  \"Might
be Chuck Bixby.  He was Cindy's agent.  Got an office out on Wilshire.\""
				chuck is known
			}
			
			case birthdaycard
			{
				"Milt nods.  \"Van Earl must've given that to 
				her.  Good for her for throwing it out.\""
				if self.lying_about_billy
				{
					print ""
					self.lying_about_billy = false
					Perform(&DoAsk, self, billy)
				}
			}

			case photos
			{
				if self.knows_about_photos
					"Milt glances again at the photos and
					shakes his head."
				else
				{
					"Milt looks at the photos.  He can't
					believe it.  \"That son of a bitch...\"
					he mutters.  ";
					self.knows_about_photos = true
					self.lying_about_billy = false
					Perform(&DoAsk, self, object)
				}
			}
			
			case negatives
				"\"And you got those from Chuck Bixby?\" Milt
				asks.  \"You'd better find out where he got
				them from.\""
				
			case foldednote
				"\"Who wrote that?\" Milt asks."
			
			case screeningreport
			{
				if not self.knows_about_screeningreport
					"Milt looks at the screening 
report.  \"Hmmm...I haven't seen...\"  He trails off, his face darkening as
he reads.  ";
				self.knows_about_screeningreport = true
				Perform(&DoAsk, self, screeningreport)
			}
			
			case else
				return false
		}
	}
	is known
}


!------------------------
! NON-MATERIAL SUBJECTS:
!------------------------

object marijuana "boatload of marijuana"	
{
	nouns "marijuana", "grass", "dope", "ganja", "weed"
	adjectives "boatload", "south", "american", "shipment", "shitload"
	article "a"
	is known
}

object takeover "takeover rumors"
{
	nouns "rumors", "rumor", "rumours", "rumour"
	adjectives "takeover"
	is known
}

! Just for reference, since she is mentioned:
female_character miltsassistant "Milt Walker's assistant"
{
	nouns "assistant", "secretary"
	adjectives "milt's", "milt", "walker's"
	is known
}

!---------------------------------------------------------------------------
! milt_daemon
!
! Governs Milt's movement in and out of the Main Building:  30 minutes
! outside, 60 minutes inside.  Set 'special' once the initial conversation 
! has been launched.

daemon milt_daemon
{
	timer 45	! waits 45 min. the first time
}

event in milt_daemon
{
	if milt in mainbuilding		! Outside the Main Building or...
	{
		if location = mainbuilding and billy in location and
			not milt.has_seen_billy
		{
			milt.lying_about_billy = false
			milt.has_seen_billy = true
			event_flag = true
			"\nMilt looks at Billy like he's been painted
			blue.  \"What the hell is he doing here?\""
		}
			
		if milt_conversation is not active
			self.timer--
		if self.timer <= 0
		{
			remove milt
			if player in mainbuilding
			{
				event_flag = true
				"\nMilt looks at his watch.  \"I'm going to
have to get back inside,\" he says.  \"I'll try to poke my head out here
again in about an hour.\"  And with that, he disappears back inside the
Main Building."
			}
			if self is special
				self.timer = 60		! reset counter

			! If Milt hasn't spoken to the player yet, he'll
			! poke his head out after 15 minutes:
			else
				self.timer = 15
		}
	}
	else				! ...back in his office
	{
		if --self.timer <= 0
		{
			move milt to mainbuilding
			if player in mainbuilding
			{
				event_flag = true
				"\nMilt Walker comes out of the Main
Building.  He looks at his watch.  \"I've only got a few minutes, then
I'm going to have to go back in,\" he says."
			}
			self.timer = 30		! reset counter
		}
	}

	if self is not special
	{
		if milt in location	! i.e., with player
		{
			Activate(milt_conversation, 5)
			self is special
		}
	}
}

!---------------------------------------------------------------------------
! milt_conversation
!
! Milt's half of his (first) conversation with the player.

fuse milt_conversation
{}

event in milt_conversation
{
	local t
	t = self.tick
	select t
	case 4
	{
		event_flag = true
		obstacle = milt
		"\nMilt speaks in a fairly low voice, straight and to the
point, looking around, careful not to be overheard.  \"Maybe you already 
guessed this, but I asked you here to talk about Cindy Painter's death.  \
I don't know if there's anything that you can find out that the cops haven't
or won't, but I'm willing to give you twelve hours to see what you can do.\""
	}
	case 3
	{
		event_flag = true
		"\n\"Here,\" Milt says.  He hands you a report marked
\"LAPD Homicide Report\".  \"A contact of mine at the Police Department 
managed to procure this.  I don't know if it will be of any help.\""
		policereport is known
		if not Acquire(you, policereport)
		{
			"\n(You're carrying too much to	accept the report.)"
			move policereport to milt
		}
	}
	case 1
	{
		event_flag = true
		"\n\"You might want to go to her apartment--I don't know if
the police are still there or not.  Maybe you can find something they're
missing.\"  He hands you a single apartment key."
		cindyskey is known
		if not Acquire(you, cindyskey)
		{
			"\n(You're carrying too much to accept the key.)"
			move cindyskey to milt
		}
	}
	case 0
	{
		event_flag = true
		"\n\"I'm going to be in and out today--I've still got
a damned studio to run, even with all this mess going on.  I'll try to keep 
checking back out here for you after an hour or so.\""
		obstacle = nothing
	}
}