SCENE 410	Oasis
ACTOR 1 "Monster Breeder" Pic046c, 1, 50, 50
MUSIC "tnttitle.mid"
IF -V99, @end
IF T410, @breedingTime
1: Hey, you!
1: Yes, you. You look the adventuring type.
1: Be interested in doing me a favor?
WAIT 3.0
MENU "Yes=@yes", "No=@no"
END
;------------
@yes
1: Good man!
1: Now I breed monsters for our Collesium..
1: And to breed monster I need monster eggs.
1: Which I don't have at the moment.
1: I'm not young any more, and I can't go get them myself.
1: Would you be willing to go find me some?
WAIT 3.0
MENU "Sure=@questing", "No thanks=@safetyFirst"
END
;-------------
@no
1: Well fine then.
1: Kids these days....
END
;-------------
@questing
1: Great. Now here's the list of eggs I can use.
1: Gurgais Crab.
1: Solivol Lizard
1: Showlin Wolf
1: Crimson Streak
1: Master of the Unseen
1: And Desert Newt
1: Off with you then, bring me some eggs!
GIVE T410
END
@end
END
;------------
@safetyFirst
1: Fine then...
1: Punk kids...
END
;-----------------
@breedingTime
IF T416, @skipmys
IF I732, @MysEgg
IF T415, @FightPet
@skipmys
1: Got some eggs for me, have you?
@startAgain
1: Chose two for me to breed.
WAIT 3.0
MENU "Crimson Streak Egg=@CSeggA", "Master of the Unseen Egg=@MUSeggA","Gurgais Crab Egg=@GCeggA", "Showlin Wolf Egg=@SWeggA", "Desert Newt Egg=@DNeggA", "Solivol Lizard Egg=@SLeggA"
END
;----------------------
@MysEgg
1: Oh my! What an egg, it's like nothing I've ever seen...
1: Give it here, I'll hatch it for you...
HOST_TAKE I732
HOST_GIVE T415
@FightPet
1: Here it comes... oh my I don't think it's too happy!
SET
IF C1, @mys1
IF C2, @mys2
IF C3, @mys3
IF C4, @mys4
IF C5, @mys5
IF C6, @mys6
IF C7, @mys7
IF C9, @mys9
IF C10, @mys10
IF C11, @mys11
IF C12, @mys12
IF C13, @mys13
IF C14, @mys14
IF C15, @mys15
IF C16, @mys16
IF C25, @mys17
IF C26, @mys17
IF C27, @mys17
IF C28, @mys17
IF C29, @mys18
IF C30, @mys18
IF C31, @mys18
IF C32, @mys18
IF C34, @mys19
IF C35, @mys19
IF C36, @mys19
IF C37, @mys19
END



@mys1
FIGHT 1007
IF -WIN, @lostmys
1: You've defeated it!!!
HOST_GIVE T416
1: Here take it as a pet.
HOST_GIVE I1049
END

@mys2
FIGHT 1008
IF -WIN, @lostmys
1: You've defeated it!!!
HOST_GIVE T416
1: Here take it as a pet.
HOST_GIVE I1050
END

@mys3
FIGHT 1009
IF -WIN, @lostmys
1: You've defeated it!!!
HOST_GIVE T416
1: Here take it as a pet.
HOST_GIVE I1051
END

@mys4
FIGHT 1010
IF -WIN, @lostmys
1: You've defeated it!!!
HOST_GIVE T416
1: Here take it as a pet.
HOST_GIVE I1052
END

@mys5
FIGHT 1011
IF -WIN, @lostmys
1: You've defeated it!!!
HOST_GIVE T416
1: Here take it as a pet.
HOST_GIVE I1053
END

@mys6
FIGHT 1012
IF -WIN, @lostmys
1: You've defeated it!!!
HOST_GIVE T416
1: Here take it as a pet.
HOST_GIVE I1054
END

@mys7
FIGHT 1013
IF -WIN, @lostmys
1: You've defeated it!!!
HOST_GIVE T416
1: Here take it as a pet.
HOST_GIVE I1055
END

@mys9
FIGHT 1014
IF -WIN, @lostmys
1: You've defeated it!!!
HOST_GIVE T416
1: Here take it as a pet.
HOST_GIVE I1056
END

@mys10
FIGHT 1015
IF -WIN, @lostmys
1: You've defeated it!!!
HOST_GIVE T416
1: Here take it as a pet.
HOST_GIVE I1057
END

@mys11
FIGHT 1016
IF -WIN, @lostmys
1: You've defeated it!!!
HOST_GIVE T416
1: Here take it as a pet.
HOST_GIVE I1058
END

@mys12
FIGHT 1017
IF -WIN, @lostmys
1: You've defeated it!!!
HOST_GIVE T416
1: Here take it as a pet.
HOST_GIVE I1059
END

@mys13
FIGHT 1018
IF -WIN, @lostmys
1: You've defeated it!!!
HOST_GIVE T416
1: Here take it as a pet.
HOST_GIVE I1060
END

@mys14
FIGHT 1019
IF -WIN, @lostmys
1: You've defeated it!!!
HOST_GIVE T416
1: Here take it as a pet.
HOST_GIVE I1061
END

@mys15
FIGHT 1020
IF -WIN, @lostmys
1: You've defeated it!!!
HOST_GIVE T416
1: Here take it as a pet.
HOST_GIVE I1062
END

@mys16
FIGHT 1021
IF -WIN, @lostmys
1: You've defeated it!!!
HOST_GIVE T416
1: Here take it as a pet.
HOST_GIVE I1063
END

@mys17
FIGHT 1022
IF -WIN, @lostmys
1: You've defeated it!!!
HOST_GIVE T416
1: Here take it as a pet.
HOST_GIVE I1064
END

@mys18
FIGHT 1023
IF -WIN, @lostmys
1: You've defeated it!!!
HOST_GIVE T416
1: Here take it as a pet.
HOST_GIVE I1065
END

@mys19
FIGHT 1024
IF -WIN, @lostmys
1: You've defeated it!!!
HOST_GIVE T416
1: Here take it as a pet.
HOST_GIVE I1066
END


@lostmys
1: It's getting away!!
WAIT 4
EXIT
END
;--------------
@WinPet
1:Well, glad that's over....
1: I.. I think he likes you..
1: You take him, I don't want anything to do with that thing!
TAKE T415
GIVE Inn
END
;-------------------------------
@CSeggA
IF -I726, @noEgg
MENU "Master of the Unseen Egg=@CSMUS", "Gurgais Crab Egg=@CSGC", "Showlin Wolf Egg=@CSSW", "Desert Newt Egg=@CSDN", "Solivol Lizard Egg=@CSSL"
END
;------------------------------
@MUSeggA
IF -I727, @noEgg
MENU "Crimson Streak Egg=@CSMUS", "Gurgais Crab Egg=@MUSGC", "Showlin Wolf Egg=@MUSSW", "Desert Newt Egg=@MUSDN", "Solivol Lizard Egg=@MUSSL"
END
;-----------------------------
@GCeggA
IF -I728, @noEgg
MENU "Crimson Streak Egg=@CSGC", "Master of the Unseen Egg=@MUSGC", "Showlin Wolf Egg=@GCSW", "Desert Newt Egg=@GCDN", "Solivol Lizard Egg=@GCSL"
END
;------------------------------
@SWeggA
IF -I729, @noEgg
MENU "Crimson Streak Egg=@CSSW", "Master of the Unseen Egg=@MUSSW", "Gurgais Crab Egg=@GCSW", "Desert Newt Egg=@SWDN", "Solivol Lizard Egg=@SWSL"
END
;-----------------------------
@DNeggA
IF -I730, @noEgg
MENU "Crimson Streak Egg=@CSDN", "Master of the Unseen Egg=@MUSDN", "Gurgais Crab Egg=@GCDN", "Showlin Wolf Egg=@SWDN", "Solivol Lizard Egg=@DNSL"
END
;----------------------------
@SLeggA
IF -I731, @noEgg
MENU "Crimson Streak Egg=@CSSL", "Master of the Unseen Egg=@MUSSL", "Gurgais Crab Egg=@GCSL", "Showlin Wolf Egg=@SWSL", "Desert Newt Egg=@DNSL"
END
;-------------------------------------
@noEgg
1: You have to have the Egg to give it to me!
GOTO @startAgain
END
;-----------------------------------*
@CSMUS
IF -I726, @noEgg
IF -I727, @noEgg
TAKE I726
TAKE I727
SET random, "%R6"
COMPARE #<random>, "5"
IF=, @MCSMUSA
COMPARE #<random>, "3"
IF=, @MCSMUSB
COMPARE #<random>, "1"
IF=, @MCSMUSC
1: The breeding failed.
1: Try again.
GOTO @startAgain
END
;---------*
@CSGC
IF -I728, @noEgg
IF -I726, @noEgg
TAKE I728
TAKE I726
SET random, "%R6"
COMPARE #<random>, "5"
IF=, @MCSGCA
COMPARE #<random>, "3"
IF=, @MCSGCB
COMPARE #<random>, "1"
IF=, @MCSGCC
1: The breeding failed.
1: Try again.
GOTO @startAgain
END
;--------*
@CSSW
IF -I729, @noEgg
IF -I726, @noEgg
TAKE I726
TAKE I729
SET random, "%R6"
COMPARE #<random>, "5"
IF=, @MCSSWA
COMPARE #<random>, "3"
IF=, @MCSSWB
COMPARE #<random>, "1"
IF=, @MCSSWC
1: The breeding failed.
1: Try again.
GOTO @startAgain
END
;---------*
@CSDN
IF -I730, @noEgg
IF -I726, @noEgg
TAKE I726
TAKE I730
SET random, "%R6"
COMPARE #<random>, "5"
IF=, @MCSDNA
COMPARE #<random>, "3"
IF=, @MCSDNB
COMPARE #<random>, "1"
IF=, @MCSDNC
1: The breeding failed.
1: Try again.
GOTO @startAgain
END
;----------*
@CSSL
IF -I730, @noEgg
IF -I726, @noEgg
TAKE I726
TAKE I730
SET random, "%R6"
COMPARE #<random>, "5"
IF=, @MCSSLA
COMPARE #<random>, "3"
IF=, @MCSSLB
COMPARE #<random>, "1"
IF=, @MCSSLC
1: The breeding failed, the eggs are lost.
1: Try again.
GOTO @startAgain
END
;-----------*
@MUSGC
IF -I727, @noEgg
IF -I728, @noEgg
TAKE I727
TAKE I728
SET random, "%R6"
COMPARE #<random>, "5"
IF=, @MMUSGCA
COMPARE #<random>, "3"
IF=, @MMUSGCB
COMPARE #<random>, "1"
IF=, @MMUSGCC
1: The breeding failed.
1: Try again.
GOTO @startAgain
END
;----------*
@MUSSW
IF -I729, @noEgg
IF -I727, @noEgg
TAKE I727
TAKE I729
SET random, "%R6"
COMPARE #<random>, "5"
IF=, @MMUSSWA
COMPARE #<random>, "3"
IF=, @MMUSSWB
COMPARE #<random>, "1"
IF=, @MMUSSWC
1: The breeding failed.
1: Try again.
GOTO @startAgain
END
;----------*
@MUSDN
IF -I727, @noEgg
IF -I730, @noEgg
TAKE I727
TAKE I730
SET random, "%R6"
COMPARE #<random>, "5"
IF=, @MMUSDNA
COMPARE #<random>, "3"
IF=, @MMUSDNB
COMPARE #<random>, "1"
IF=, @MMUSDNC
1: The breeding failed.
1: Try again.
GOTO @startAgain
END
;---------*
@MUSSL
IF -I727, @noEgg
IF -I731, @noEgg
TAKE I727
TAKE I731
SET random, "%R6"
COMPARE #<random>, "5"
IF=, @MMUSSLA
COMPARE #<random>, "3"
IF=, @MMUSSLB
COMPARE #<random>, "1"
IF=, @MMUSSLC
1: The breeding failed.
1: Try again.
GOTO @startAgain
END
;-----------*
@GCSW
IF -I728, @noEgg
IF -I729, @noEgg
TAKE I728
TAKE I729
SET random, "%R6"
COMPARE #<random>, "5"
IF=, @MGCSWA
COMPARE #<random>, "3"
IF=, @MGCSWB
COMPARE #<random>, "1"
IF=, @MGCSWC
1: The breeding failed.
1: Try again.
GOTO @startAgain
END
;-----------*
@GCDN
IF -I728, @noEgg
IF -I730, @noEgg
TAKE I728
TAKE I730
SET random, "%R6"
COMPARE #<random>, "5"
IF=, @MGCDNA
COMPARE #<random>, "3"
IF=, @MGCDNB
COMPARE #<random>, "1"
IF=, @MGCDNC
1: The breeding failed.
1: Try again.
GOTO @startAgain
END
;----------*
@GCSL
IF -I728, @noEgg
IF -I731, @noEgg
TAKE I728
TAKE I731
SET random, "%R6"
COMPARE #<random>, "5"
IF=, @MGCSLA
COMPARE #<random>, "3"
IF=, @MGCSLB
COMPARE #<random>, "1"
IF=, @MGCSLC
1: The breeding failed.
1: Try again.
GOTO @startAgain
END
;---------*
@SWDN
IF -I729, @noEgg
IF -I730, @noEgg
TAKE I729
TAKE I730
SET random, "%R6"
COMPARE #<random>, "5"
IF=, @MSWDNA
COMPARE #<random>, "3"
IF=, @MSWDNB
COMPARE #<random>, "1"
IF=, @MSWDNC
1: The breeding failed.
1: Try again.
GOTO @startAgain
END
;-------------*
@SWSL
IF -I729, @noEgg
IF -I731, @noEgg
TAKE I729
TAKE I731
SET random, "%R6"
COMPARE #<random>, "5"
IF=, @MSWSLA
COMPARE #<random>, "3"
IF=, @MSWSLB
COMPARE #<random>, "1"
IF=, @MSWSLC
1: The breeding failed.
1: Try again.
GOTO @startAgain
END
;-------------*
@DNSL
IF -I730, @noEgg
IF -I731, @noEgg
TAKE I730
TAKE I731
SET random, "%R6"
COMPARE #<random>, "5"
IF=, @MDNSLA
COMPARE #<random>, "3"
IF=, @MDNSLB
COMPARE #<random>, "1"
IF=, @MDNSLC
1: The breeding failed.
1: Try again.
GOTO @startAgain
END
;-------------
@MCSMUSA
1: The breeding was a success!
1: And here it comes!..
FIGHT 431
IF -WIN, @winFight
1: Excellent
SET item.id, "1041"
1: I'll give you a #<item.name> for that monster.
HOST_GIVE I#<item.id>
END
;---------
@MCSMUSB
1: The breeding was a success!
1: And here it comes!..
FIGHT 432
IF -WIN, @winFight
1: Excellent
SET item.id, "1042"
1: I'll give you a #<item.name> for that monster.
HOST_GIVE I#<item.id>
END
;---------
@MCSMUSC
1: The breeding was a success!
1: And here it comes!..
FIGHT 433
IF -WIN, @winFight
1: Excellent
SET item.id, "1043"
1: I'll give you a #<item.name> for that monster.
HOST_GIVE I#<item.id>
END
;---------
@MCSGCA
1: The breeding was a success!
1: And here it comes!..
FIGHT 434
IF -WIN, @winFight
1: Excellent
SET item.id, "1044"
1: I'll give you a #<item.name> for that monster.
HOST_GIVE I#<item.id>
END
;---------
@MCSGCB
1: The breeding was a success!
1: And here it comes!..
FIGHT 435
IF -WIN, @winFight
1: Excellent
SET item.id, "1045"
1: I'll give you a #<item.name> for that monster.
HOST_GIVE I#<item.id>
END
;---------
@MCSGCC
1: The breeding was a success!
1: And here it comes!..
FIGHT 436
IF -WIN, @winFight
1: Excellent
SET item.id, "1046"
1: I'll give you a #<item.name> for that monster.
HOST_GIVE I#<item.id>
END
;---------
@MCSSWA
1: The breeding was a success!
1: And here it comes!..
FIGHT 437
IF -WIN, @winFight
1: Excellent
SET item.id, "1047"
1: I'll give you a #<item.name> for that monster.
HOST_GIVE I#<item.id>
END
;---------
@MCSSWB
1: The breeding was a success!
1: And here it comes!..
FIGHT 438
IF -WIN, @winFight
1: Excellent
SET item.id, "1048"
1: I'll give you a #<item.name> for that monster.
HOST_GIVE I#<item.id>
END
;---------
@MCSSWC
1: The breeding was a success!
1: And here it comes!..
FIGHT 431
IF -WIN, @winFight
1: Excellent
SET item.id, "1041"
1: I'll give you a #<item.name> for that monster.
HOST_GIVE I#<item.id>
END
;---------
@MCSDNA
1: The breeding was a success!
1: And here it comes!..
FIGHT 432
IF -WIN, @winFight
1: Excellent
SET item.id, "1042"
1: I'll give you a #<item.name> for that monster.
HOST_GIVE I#<item.id>
END
;---------
@MCSDNB
1: The breeding was a success!
1: And here it comes!..
FIGHT 433
IF -WIN, @winFight
1: Excellent
SET item.id, "1043"
1: I'll give you a #<item.name> for that monster.
HOST_GIVE I#<item.id>
END
;---------
@MCSDNC
1: The breeding was a success!
1: And here it comes!..
FIGHT 434
IF -WIN, @winFight
1: Excellent
SET item.id, "1044"
1: I'll give you a #<item.name> for that monster.
HOST_GIVE I#<item.id>
END
;---------
@MCSSLA
1: The breeding was a success!
1: And here it comes!..
FIGHT 435
IF -WIN, @winFight
1: Excellent
SET item.id, "1045"
1: I'll give you a #<item.name> for that monster.
HOST_GIVE I#<item.id>
END
;---------
@MCSSLB
1: The breeding was a success!
1: And here it comes!..
FIGHT 436
IF -WIN, @winFight
1: Excellent
SET item.id, "1046"
1: I'll give you a #<item.name> for that monster.
HOST_GIVE I#<item.id>
END
;---------
@MCSSLC
1: The breeding was a success!
1: And here it comes!..
FIGHT 437
IF -WIN, @winFight
1: Excellent
SET item.id, "1047"
1: I'll give you a #<item.name> for that monster.
HOST_GIVE I#<item.id>
END
;---------
@MMUSGCA
1: The breeding was a success!
1: And here it comes!..
FIGHT 438
IF -WIN, @winFight
1: Excellent
SET item.id, "1048"
1: I'll give you a #<item.name> for that monster.
HOST_GIVE I#<item.id>
END
;---------
@MMUSGCB
1: The breeding was a success!
1: And here it comes!..
FIGHT 431
IF -WIN, @winFight
1: Excellent
SET item.id, "1041"
1: I'll give you a #<item.name> for that monster.
HOST_GIVE I#<item.id>
END
;---------
@MMUSGCC
1: The breeding was a success!
1: And here it comes!..
FIGHT 432
IF -WIN, @winFight
1: Excellent
SET item.id, "1042"
1: I'll give you a #<item.name> for that monster.
HOST_GIVE I#<item.id>
END
;---------
@MMUSSWA
1: The breeding was a success!
1: And here it comes!..
FIGHT 433
IF -WIN, @winFight
1: Excellent
SET item.id, "1043"
1: I'll give you a #<item.name> for that monster.
HOST_GIVE I#<item.id>
END
;---------
@MMUSSWB
1: The breeding was a success!
1: And here it comes!..
FIGHT 434
IF -WIN, @winFight
1: Excellent
SET item.id, "1044"
1: I'll give you a #<item.name> for that monster.
HOST_GIVE I#<item.id>
END
;---------
@MMUSSWC
1: The breeding was a success!
1: And here it comes!..
FIGHT 435
IF -WIN, @winFight
1: Excellent
SET item.id, "1045"
1: I'll give you a #<item.name> for that monster.
HOST_GIVE I#<item.id>
END
;---------
@MMUSDNA
1: The breeding was a success!
1: And here it comes!..
FIGHT 436
IF -WIN, @winFight
1: Excellent
SET item.id, "1046"
1: I'll give you a #<item.name> for that monster.
HOST_GIVE I#<item.id>
END
;---------
@MMUSDNB
1: The breeding was a success!
1: And here it comes!..
FIGHT 437
IF -WIN, @winFight
1: Excellent
SET item.id, "1047"
1: I'll give you a #<item.name> for that monster.
HOST_GIVE I#<item.id>
END
;---------
@MMUSDNC
1: The breeding was a success!
1: And here it comes!..
FIGHT 438
IF -WIN, @winFight
1: Excellent
SET item.id, "1048"
1: I'll give you a #<item.name> for that monster.
HOST_GIVE I#<item.id>
END
;---------
@MMUSSLA
1: The breeding was a success!
1: And here it comes!..
FIGHT 431
IF -WIN, @winFight
1: Excellent
SET item.id, "1041"
1: I'll give you a #<item.name> for that monster.
HOST_GIVE I#<item.id>
END
;---------
@MMUSSLB
1: The breeding was a success!
1: And here it comes!..
FIGHT 432
IF -WIN, @winFight
1: Excellent
SET item.id, "1042"
1: I'll give you a #<item.name> for that monster.
HOST_GIVE I#<item.id>
END
;---------
@MMUSSLC
1: The breeding was a success!
1: And here it comes!..
FIGHT 433
IF -WIN, @winFight
1: Excellent
SET item.id, "1043"
1: I'll give you a #<item.name> for that monster.
HOST_GIVE I#<item.id>
END
;---------
@MGCSWA
1: The breeding was a success!
1: And here it comes!..
FIGHT 434
IF -WIN, @winFight
1: Excellent
SET item.id, "1044"
1: I'll give you a #<item.name> for that monster.
HOST_GIVE I#<item.id>
END
;---------
@MGCSWB
1: The breeding was a success!
1: And here it comes!..
FIGHT 435
IF -WIN, @winFight
1: Excellent
SET item.id, "1045"
1: I'll give you a #<item.name> for that monster.
HOST_GIVE I#<item.id>
END
;---------
@MGCSWC
1: The breeding was a success!
1: And here it comes!..
FIGHT 436
IF -WIN, @winFight
1: Excellent
SET item.id, "1046"
1: I'll give you a #<item.name> for that monster.
HOST_GIVE I#<item.id>
END
;---------
@MGCDNA
1: The breeding was a success!
1: And here it comes!..
FIGHT 437
IF -WIN, @winFight
1: Excellent
SET item.id, "1047"
1: I'll give you a #<item.name> for that monster.
HOST_GIVE I#<item.id>
END
;---------
@MGCDNB
1: The breeding was a success!
1: And here it comes!..
FIGHT 438
IF -WIN, @winFight
1: Excellent
SET item.id, "1048"
1: I'll give you a #<item.name> for that monster.
HOST_GIVE I#<item.id>
END
;---------
@MGCDNC
1: The breeding was a success!
1: And here it comes!..
FIGHT 431
IF -WIN, @winFight
1: Excellent
SET item.id, "1041"
1: I'll give you a #<item.name> for that monster.
HOST_GIVE I#<item.id>
END
;---------
@MSWDNA
1: The breeding was a success!
1: And here it comes!..
FIGHT 432
IF -WIN, @winFight
1: Excellent
SET item.id, "1042"
1: I'll give you a #<item.name> for that monster.
HOST_GIVE I#<item.id>
END
;---------
@MSWDNB
1: The breeding was a success!
1: And here it comes!..
FIGHT 433
IF -WIN, @winFight
1: Excellent
SET item.id, "1043"
1: I'll give you a #<item.name> for that monster.
HOST_GIVE I#<item.id>
END
;---------
@MSWDNC
1: The breeding was a success!
1: And here it comes!..
FIGHT 434
IF -WIN, @winFight
1: Excellent
SET item.id, "1044"
1: I'll give you a #<item.name> for that monster.
HOST_GIVE I#<item.id>
END
;---------
@MSWSLA
1: The breeding was a success!
1: And here it comes!..
FIGHT 435
IF -WIN, @winFight
1: Excellent
SET item.id, "1045"
1: I'll give you a #<item.name> for that monster.
HOST_GIVE I#<item.id>
END
;---------
@MSWSLB
1: The breeding was a success!
1: And here it comes!..
FIGHT 436
IF -WIN, @winFight
1: Excellent
SET item.id, "1046"
1: I'll give you a #<item.name> for that monster.
HOST_GIVE I#<item.id>
END
;---------
@MSWSLC
1: The breeding was a success!
1: And here it comes!..
FIGHT 437
IF -WIN, @winFight
1: Excellent
SET item.id, "1047"
1: I'll give you a #<item.name> for that monster.
HOST_GIVE I#<item.id>
END
;---------
@MDNSLA
1: The breeding was a success!
1: And here it comes!..
FIGHT 438
IF -WIN, @winFight
1: Excellent
SET item.id, "1048"
1: I'll give you a #<item.name> for that monster.
HOST_GIVE I#<item.id>
END
;---------
@MDNSLB
1: The breeding was a success!
1: And here it comes!..
FIGHT 431
IF -WIN, @winFight
1: Excellent
SET item.id, "1041"
1: I'll give you a #<item.name> for that monster.
HOST_GIVE I#<item.id>
END
;---------
@MDNSLC
1: The breeding was a success!
1: And here it comes!..
FIGHT 432
IF -WIN, @winFight
1: Excellent
SET item.id, "1042"
1: I'll give you a #<item.name> for that monster.
HOST_GIVE I#<item.id>
END
;---------
@winFight
1: Its Getting Away!!!!
WAIT 4
EXIT
END
;---------------------




;---------------------------------
SCENE 411	Oasis
IF -V99, @end

ACTOR 1 "Village Elder", JoshRoyalty, 23, 50, 30
ACTOR 2 "Villager", mantella, 1, 40, 50
ACTOR 3 "Villager", Pic003c, 1, 50, 50
ACTOR 4 "Villager", Pic008c, 1, 60, 50
IF T412, @springFixed
IF T411, @back
2: We must leave the town, we cannot survive here anymore!
4: Abandon all that we have? No, there must be some other solution.
3: Do you not think it would be suicide to make the trek across the desert 
without water anyway!?
3: We're doomed!
1: Quiet! All of you!
1: We will do what is best for the village..
1: What we need is someone stupid enough to go into the caves to find out 
what is blocking the spring..
1: Erm... hello %1, didn't see you there.
1: Would you perhaps be willing to do us an itty bitty little favor?
1: The underground spring that feeds the Oasis is blocked somehow.
1: We need you to go figure out what's blocking it.
1: The entrance to the cave is just north of here.
1: Off with you, hurry along now.
GIVE T411
@end
END
;-----------
@back
1: Unblocked the spring?
1: No?
1: What are you back here for then? Get going.
END
;-----------
@springFixed
1: Oh, thank you %1, the village is saved!
END
;---------------------------------
SCENE 412	Cave1
IF T412, @alreadyDone
N: The troll has blocked the underground stream!!
FIGHT 439
IF WON, @youWon
END
;-------
@youWon
H: Now to clear the blockage
GIVE T412
GIVE I732
N: You find a mysterious egg.
H: Oh well, at least the spring isn't blocked anymore
WAIT 1
GOTO LINK 47,1
END
;--------
@alreadyDone
H: The spring is unblocked now.
END


Scene 413
	IF -V99, @end
	IF T412, @good
	GOTO LINK 48, 0
	END
@good
GOTO LINK 47, 0
@end
END





SCENE 414
	IF -V99, @end
	IF R25, @good
	IF R50, @no
	GOTO LINK 49, 2
@end
	END
@no
	GOTO LINK 52, 2
	END
@good
	GOTO LINK 51, 0
	END
;comment

SCENE 415
	
	IF I1122, @end
	N: A giant Crab emerges and attacks!!
	FIGHT 458
	IF LOSE, @end
	GIVE I1122
@end
END

;coment