; crafting quest

;170 - start

SCENE 170 bglibrary, "Crafting Store"

        ACTOR	1,	"Merader",	joshAnimals, 9,	25,	90
	
	IF -V60, @end
	IF T173, @againagain
	IF T172, @stick
	IF T171, @back
	IF T170, @wb
;6,170,111,59,73
	SET monster6, #<km.6>
	SET monster170, #<km.170>
	SET monster111, #<km.111>
	SET monster59, #<km.59>
	SET monster73, #<km.73>
	1: Welcome!
	1: I'm glad you stopped in!
	1: I've had a few problems with advertising here. Can you believe it?
	1: Of course, it doesn't really help that I have nothing stocked right now.
	1: I suppose you're wondering what a Craft Shop deals in, anyway?
	1: Well, it's relatively new technology and all, but I can create items out of dead monsters' body parts!
	1: Problem is, the particular body parts I need are all pretty rare.
	1: Hm. Hey, I've got an idea!
	1: You're a big strong adventurer, right? How about you help me gather the stuff I need?
	1: I'll make the first item for free! But, you have to promise to tell other people about my store!
	1: Sound good?
	ASK 999999
	IF Qyes, @yes
	1: Drat. That's too bad...
	END
@yes
	1: Great! Let me get the list.
	HOST_GIVE T170
	1: Now, let's see here! I need...
	1: A Baby Gnome's staff...
	1: A Balor's tooth...
	1: A Yinor Claw's tongue...
	1: A Pincher's eye...
	1: And a Ysi Spider's leg.
	;6,170,111,59,73
	END
@wb
	IF I120+I121+I122+I123+I124, @congrats
	1: Let's see what's left on the list.
	IF I120, @2
	1: A Baby Gnome's staff...
@2	
	IF I121, @3
	1: A Balor's tooth...
@3
	IF I122, @4
	1: A Yinor Claw's tongue...
@4
	IF I123, @5
	1: A Pincher's eye...
@5
	IF I124, @6
	1: And a Ysi Spider's leg.
@6
END

@congrats
	1: Hey, that's all of the parts! Alright!
	1: This is great!
	1: Wait just a minute. I'll be right back.
	MOVE 1, -20, -20
	WAIT 5
	HOST_TAKE I120
	HOST_TAKE I121
	HOST_TAKE I122
	HOST_TAKE I123
	HOST_TAKE I124
	MOVE 1, 25, 90
	HOST_GIVE T171
	HOST_GIVE I723
	1: Here you go! A crafted Ring of Swiftness!
	1: It can do some nifty things.
	1: See ya'!
	END

@broke
	1: Sorry, you don't have enough money.
	END
@back
	1: Welcome back!
	1: I've learned the recipe for a new item!
	1: But, I don't have the parts I need for it.
	1: If you want the new item, you'll have to bring me the parts again.
	1: And pay me one hundred-thousand gold.
	1: Sound good?
	ASK 9999999
	IF Qyes, @buytwo
	1: No?? Darn, you're a cheapskate.
	END
@buytwo
	1: Great!
@buyagain
	1: Now, let's look at the 'ol list again...
	SET monster200, #<km.200>
	SET monster181, #<km.181>
	SET monster163, #<km.163>
	SET monster144, #<km.144>
	SET monster108, #<km.108>
	1: A Taywyr Dragon's wing...
	;200
	1: A Benitras Warrior's helmet...
	;181
	1: A pair of a Vrock's pants...
	163
	1: A Freebooter's sword...
	;144
	1: And a Stone Golem's spine.
	;108
	HOST_GIVE T172
	END
@stick
	IF I130+I126+I127+I128+I129, @congrats2
	1: Let's see what's left on the list.
	IF I126, @21
	1: A Taywyr Dragon's wing...
@21	
	IF I127, @31
	1: A Benitras Warrior's helmet...
@31
	IF I128, @41
	1: A pair of a Vrock's pants...
@41
	IF I129, @51
	1: A Freebooter's sword...
@51
	IF I130, @61
	1: And a Stone Golem's spine.
@61
END

@congrats2
	1: Hey, you've found all of the parts!
	IF -G100000, @broke
	HOST_TAKE G100000
	1: This is great!
	1: Hold on, I'll be back in a flash!
	MOVE 1, -20, -20
	WAIT 5
	HOST_TAKE I126
	HOST_TAKE I127
	HOST_TAKE I128
	HOST_TAKE I129
	HOST_TAKE I130
	MOVE 1, 25, 90
	HOST_GIVE T173
	HOST_GIVE I125
	1: Here you go! A crafted Faerie Stick!
	1: It's really keen.
	1: Well, see ya'!
	END
@againagain
	1: Well, if it isn't what's-your-name! How've you been? Do you want to buy another Faerie Stick?
	ASK 99999999
	IF Qyes, @again2
	1: Okay, then. Drop by any time if you change your mind.
	END
@again2
	HOST_TAKE T173
	GOTO @buyagain
	END
@end
	1: Welcome!
	1: I should be getting new products soon.
	1: Stop in again sometime!
END
@eventActorClick1
	MENU "Turn on Faerie=@choicea", "Turn off Faerie=@choiceb"
	END
@choicea
	HOST_TAKE T174
	END
@choiceb
	HOST_GIVE T174
	END
END
; doobie doo