; Made by Silver for RoT - Rewards when scene 2 is finished.

; @finalend <-- needs to be put in up scene.

	IF DEAD, @finalend3
	IF -#19, @finalend2
	COMPARE #<monster.id>, "620"
	IF= @spower
	COMPARE #<monster.id>, "626"
	IF= @smight
	COMPARE #<monster.id>, "629"
	IF= @sarmour
	COMPARE #<monster.id>, "623"
	IF= @sevade
	COMPARE #<monster.id>, "622"
	IF= @svision
	GOTO @finalend2
@spower
	IF GS, @spower2
	IF -R10-I2132, @finalend2
	IF -R40+I2132, @finalend2
@spower3
	HOST_GIVE I20
	N: %1 found a %I20!
	GOTO @finalend2
@spower2
	IF -R15-I2132, @finalend2
	IF -R60+I2132, @finalend2
	GOTO @spower3
@smight
	IF GS, @smight2
	IF -R10-I2132, @finalend2
	IF -R40+I2132, @finalend2
@smight3
	HOST_GIVE I21
	N: %1 found a %I21!
	GOTO @finalend2
@smight2
	IF -R15-I2132, @finalend2
	IF -R60+I2132, @finalend2
	GOTO @smight3
@sarmour
	IF GS, @sarmour2
	IF -R10-I2132, @finalend2
	IF -R40+I2132, @finalend2
@sarmour3
	HOST_GIVE I22
	N: %1 found a %I22!
	GOTO @finalend2
@sarmour2
	IF -R15-I2132, @finalend2
	IF -R60+I2132, @finalend2
	GOTO @sarmour3
@sevade
	IF GS, @sevade2
	IF -R10-I2132, @finalend2
	IF -R40+I2132, @finalend2
@sevade3
	HOST_GIVE I23
	N: %1 found an %I23!
	GOTO @finalend2
@sevade2
	IF -R15-I2132, @finalend2
	IF -R60+I2132, @finalend2
	GOTO @sevade3
@svision
	IF GS, @svision2
	IF -R10-I2132, @finalend2
	IF -R40+I2132, @finalend2
@svision3
	HOST_GIVE I25
	N: %1 found a %I25!
	GOTO @finalend2	
@svision2
	IF -R15-I2132, @finalend2
	IF -R60+I2132, @finalend2
	GOTO @svision3

@finalend2
	IF DEAD, @finalend3

	IF T502+504+506+V80+R1-I2055-T507-I2132, @givebonusses1a
	IF T503+505+V90+R1-I2053-I2132, @givebonusses1b
	IF T127+T219+V90+R1-I2055-I2132, @givebonusses1c 
	IF R1+R10-I2132, @givebonusses2a

	IF T502+504+506+V80+R4-I2055-T507+I2132, @givebonusses1a
	IF T503+505+V90+R4-I2053+I2132, @givebonusses1b
	IF T127+T219+V90+R4-I2055+I2132, @givebonusses1c 
	IF R4+R10+I2132, @givebonusses2a

	IF V15-I2079+R4-I2132, @givemonsterkatana1
	IF V25-I2080+R4-I2132, @givemonsterkatana2
	IF V45-I2081+R4-I2132, @givemonsterkatana3
	IF V65-I2082+R4-I2132, @givemonsterkatana4

	IF V15-I2079+R16+I2132, @givemonsterkatana1
	IF V25-I2080+R16+I2132, @givemonsterkatana2
	IF V45-I2081+R16+I2132, @givemonsterkatana3
	IF V65-I2082+R16+I2132, @givemonsterkatana4

	IF R2-I2132+T429, @earnadditionalgp
	IF R8+I2132+T429, @earnadditionalgp

@finalend3

#include merchant2.txt
	COMPARE #<num.hostPetID>, "520"
	IF= @cprotocenablenuhb
	COMPARE #<num.hostPetID>, "521"
	IF= @cprotocenablenuhc

	GOTO @cprotocenablenuha
@cprotocenablenuhb
	COMPARE #<str.soul>, "SOUL 1373"
	IF= @cprotocenablenuha
	GOTO @S11
@cprotocenablenuhc
	IF -T129, @S11
@cprotocenablenuha

	SET sceneLock, 0
	ACTOR	9, "Lock", danNoFloat, 6, 95, 10
	IF C2,  @autompheal
	IF C17, @autompheal
	IF C18, @autompheal
	IF C23, @autompheal
	IF C44, @autompheal
	IF E2146+T599, @autofulllife
	END
@autompheal
	HOST_GIVE M#<num.hostMaxMP>
	END
@autofulllife
	HOST_GIVE H#<num.hostMaxHP>
	HOST_GIVE M#<num.hostMaxMP>
	END

@givebonusses1a
	HOST_GIVE I2055
	GOTO @finalend3

@givebonusses1b	
	HOST_GIVE I2053
	GOTO @finalend3

@givebonusses1c	
	HOST_GIVE I2055
	GOTO @finalend3

@givebonusses2a
	SET bonus, %R24
	ADD bonus, 2100
	HOST_GIVE I#<bonus>
	COMPARE #<num.peopleInScene>, "1"
	IF> @givebonusses2a1
	N: You found a %I#<bonus>!
	GOTO @finalend3
@givebonusses2a1
	N: %1 found a %I#<bonus>!
	GOTO @finalend3

@givemonsterkatana1
	COMPARE #<num.peopleInScene>, "1"
	IF> @givemonsterkatana1b
	N: You found a %I2079
	HOST_GIVE I2079
	GOTO @finalend3
@givemonsterkatana1b
	N: %1 found a %I2079!
	HOST_GIVE I2079
	GOTO @finalend3

@givemonsterkatana2
	COMPARE #<num.peopleInScene>, "1"
	IF> @givemonsterkatana2b
	N: You found a %I2080
	HOST_GIVE I2080
	GOTO @finalend3
@givemonsterkatana2b
	N: %1 found a %I2080!
	HOST_GIVE I2080
	GOTO @finalend3

@givemonsterkatana3
	COMPARE #<num.peopleInScene>, "1"
	IF> @givemonsterkatana3b
	N: You found a %I2081
	HOST_GIVE I2081
	GOTO @finalend3
@givemonsterkatana3b
	N: %1 found a %I2081!
	HOST_GIVE I2081
	GOTO @finalend3

@givemonsterkatana4
	COMPARE #<num.peopleInScene>, "1"
	IF> @givemonsterkatana4b
	N: You found a %I2082
	HOST_GIVE I2082
	GOTO @finalend3
@givemonsterkatana4b
	N: %1 found a %I2082!
	HOST_GIVE I2082
	GOTO @finalend3

@earnadditionalgp
	COMPARE #<monster.level>, #<num.hostLevel>
	IF< @finalend3
	IF= @finalend3
	COMPARE #<num.peopleInScene>, "1"
	IF> @finalend3

	IF -GS, @earnadditionalgp2
	SET extracash, #<num.hostLevel>
	MUL extracash, "150"
	ADD extracash, "%R30000"
	N: You earn #<extracash> additional GP for killing a stronger monster alone.
	HOST_GIVE G#<extracash>
	SET extracash, "0"
	GOTO @finalend3

@earnadditionalgp2
	SET extracash, #<num.hostLevel>
	MUL extracash, "100"
	ADD extracash, "%R20000"
	N: You earn #<extracash> additional GP for killing a stronger monster alone.
	HOST_GIVE G#<extracash>
	SET extracash, "0"
	GOTO @finalend3

@skiplock
	END
@skiplockx2
	END

; The scene host has clicked on the little lock icon
@eventActorClick9
#include lpscript2.txt	

;	MENU "Lock Scene=@lockscenenow","Unlock Scene=@unlockscenenow"
;	END
@unlockscenenow
	COMPARE #<sceneLock>, 0
	IF= @lockscenenow
	LOCK 0
	SET sceneLock, 0
	SEL 9
	POSE	6
	HOST_TAKE T163
	HOST_TAKE T164
	HOST_TAKE T165
	HOST_TAKE T166
	COUNTDOWN 10
	WAIT 10
	END
@lockscenenow
	LOCK 1
	SET sceneLock, 1
	SEL 9
	POSE	5
	HOST_TAKE T163
	HOST_TAKE T164
	HOST_TAKE T165
	HOST_TAKE T166
	COUNTDOWN 10
	WAIT 10 
	END
