Scene 74
#include steal.txt
#Include prtychk.txt
;BANNISHED souls will see this scene, when they are first banned
ACTOR 1, "Devil", josh7, 1, 20, 90 , 11
ACTOR 2, "Devil", josh84, 1, 30, 90 , 31
Face 2, 0
1: Burn them! Burn them all!!!
2: Mwaaaaahahhahhahaha!
MOVE 2, -10, 90
Wait 1
Face 1, 0
Wait 1
Face 1, 1
1: Aha another sinner!
H: What me?
1: Yes you, you %3!
1: Welcome to hell, eternal tourture for any soul that enters!
1: Now lets see, what have you done?
ASK 5
IF QDidnt @autocheck
IF Qdont @autocheck
IF Qnever @autocheck
IF Qhack @hacked
IF Qcheat @cheated
IF Qmod @modded
IF Qedit @edited
IF Qcrack @cracked
IF Qhex @hexedited
@autocheck
H: I DID NOTHING YOU BLEEPING BLEEP OF A BLEEP
;soul IDs of the banned here
;COMPARE #<str.soul>, "BANNED SOUL" IF= @BANNEDSOULID 
STRCMP #<str.soul>, "SOUL 1570"  
IF= @SOUL1570

;then the other banning conditions
IF M0+M2 @cheatandmodsinnerhell
IF M0 @cheatsinnerhell
IF M2 @Modsinnerhell
;in case they are strangly undetected...
1: Hmmm Im not certain what fellow devil you did, but its too late for you now.
1: You are trapped in hell of eternity! Unless that is you can escape hells invisible maze!
H: What? How?
1: I would never tell a %3 sinner that!
1: Well goodbye, enjoy your eternal pain.
GOTO EXIT
END

@hacked
@cracked
@hexedited
1: So your a self confessed HACKER
1: I dont feel sorry for you at all, you deserve this
1: Maybe if you post your SOUL ID, problem, and what you did wrong at www.synthetic-reality.com/cgi-bin/ultimatebb.cgi Markiller will help you
GOTO label @autocheck
@cheated
1: So you cheated huh?
1: Well just make a new charactor, and you can carry on as normal
1: But no more cheating! This charactor is trapped forever!
GOTO label @autocheck
@modded
@edited
1: Tut Tut
1: Im afraid you need to re-install the_summoner
1: Otherwise all your charactors will be sent here!
1: any that are already marked as modders are lost forever
GOTO label @autocheck
GOTO EXIT
END

@cheatsinnerhell
1: You my fellow devil are a cheating %3
1: Cheating is not permissable here, and thus this charactor is bannished fromthe_summoner to hell!
1: Of course, you could try to escape...
1: But im sure the eternal deamons will prevent that!
GOTO EXIT

@modsinnerhell
1: Fellow devil you are a modder!
1: That means you modified markiller007 hard work!
1: Whats the matter, couldnt win, too hard for you?
1: If you wnat a world you can mod Go and make your own!
1: Of course you could try to escape hell...
GOTO EXIT

@cheatandmodsinnerhell
1: Well well well
1: You cheated, and still coudnt win at the_summoner could you?
1: So you had to go one step further and MODDIFY THE SCRIPTS
1: You souldnt even LOOK at the scripts!
1: Or prehaps you modded and then cheated...
1: No matter, either way here you are in hell, a devil for all eternity
1: Enjoy your eternal pain
GOTO EXIT 

@SOUL1570
1: Vampyro, I bet you always wanted to be a devil didn't ya!
1: Lets see, you are the one who thinks you can hack around hacking scripts...
1: Well, here you are in hell! You failed!
1: Markiller007 would be happy to remove this ban should you ask him nicly, prehaps on the WOS BB
1: But then you never liked my world DID you?
1: So here, I ruined it for you! Welcome to hell!
GOTO EXIT

Scene 75
#Include prtychk.txt
#include steal.txt
ACTOR 1, "Devil", pet02, 1, 20, 90 , 31
COMPARE #<sinnerescapemaze>, "0"
IF= @sinnerescape100
IF> @skipfirstescape
SET sinnerescapemaze, 99
@skipfirstescape
1: WELL DONE!!!!
1: You have escaped the maze, even though you have hacked, cheated or modded!
1: Well actually thats a lie...
1: You dont truly belive that you could escape THAT easilly do you?
1: Of course not, try another #<sinnerescapemaze>,  times.
1: BACK TO THE START!
SUB sinnerescapemaze, 1
GOTO LINK 18, 2
END

@sinnerescape100
1: HA!
1: I CANT belive you belived me!
1: You have escaped 100 times!
1: But you STILL cannot leave!
1: You FOOLISH sinning devil!
1: You are banned from the_summoner eternally
1: Only markiller007 can choose to free you
1: But do you really believe he will?
1: Try asking on the WOS BB
END

Scene 76
#Include prtychk.txt
#include steal.txt
ACTOR 1, "Devil", josh1, 1, 20, 90 , 26
TAKE H10000
1: Well done %1 devil, you have found a dead end! DEAD end get-it?
1: Now you are eternally DEAD!
1: Eternally a DEVIL
1: AND eternally IN HELL!
END

;--------------------------------------------------------------------------------------------------------------------------
;The devil(Satin) himself
;--------------------------------------------------------------------------------------------------------------------------
Scene 77
#Include prtychk.txt
#include steal.txt
ACTOR	9,	"Satin", devil, 1, 20, 90 , 26
9: I am Satin, the all powerful and eternal ruler of HELL!
IF T7 @continuedevil
H: You aint so scary
9: oh no?
Actor 2, "Harmless chicken", Chickenflame, 1, -10, 90
SELECT 2
POSE 9, 2
MOVE 2, 30, 90
WAIT 5
9: Watch as I BURN this harmless chicken!
/wait 1
SELECT 2
POSE 3
2: EEEEEERRRRRRKKKKK!
POSE 4, 5
MOVE 2, 30, 120
9: See! Pure evil!
H: Um ok.
@continuedevil
COMPARE #<num.hostclass>, "35"
IF< @human
IF= @devil
IF> @monster
END

@devil
GOTO LINK 18, 2, 1

@human
9: How did you get in here mortal?
9: No matter, you are LEAVING
GOTO LINK 13, 6

@monster
9: Welcome %2, I see you are a monster!
IF ALIVE @alive
9: You are dead my feind
9: Here let me ressurect you
GIVE L1
GIVE H10000
GIVE M10000
9: Feel better?
H: Yes, thanks
9: NOW GET OUT THERE AND SLAY SOMETHING!
@alive
GIVE H10000
GIVE M10000
IF T6-T7 @learningaboutmorphs
@endofmorphlearn
9: Now right click me to select what you require.
END

@eventActorclick9
MENU "A Quest=@monsterquest", "Possession=@possessinganew", "Possession information=@learningaboutmorphs", "Monster skills=@monsterskillslearn", "Monster Skins=@whataremonsterskins", "Time Spell=@travelbackintime"
END

@learningaboutmorphs
IF T7 @learningaboutmorphs2
9: You have been here in hell 16 years now %2
9: It is time to prepare for leaving!
9: As of today, you are a monster.
@learningaboutmorphs2
9: Monsters are strange souls, at lower levels they are trapped in hell, yet unlike thier fellow deamons and devils at higher levels they can escape!
9: Monsters can possess the body of a creature from the world above, therefore incarnating into the land of the summoner.
9: At level 10 you will have your FIRST opportunity to possess a body and enter the world of the living
9: Once you have a body, you will be permitted to leave hell by the south eastern gates
9: Beware, they are one way to prevent unwanted guests. So you will have to die... or find some other method, to return!
9: Some monsters however require a level greater than 10 to possess, and others must be slain before you may possess them
9: Others still may not be possessed at all.
9: Should you die you will leave the body of your current monster and rebecome a 'monster'.
9: You will also be transported back here, to the land of the dead, hell.
9: Should you seek a change of monster, a change of body you will have to die first.
HOST_GIVE T7
GOTO @endofmorphlearn

@possessinganew
MOVE 9, -30, 0, 1
#include monstermorph.txt
END
@monsterskillslearn
9: There are 14 monster skills available
9: Each monster has an array of skills, but few have all of the skills
9: Some skills are automatically exectuted, others require you to right-click on a button
9: The skills are as follows
9: Dig : Allows crossing of mud terrain, use it to dig underground by equiping Digging claws.
9: Slash : Allows crossing of Forest terrain, use it to cross forest by equiping slashing claws.
9: Climb : Allows you to climb cliff terrain, use it by equiping tenticles. 
9: Sprint : Allows you to move twice as fast, equip sprint legs to use it.
9: Drill : Allows you to burrow through rock terrain, equip drill claws to use it.
9: Swim : Allows you to cross water terrain, equip fins to use it.
9: Hyperjump : Allows you to cross tall cliff terrain, equip 'hyper jump' to use it.
9: Fly : Allows you to cross any terrain, equip 'wings' to use it.
9: Steal+ : Allows you to steal items and GP from actors and other players! Any monster can steal, but some have a better chance of success.
9: Assasin : Allows monsters to kill with stealth, any monster can kill but some have a better chance of success, failure means certain death however. Player assasinations only work against those with less HP remaining than yourself.
9: Beware when assasinating however, if you assasinate an important quest actor I will have to send you back in time to allow you to accomplish that quest!
9: Eat : After a fight monsters with this skill eat their defeated opponants to heal themselves.
9: Run : This skill allows a monster to flee a battle, but wont always succeed, can be used once per fight.
9: Find+ : This skill lows a monster to find extra GP after a battle
9: Hunt : This skill alows a monster to hunt for prey from the safety of thier camp.
9: Sometimes it is better to choose a monster with a skill than a stronger monster, so think about skills when choosing.
END
 
;---------------------------------------------------------------------------------------
;Time Travel
;---------------------------------------------------------------------------------------

@travelbackintime
9: You wish for me to cast a time spell, and send you back in time?
9: I warn you, such spells are very powerful and risky, however I can send you back.
9: If you just want to know more about time travel first type 'info'
@TravelbackintimeB
COMPARE #<num.peopleinscene>, 1
IF> @Cantpleasebackalone
IF< @Cantpleasebackalone
9: So do you want to travel back in time now?
ASK 30
IF YES @timetravelNOW
IF Qinfo @timetravelINFO
GOTO @travelbackintimeB

@Cantpleasebackalone
9: I can only send one monster back in time at a time.
9: Plase come back one at a time.
GOTO EXIT

@timetravelINFO
9: As I said, time travel is risky, but possable.
9: For one thing, you lose everything you have earned sience I first allowed you to return to the land of the living.
9: All items and gold will be lost forever, and you will have to earn them again!
9: You will keep you're levels experience and pets however.
9: When you arrive back in time, it will be as it was on you're 16th year in hell. Any quests you have compleated will have to be redone.
9: The only good reason to travel back in time,is if you messed something up by killing someone you shouldn't have!
9: If you kill an important person needed to help you on a quest, the quest will be uncompleatable!
9: So if that is you're situation, then you'd best go back
GOTO @TravelbackintimeB

@timetravelNOW
9: Are you sure? This is your last chance to change you're mind
9: Make sure you are aware of the risks before you continue!
9: You have 30 secconds to decide
9: So are you ready?
ASK 30
IF NO @CancelTimeTravel
IF Qwait @CancelTimeTravel
IF Qstop @CancelTimeTravel
IF Qnah @CancelTimeTravel
9: Ok then, here we go, this may take a while, so wait while I cast the spell.
SET TimeTravelID, 1
9: /a Chants
FX
H: /a shuffles
@TimeTravelbeginningnow

;Tokens

COMPARE #<TimeTravelID>, 1750		;This number is the largest Token ID
IF> @skipTokenReset
COMPARE #<TimeTravelID>, 6
IF= @skipTokenReset
HOST_TAKE T#<TimetravelID>
@skiptokenreset

;Items

COMPARE #<TimeTravelID>, 1024		;This number is the largest item ID
IF= @skipitemtake
HOST_TAKE I#<TimeTravelID>.100
@skipitemtake

;Stealing/murder

COMPARE #<TimeTravelID>, 83		;This number is the largest stealable/murderable scene
IF> @skipMSSScookieset			
SET MS#<TimeTravelID>, 0		
SET SS#<TimeTravelID>, 0		
@skipMSSScookieset

;Checking if we are done
			
ADD TimeTravelID, 1			
COMPARE #<TimetravelID>, 1750
IF< @TimeTravelbeginningnow
@Andbackwego!
SET num.hostclass, 36
HOST_TAKE G1000000
HOST_GIVE G1000
HOST_GIVE T6
9: Goodbye %1!
GOTO link 18, 1, 1

@CancelTimeTravel
9: So you don't wan't to go now?
9: Well just ask again if you change you're mind.
GOTO @endofmorphlearn

-------------------------
The main monster quests
-------------------------

;The first quest to stop the old man

@monsterquest
IF -T100 @Firstquest1
IF T100-T101 @Firstquest1.5
IF T100+T101-T102 @Firstquest2
IF T100+T101+T102-T103 @firstquest3

;The seccond quest to get the red gem

IF T100+T101+T102+T103-T104 @Seccondquest1
IF T100+T101+T102+T103+T104-T105 @Seccondquest2
IF T104+T105-T106-T107 @Seccondquest2.5
IF T104+T105+T107-T112 @SeccondquestDRAGfailed
IF T104+T105+T106-T108 @Seccondquest3
IF T104+T105+T106+T108-T109-T110 @Seccondquest3.5
IF T104+T105+T106+T110-T112 @SeccondquestSUMfailed
IF T104+T105+T106+T108+T109-T111 @Seccondquest4

;The third quest to get the blue gem

IF T111-T113 @Thirdquest1
IF T112-T113 @Thirdquest1
IF T113-T114 @Thirdquest2
IF T113+T114-T115 @Thirdquest2.5
IF T113+T114+T115-T116-T117 @Thirdquest3
IF T113+T114+T115+T116-T117 @Thirdquest3.5
IF T113+T114+T115+T117-T118 @Thirdquest4
IF T113+T114+T115+T117+T118-T119-T120 @Thirdquest4.5
IF T113+T114+T115+T117+T118+T119-T121-T122 @Thirdquest5
IF T113+T114+T115+T117+T118+T120-T124 @ThirdquestDRAGfailed
IF T113+T114+T115+T117+T118+T119+T122-T124 @ThirdQuestSUMfailed
IF T113+T114+T115+T117+T118+T119+T121-T123 @Thirdquest6
9: There are no quests for you at this moment, come back later.
END

;THE OLD MAN

@Firstquest1
9: So you feel ready for your first quest young monster!
9: I have a very important quest for you, there is a powerful old summoner out there!
9: He plans to overthrow the Grand Summoner!
9: He is going to send a young summoner to collect the four gems, and use thier power to free the people of the island above
9: He must be stopped! And you will stop him, kill him, and bring me his heart!
H: Me? But I am still so weak.
9: So you cannot kill a defencless old fool?
H: Well...
9: Get out there and go get him!
HOST_GIVE T100
END

@Firstquest1.5
9: Have you already killed the old man?
H: No Im still looking for him.
9: He should be out there somewhere... hurry and kill him!
END

@Firstquest2
9: Have you already killed the old man?
H: Ummm
H: /a looks nervous
9: Hurry and bring me his heart!
END

@firstquest3
9: Have you killed the old man?
H: Yes, he is dead!
H: /a hopes he'll fall for it
9: Well then, his heart...
H: Oh yes, here
N: You hand him the human heart
9: Ha, finally, he is dead!
9: Good work!
H: /a shuffles away nervously
9: Hey wait a minute!!!!
H: Hey, look, it wasnt my idea, ok...
9: What wasnt? I just wanna give you your reward!
H: Oh, right, thanks. And um nothing wasn't.
9: OK, here, take this sword, it was left here by some anchent race
N: You recieve a %I172
H: Did they run fast all that time ago then?
9: What?
H: Never mind...
9: come back when you seek a new quest.
HOST_GIVE T103
HOST_GIVE I172
END

;THE RED GEM

@Seccondquest1
9: Terrible news my fiend!
H: Whats wrong?
9: The young summoner still seeks the gems!
9: He is well on his way to the first gem, the red gem!
9: In fact, he is already in the red dragon cave!
HOST_GIVE T104
@Seccondquest2
9: Someone must stop the summoner from getting the red gem!
H: I will stop him my master!
9: You better had, with the power of those gems even I would be no match for him!
9: First you must kill the red dragon, and return to me
9: Then using the powers of the gem, I will transform you into the red dragon, and you must return to the cave and destroy the summoner!
HOST_GIVE T105
H: I will slay the dragon immediatly!
9: The only question now, is how did he know where too look?
9: Who could have told him, if the old summoner is already dead?
H: Suffles off nervously
GOTO EXIT
END

@Seccondquest2.5
9: Have you defeated the Red Dragon already?
H: No
9: No? NO? Well get out there and get to work!
9: Get to the cave in the goblin forest!
END

@SeccondquestDRAGfailed
HOST_GIVE T112
9: You are back my fiend, and teh dragon? It is dead?
H: Well, yeah....
9: Great, hand me the gem!
H: Um....
9: What is it?
H: The summoner took it....
9: WHAT?!?
9: You have failed me! But no matter, our battle will be tougher, but we can still defeat him.
9: Come back when you are ready to go after him again.
END

@Seccondquest3
HOST_GIVE T108
HOST_GIVE T1302
9: Welcome back, is the dragon slain?
H: Yes, and I hold in my claws the Red Gem!
9: Excellent!
9: Now I must transform you into the dragon so you may destroy that thorn in my foot, the summoner!
9: You must be in the dragon form to take on the summoner, this way we will have the element of supprise
9: Using the gems power, possess a red dragon now
MOVE 9, -30, 0, 1
#include monstermorph.txt
END

@Seccondquest3.5
9: You must possess a red dragon using the possession option in the right click menu
9: And then return to the red dragons cave and defeat the summoner!
END

@SeccondquestSUMfailed
HOST_GIVE T112
9: Ahhh %1 you have returned to me!
9: And what news of my foe, is he defeated?
H: Unfortunatly no my leige
9: WHAT?!?
H: His powers were far greater than my own, and he used this sly little trick an...
9: I dont care, you should have torn him appart win that form!
9: Nevermind, we can take him on later, at least we have the gem
H: Ummm...
9: well, hand it over
H: Eh... well he um...
9: What?
H: He kinda took the gem when he defeated me
9: I dont belive this, you let him escape with the gem?
9: Return to me when you are more worthy foolish %3 of a monster
9: Maybe you will defeat him next time
END

@Seccondquest4
HOST_GIVE T111
HOST_TAKE I39
9: Ahhh %1 you have returned to me!
9: And what of my foe is he defeated?
H: Yes, more good news satin, that %3 is beaten
9: Excellent, and he is dead?
H: Im afraid not, he fled the battle using a ticket, but we still have the gem!
9: I see.. a minor setback, we will take him next time!
9: Here is your reward %1, a %I192 left behind by the same anchent ones!
H: /a recieved a %I192
HOST_GIVE I192
END

;THE BLUE GEM

@Thirdquest1
9: Terrible news my fiend!
H: What is it?
9: That blasted summoner is on the north eastern island!
H: So what?
9: So he is close to the blue gem!
HOST_GIVE T113
@Thirdquest2
9: Becides, you are still on a mission to bring me his hyde!
IF T111 @Thirdquest1SAT
9: With two gems he will be of even greater threat, and one step closer to being too much of a match for us!
9: Get out there and stop him, get to the north-eastern island and seek him out, or if you prefere bring me that blue gem!
GOTO @Thirdquest1SUM
@Thirdquest1SAT
9: We should do our best to get the blue gem before he does
9: With two gems in out possession, he should be a pushover!
9: Goto the northeastern island, stop him and bring to be the blue gem!
@Thirdquest1SUM
H: Yes-sir!
HOST_GIVE T114
END

@Thirdquest2.5
9: Back so soon?
9: And the blue gem? Do you have it?
H: Uhhh...
9: Have you even been to that damned island yet?
H: Ehhhh....
9: %1 you %3 get out there and look for that pesky summoner!
END

@Thirdquest3
9: Have you been to the island yet?
H: Of course, I found a strange statue there Satin.
9: Ahh yes the statue of transportation 'Xeolon'.
9: It has the power to send you to the small island to the north of the north-eastern island
H: But it doesn't appear to do anything!
9: This has happened before, some %3 has stolen a piece of it. You must seek out the missing piece!
HOST_GIVE T116
END

@Thirdquest3.5
9: Have you found the missing piece yet %1?
H: No but I am still looking!
9: You fool! Did you really believe that you would find it here? In hell?
9: it will still be on the north eastern island, maybee one of the inhabitants has it
H: Oh, well back to the island I go!
H: /a runs!
GOTO EXIT
END

@Thirdquest4.5
@Thirdquest4
9: Back with the gem I presume?
H: No sir, but I found the missing piece of the statue and it is now in place!
9: Then please explain why you are not in place!
H: Oh....
9: Now the statue is repaired touch it and get to the smaller island!
9: Quickly before the summoner beats you to it!
END

@Thirdquest5
9: I see that you defeated the blue dragon!
H: He was a pushover!
9: And what of your primary objective, is the summoner dead?
H: Oh... um I knew I forgot something...
9: For evilness sake! Get back out to the island and defeat the summoner
9: He is most likly standing on the northern-most island wondering where the dragon is!
END

@ThirdquestDRAGfailed
H: Im afraid I bear bad news Satin
9: Dont tell me you have failed me?
H: Im afraid I have, the dragon defeated me, was slain by the summoner who took the blue gem.
IF T112 @ThirdquestDRAGfailedSUM
9: Now both he and I have a single gem, it is vital we prevent him reaching the third
9: I will seek the summoner out again, return when you are worthy of the challange!
HOST_GIVE T124
END

@ThirdquestDRAGfailedSUM
9: So the summoner has both gems!
9: This is not evil at all!
9: With three gems he will have power to match my own
9: You had better not fail me again %1, or it may be your last!
H: /a shudders
HOST_GIVE T124
END

@ThirdQuestSUMfailed
H: Im afraid I bear bad news Satin
9: What is it?
H: After slaying the blue gem, I took on the summoner with its powers.
9: And?
H: I was defeated by the summoner, and he took the blue gem
9: %1 you %3 of a %3!
IF -T112 @ThirdquestDRAGfailedSUM
9: Now both he and I have a single gem, it is vital we prevent him reaching the third
9: I will seek the summoner out again, return when you are worthy of the challange!
HOST_GIVE T124
END

@Thirdquest6
9: You are back, and the gem?
H: I have it here!
9: Excellent
H: However the summoner is still not dead...
9: What, then go back to the island and...
H: Im afraid he ran once again!
9: That Coward! We have to corner %1 the %3 or we will never have him!
9: /a takes the gem
HOST_TAKE I40
HOST_GIVE T123
9: At least we have the blue gem, I will seek %3 the summoner once again
9: We need to make better plans if we are to stop him in his tracks.
END

-------------------------
No more quests
-------------------------
@whataremonsterskins
H: What are monster skins?
9: Well, there is a folder in the_summoner, WOS\worlds\the_summoner\monster skins
9: In this folder are ready to use skins depicting ALL of the monsters you can morph into!
9: Simply copy, all of the files in this Directory into WOS\skins...
9: ...and you can change your skin to suit the monster you are morphed into!
9: For example, If you became a goblin, you would click books, book of skins at the top of the screen
9: Then click Summonermonsters on the left sidebar
9: Then select the skin monster goblin
9: There are some things you should be aware of
9: Firstly if you are unfimiliar with copying skins about dont do it!
9: Secondly, editing of files in WOS\Worlds\the_summoner WILL cause you to be a modder, this includes 'monster skins' folder
9: And finally, you dont have to use the skins, they are optional, that is untill Dan lets world developers force skins 
9: /a grins evily
END

Scene 78
#Include prtychk.txt
#include steal.txt
COMPARE #<num.hostclass>, 36
IF= @youcantleaveyet
IF> @leavehellnow
GOTO EXIT

@leavehellnow
GOTO LINK 13, 6

@youcantleaveyet
H: I cant leave without a body
H: I must see Satin
END

;--------------------------------------------------------------------------------------------------------------------------
;The shop of hell Scenes 79-82
;--------------------------------------------------------------------------------------------------------------------------
Scene 79
#Include prtychk.txt
#include steal.txt
ACTOR 1, "Devil", josh84, 1, 30, 90 , 31
IF T100+T101-T102 @shopsuggestQ1
1: You will only ever get the chance to buy stuff in hell, humans dont make any effort to sell to non-humans
1: So make the best of this shop, after all, the only way back is to die!
1: Right click me to select what item type you with to buy
END

@shopsuggestQ1
H: /a looks glum
1: Hey whats wrong?
H: Satin sent me to kill somebody, but they got away!
1: /a laughs
1: Thats no problem, none of us ever kill for HIM, whats the point
H: But he'll bannish me back here in hell! And he asked me to bring...
1: ...some guys heart? No problem! Just give him this
N: The Devil hands you a human heart
HOST_GIVE T102
1: He cant tell them apart, and he'll think you did it!
H: Thanks a lot! No eternal pain and torture for me!
1: Anytime
END

@eventActorclick1
MENU "Herbs=@herbhell", "Weapons=@weaponshell", "Armour=@armourhell"
END

@herbhell
GOTO Scene 80
END

@weaponshell
GOTO Scene 81
END

@armourhell
GOTO Scene 82
END

;--------------------------------------------------------------------------------------------------------------------------
;The HERBS shop of hell Scenes 79-82
;--------------------------------------------------------------------------------------------------------------------------
Scene 80
#Include prtychk.txt
#include steal.txt
ACTOR 1, "Devil(Herbs)", josh84, 1, 30, 90 , 31
1: Click shop to start buying!
OFFER 1, 2, 3, 4, 7, 12, 13, 14, 15, 16, 18, 19, 24, 27, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 94
END

@eventActorclick1
MENU "Other=@Other"
END

@Other
GOTO Scene 79
END
;--------------------------------------------------------------------------------------------------------------------------
;The WEAPONS of hell Scenes 79-82
;--------------------------------------------------------------------------------------------------------------------------
Scene 81
#Include prtychk.txt
#include steal.txt
ACTOR 1, "Devil(Weapons)", josh84, 1, 30, 90 , 31
1: Rightclick me, pick a level of weapon, and then click shop to start buying!
END

@eventActorclick1
MENU "Weapons1-20=@weapons20", "Weapons20-40=@weapons40", "Weapons40-60=@weapons60", "Weapons60-80=@weapons80", "Weapons80-100=@weapons100", "Other=@Backtoshopselect", 
END

@weapons20
OFFER2 0,20,12, 0,20,13, 0,20,14, 0,20,15, 0,20,16, 0,20,17, 0,20,18, 0,20,19
END

@weapons40
OFFER2 20,40,12, 20,40,13, 20,40,14, 20,40,15, 20,40,16, 20,40,17, 20,40,18, 20,40,19
END

@weapons60
OFFER2 40,60,12, 40,60,13, 40,60,14, 40,60,15, 40,60,16, 40,60,17, 40,60,18, 40,60,19
END

@weapons80
OFFER2 60,80,12, 60,80,13, 60,80,14, 60,80,15, 60,80,16, 60,80,17, 60,80,18, 60,80,19
END

@weapons100
OFFER2 80,100,12, 80,100,13, 80,100,14, 80,100,15, 80,100,16, 80,100,17, 80,100,18, 80,100,19
END

@Backtoshopselect
GOTO Scene 79
END

;--------------------------------------------------------------------------------------------------------------------------
;The ARMOUR of hell Scenes 79-82
;--------------------------------------------------------------------------------------------------------------------------
Scene 82
#Include prtychk.txt
#include steal.txt
ACTOR 1, "Devil(Equipment)", josh84, 1, 30, 90 , 31
1: Rightclick me, pick a level of armour, and then click shop to start buying!
END

@eventActorclick1
MENU "Armour1-20=@Armour20", "Armour20-40=@Armour40", "Armour40-60=@Armour60", "Armour60-80=@Armour80", "Armour80-100=@Armour100", "Other=@Backtoshopselect", 
END

@Armour20
OFFER2 0,20,10, 0,20,11, 0,20,21, 0,20,22, 0,20,23
END

@Armour40
OFFER2 20,40,10, 20,40,11, 20,40,21, 20,40,22, 20,40,23
END

@Armour60
OFFER2 40,60,10, 40,60,11, 40,60,21, 40,60,22, 40,60,23
END

@Armour80
OFFER2 60,80,10, 60,80,11, 60,80,21, 60,80,22, 60,80,23
END

@Armour100
OFFER2 80,100,10, 80,100,11, 80,100,21, 80,100,22, 80,100,23
END

@Backtoshopselect
GOTO Scene 79
END